How do i download a file from a web site with a port number
Here is a site
http://randomnothings.com:6969/index.html?sort=5
Here is my code
Private Sub GetPage(ByVal url As String)
On Error GoTo err
Dim Temp As String = ""
Dim ReceiveStream As System.io.Stream
Dim encode As System.Text.Encoding
Dim sr As System.IO.StreamReader
Dim request As System.Net.HttpWebRequest =
System.Net.WebRequest.Create(url)
request.UserAgent = "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT
5.2; SV1; .NET CLR 1.1.4322)"
Dim response As System.Net.HttpWebResponse = request.GetResponse()
ReceiveStream = response.GetResponseStream()
encode = System.Text.Encoding.GetEncoding("utf-8")
sr = New System.IO.StreamReader(ReceiveStream, encode)
Temp = sr.ReadToEnd()
sr.Close()
response.Close()
TStatus = "Decoding"
DecodePage(Temp)
TStatus = ""
Exit Sub
err:
Debug.WriteLine(Err.Description)
TStatus = Err.Description
End Sub