[Visual Basic] [08][.net] Hilfe zu HttpWebRequest benötigt (POST)

Dim myReq As HttpWebRequest = _
 WebRequest.Create("http://www.deineseite.com/index.php?" & url_post)

 
Private Function httpPost(ByVal URL As String) As String
 Try
 Dim webRequest As System.Net.HttpWebRequest = CType(System.Net.WebRequest.Create(URL), System.Net.HttpWebRequest)
 'webRequest.CookieContainer = cookies - Auskommentieren und globalen Cookie-Container setzen für Cookie berücksichtigung
 Dim webResponse As System.Net.HttpWebResponse = CType(webRequest.GetResponse(), System.Net.HttpWebResponse)
 Dim responseStream As System.IO.Stream = webResponse.GetResponseStream()
 Dim responseEncoding As System.Text.Encoding = System.Text.Encoding.UTF8
 Dim responseReader As New IO.StreamReader(responseStream, responseEncoding)
 Dim responseContent As String = responseReader.ReadToEnd()
 Return responseContent
 Catch ex As Exception
 Return "Error while sending post data:" & ex.Message
 End Try
End Function

Dim strPost as String = "sid=" + a + "&getpage=..%2Fhtml%2Fde%2Fmenus%2Fmenu2.html&erro rpage=..%2Fhtml%2Fde%2Fmenus%2Fmenu2.html&var%3Apa gename=portfw&var%3Aerrorpagename=portrule&var%3Am enu=internet&var%3Apagemaster=&time%3Asettings%2Ft ime=0&var%3Arule=rule2&var%3Aisnew=1&var%3Aisexp=0 &forwardrules%3Asettings%2Frule3%2Factivated=1&for wardrules%3Asettings%2Frule3%2Fdescription=.&forwa rdrules%3Asettings%2Frule3%2Fprotocal=TCP&forwardr ules%3Asettings%2Frule3%2Fport=" + TextBox1.Text + "forwardrules%3Asettings%2Frule3%2Fendport=&forwar drules%3Asettings%2Frule3%2Ffwip=" + localip + "&forwardrules%3Asettings%2Frule3%2Ffwport=" + TextBox1.Text

'Request
Dim strPostResponse as String = httpPost("http://www.post.de/post.php?" & strPost)

'Rückgabe des Requests (falls gebraucht)
Console.WriteLine(strPostResponse)