Nabend,
ich versuche mich die ganze Zeit mit HttpWebrequest und es will nicht funktionieren.
Das der Post von FF Entwicklungsumgebung :
Kann mir wer sagen wo das Problem liegt ?
Danke
Edit // Komme immer wieder auf Login Seite, was ich anhand des HTML sehe.
Edit 2 // Ich habe ein
Wie kann ich da ein Get hinterher schieben?
*Topic verschoben*
ich versuche mich die ganze Zeit mit HttpWebrequest und es will nicht funktionieren.
VB.NET-Quellcode
- Dim User = "xxx", Pwd = "xxx"
- Dim Request As HttpWebRequest = CType(WebRequest.Create("https://www.xxx.de/administrator/index.php"), HttpWebRequest)
- Request.Method = "POST"
- Request.Host = "www.xxx.de"
- Request.UserAgent = "Mozilla/5.0 (Windows NT 6.3; WOW64; rv:49.0) Gecko/20100101 Firefox/49.0"
- Request.ContentType = "application/x-www-form-urlencoded"
- Dim Post As String = "username=" & User & "&passwd=" & Pwd & "&lang=&option=com_login&task=login&return=aW5kZXgucGhw&7854d1ff8d4007d7060a5d94da756540=1"
- 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 = CType(Request.GetResponse(), HttpWebResponse)
- DataStream = Response.GetResponseStream()
- Dim reader As New StreamReader(DataStream)
- Dim ServerResponse As String = reader.ReadToEnd()
- reader.Close()
- DataStream.Close()
- Response.Close()
- MsgBox(ServerResponse)
- If CBool(InStr(ServerResponse, "Hilfe")) Then
- MessageBox.Show("Login OK")
- Else
- MessageBox.Show("Login nicht OK")
- End If
Das der Post von FF Entwicklungsumgebung :
Kann mir wer sagen wo das Problem liegt ?
Danke
Edit // Komme immer wieder auf Login Seite, was ich anhand des HTML sehe.
Edit 2 // Ich habe ein
Wie kann ich da ein Get hinterher schieben?
*Topic verschoben*
In Arbeit...
Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von „Marcus Gräfe“ ()