HttpWebRequest Login Error 403. Kann keinen Fehler finden!

  • VB.NET

Es gibt 3 Antworten in diesem Thema. Der letzte Beitrag () ist von petaod.

    HttpWebRequest Login Error 403. Kann keinen Fehler finden!

    Hey,

    Ich versuch mich mittels Httpwebrequest bei Instagram anzumelden, also eigtl. nach einem stinknormalem Httpwebrequest-Schema.
    Hier der Code mit ersetzten Benutzerangaben:

    Spoiler anzeigen

    VB.NET-Quellcode

    1. Dim logincookie As CookieContainer
    2. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    3. Dim postData As String = "csrfmiddlewaretoken=d5012da15e13168bcae41bc444e924da&username=NAME&password=PSW"
    4. Dim tempCookies As New CookieContainer
    5. Dim encoding As New UTF8Encoding
    6. Dim byteData As Byte() = encoding.GetBytes(postData)
    7. Dim postReq As HttpWebRequest = DirectCast(WebRequest.Create("https://instagram.com/accounts/login/next=/oauth/authorize/%3Fclient_id%3D9d836570317f4c18bca0db6d2ac38e29%26redirect_uri%3Dhttp%253A%252F%252Fweb.stagram.com%252F%26response_type%3Dcode%26scope%3Dlikes%2Bcomments%2Brelationships"), HttpWebRequest)
    8. postReq.Method = "POST"
    9. postReq.UserAgent = "Mozilla/5.0 (Windows NT 6.1; WOW64; rv:15.0) Gecko/20100101 Firefox/15.0.1"
    10. postReq.Accept = "text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8"
    11. postReq.KeepAlive = True postReq.Credentials = CredentialCache.DefaultCredentials
    12. postReq.CookieContainer = tempCookies postReq.ContentType = "application/x-www-form-urlencoded"
    13. postReq.Referer = "https://instagram.com/accounts/login/?next=/accounts/edit/"
    14. postReq.ContentLength = byteData.Length
    15. Dim postreqstream As Stream = postReq.GetRequestStream()
    16. postreqstream.Write(byteData, 0, byteData.Length)
    17. postreqstream.Close()
    18. Dim postresponse As HttpWebResponse
    19. postresponse = DirectCast(postReq.GetResponse(), HttpWebResponse)
    20. tempCookies.Add(postresponse.Cookies)
    21. logincookie = tempCookies
    22. Dim postreqreader As New StreamReader(postresponse.GetResponseStream())
    23. Dim thepage As String = postreqreader.ReadToEnd
    24. WebBrowser1.DocumentText = thepage
    25. End Sub



    In der Praxis funktioniert der Code bei eigtl. allen Webseiten und ich kann auch keinen Fehler erkennen. Nur bei Instagram scheint es Probleme zu geben, denn dort erscheint der Fehler "403" (= Forbitten). Kann mir jmd. helfen? Liegt es vlt. an "https"?

    Lad dir mal Tampa oder LiveHttpheaders fürn firefox runter damit du alles siehst.
    Mein Tampa sagt mir:
    Spoiler anzeigen
    23:35:22.781[453ms][total 572ms] Status: 200[OK]
    POST https://instagram.com/accounts/login/?next=/accounts/edit/ Load Flags[LOAD_DOCUMENT_URI LOAD_INITIAL_DOCUMENT_URI ] Größe des Inhalts[1487] Mime Type[text/html]
    Request Header:
    Host[instagram.com]
    User-Agent[Mozilla/5.0 (Windows NT 6.1; WOW64; rv:15.0) Gecko/20100101 Firefox/15.0.1]
    Accept[text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8]
    Accept-Language[de-de,de;q=0.8,en-us;q=0.5,en;q=0.3]
    Accept-Encoding[gzip, deflate]
    DNT[1]
    Connection[keep-alive]
    Referer[instagram.com/accounts/login/?next=/accounts/edit/]
    Cookie[csrftoken=177dc40023df3971831be1981428e79e]
    POST-Daten:
    csrfmiddlewaretoken[177dc40023df3971831be1981428e79e]
    username[123]
    password[456]
    Response Header:
    Cache-Control[max-age=0]
    Content-Encoding[gzip]
    Content-Language[de]
    Content-Type[text/html]
    Date[Sun, 07 Oct 2012 21:35:24 GMT]
    Expires[Sun, 07 Oct 2012 21:35:24 GMT]
    Last-Modified[Sun, 07 Oct 2012 21:35:24 GMT]
    Server[nginx]
    Set-Cookie[csrftoken=177dc40023df3971831be1981428e79e; expires=Sun, 06-Oct-2013 21:35:24 GMT; Max-Age=31449600; Path=/]
    Vary[Cookie, Accept-Language, Accept-Encoding]
    X-Frame-Options[SAMEORIGIN]
    Content-Length[1487]
    Connection[keep-alive]


    Ergo sendest du 1. an die falsche Url und vergisst 2. das Cookie mitzusenden. Das Cookie bekommste, wenn du einmal nen get request auf die Url machst (ich hab den cookie wert ausm firefox rauskopiert, der hält aber auch net ewig).

    VB.NET-Quellcode

    1. Dim tempCookies As New CookieContainer
    2. Dim url As String = "https://instagram.com/"
    3. Dim requrl As String = "https://instagram.com/accounts/login/?next=/accounts/edit/"
    4. Dim cookie As String = "csrftoken=177dc40023df3971831be1981428e79e"
    5. tempCookies.SetCookies(New Uri(url), cookie)
    6. Dim username As String = "123"
    7. Dim password As String = "456"
    8. Dim postdata As String = String.Format("csrfmiddlewaretoken={0}&username={1}&password={2}", "177dc40023df3971831be1981428e79e", username, password)
    10. Dim byteData As Byte() = Encoding.UTF8.GetBytes(postdata)
    11. Dim postReq As HttpWebRequest = CType(WebRequest.Create(requrl), HttpWebRequest)
    12. postReq.Method = WebRequestMethods.Http.Post
    13. ...


    Voila und es funktioniert.

    Sorry, dass ich hier Poste, aber ich hab genau das selbe problem:

    @markus.obi

    Ich will auf der Seite "http://web.stagram.com/?t=lo" einloggen, wenn man auf login klickt, dann wird man an instagram weitergeleitet.

    VB.NET-Quellcode

    1. Imports System.Text
    2. Imports System.IO
    3. Imports System.Net
    6. Public Class Account
    8. Dim cookieCon As New CookieContainer
    9. Dim request As HttpWebRequest
    10. Dim response As HttpWebResponse
    13. #Region "Properties"
    14. Dim constUsername As String
    15. Public Property Username As String
    16. Get
    17. Username = constUsername
    18. End Get
    19. Set(value As String)
    20. constUsername = value
    21. End Set
    22. End Property
    24. Dim constPassword As String
    25. Public Property Password As String
    26. Get
    27. Password = constPassword
    28. End Get
    29. Set(value As String)
    30. constPassword = value
    31. End Set
    32. End Property
    33. #End Region
    34. #Region "GetResponse"
    35. Public Function GetResponse(ByVal url As String) As String
    37. 'request.Proxy = New WebProxy(New Uri(My.Settings.proxy))
    38. request = CType(HttpWebRequest.Create(url), HttpWebRequest)
    39. request.CookieContainer = cookieCon
    40. response = CType(request.GetResponse(), HttpWebResponse)
    42. Return New StreamReader(response.GetResponseStream()).ReadToEnd()
    43. End Function
    45. Public Function GetResponse(ByVal url As String, ByVal post As String) As String
    46. request = CType(HttpWebRequest.Create(url), HttpWebRequest)
    47. request.Method = "POST"
    48. request.CookieContainer = cookieCon
    49. request.UserAgent = "Mozilla/5.0 (Windows NT 6.1; rv:8.0) Gecko/20100101 Firefox/8.0"
    50. request.ContentType = "application/x-www-form-urlencoded"
    52. Dim byteArr() As Byte = Encoding.Default.GetBytes(post)
    53. request.ContentLength = byteArr.Length
    55. Dim dataStream As Stream = request.GetRequestStream()
    56. dataStream.Write(byteArr, 0, byteArr.Length)
    58. response = CType(request.GetResponse(), HttpWebResponse)
    60. Return New StreamReader(response.GetResponseStream()).ReadToEnd()
    61. End Function
    62. #End Region
    64. Public Function Login(ByVal Account As Account) As Boolean
    65. Dim PostData As New StringBuilder
    67. Dim html As String = GetResponse("https://instagram.com/accounts/login/?next=/oauth/authorize/%3Fclient_id%3D9d836570317f4c18bca0db6d2ac38e29%26redirect_uri%3Dhttp%3A//web.stagram.com/%26response_type%3Dcode%26scope%3Dlikes%2Bcomments%2Brelationships#")
    68. Dim Token As String = GetToken(html)
    70. PostData.Append("csrfmiddlewaretoken=" & GetToken(html))
    71. PostData.Append("&username=" & Me.Username)
    72. PostData.Append("&password=" & Me.Password)
    73. MsgBox(Token)
    74. html = GetResponse("https://instagram.com/accounts/login/?next=/oauth/authorize/%3Fclient_id%3D9d836570317f4c18bca0db6d2ac38e29%26redirect_uri%3Dhttp%3A//web.stagram.com/%26response_type%3Dcode%26scope%3Dlikes%2Bcomments%2Brelationships", PostData.ToString())
    75. If html.Contains("Gib bitte einen korrekten Nutzernamen und ein Passwort ein") Then
    76. Return False
    77. Else
    78. Return True
    79. End If
    80. End Function
    82. Private Function GetToken(ByVal SourceCode As String) As String
    83. Return SourceCode.Substring(SourceCode.IndexOf("csrfmiddlewaretoken")).Split("""")(2).Split("""")(0)
    84. End Function
    85. End Class


    PS: habs auch damit versucht den Request auf diese seite zu jagen instagram.com/accounts/login/?next=/accounts/edit/

    Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „windowsfan“ ()