Hallo ich nutze Im Moment diesen Code um einen Webrequest über einen Proxy auszuführen. Allerding bekomme ich immer "Die Verbindung mit dem Remoteserver kann nicht hergestellt werden" oder einen Timeout ich habe ihn zwar schon hochgesetzt (auf 60Sekunden) aber ich habe das Gefühl das die abfrage hinterm Proxy nicht funktioniert.
Ohne Proxy funktioniert es Problemlos
Hier mein Code:
In der Textbox1 befindet ich ein Http Proxy mit IP:PORT
Ohne Proxy funktioniert es Problemlos
Hier mein Code:
In der Textbox1 befindet ich ein Http Proxy mit IP:PORT
Code:
Try
Dim cookie As New CookieContainer
Dim Request As HttpWebRequest = CType(WebRequest.Create("http://evolutionclips.de/tools/wieistmeineip/"), HttpWebRequest)
Request.Method = "POST"
Request.Headers("useragent") = "Mozilla/5.0 (Windows NT 6.1; WOW64; rv:23.0) Gecko/20100101 Firefox/23.0"
Request.ContentType = "application/x-www-form-urlencoded"
Request.CookieContainer = cookie
Request.Timeout = 60000
Request.ReadWriteTimeout = 60000
Dim uri As New Uri("http://" & TextBox1.Text & "/")
Request.Proxy = New WebProxy(uri, False)
Dim Post As String = ""
Dim byteArray() As Byte = Encoding.UTF8.GetBytes(Post)
Request.ContentLength = byteArray.Length
Dim DataStream As Stream = Request.GetRequestStream()
DataStream.Write(byteArray, 0, byteArray.Length)
DataStream.Close()
Dim Response As HttpWebResponse = Request.GetResponse()
DataStream = Response.GetResponseStream()
Dim reader As New StreamReader(DataStream)
Dim ServerResponse As String = reader.ReadToEnd()
reader.Close()
DataStream.Close()
Response.Close()
MsgBox(ServerResponse)
Catch ex As Exception
MsgBox(ex.Message)
End Try