Problem mit Webrequest-String

  • VB.NET

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von bigbasti.

    Problem mit Webrequest-String

    hi,
    ich programmiere momentan ein Tool welches einen Testaccount erställt. Ich schicke mit dem ersten Webrequest ein Formular ab, das funktioniert.

    Mit dem 2. Webrequest schickt man die Bestätigung der Agb's, hier tritt ein Fehler auf.
    Alle % 40 und dergleichen sind Sonderzeichen, welche ich in der 2. zeile durch die normalen Zeichen ersetzt habe. Ich bin mir ziemlich sicher, dass die letzte Zahl vor den eingegebenen Werten die Länge des Strings ist. Nun ersetze ich diese in meinem erstellten String auch durch Variabeln, es funktioniert aber nicht. Ich sehe keine Parameter welche ich nicht ersetzt habe, aber der Request ist Richtig zusammen gesetzt.

    Kann mir jemand Sagen ob er einen Fehler findet.
    Spoiler anzeigen

    VB.NET-Quellcode

    1. 'ausgelesene request: i_agree=1&do_agreement=1&data=a%3A18%3A%7Bs%3A10%3A%22product_id%22%3Bs%3A1%3A%227%22%3Bs%3A8%3A%22issuerID%22%3Bs%3A1%3A%220%22%3Bs%3A6%3A%22name_f%22%3Bs%3A7%3A%22Vorname%22%3Bs%3A6%3A%22name_l%22%3Bs%3A8%3A%22Nachname%22%3Bs%3A5%3A%22email%22%3Bs%3A20%3A%22email%40emailhoster.fr%22%3Bs%3A5%3A%22login%22%3Bs%3A9%3A%22uusername%22%3Bs%3A5%3A%22pass0%22%3Bs%3A8%3A%22passwort%22%3Bs%3A5%3A%22pass1%22%3Bs%3A8%3A%22passwort%22%3Bs%3A7%3A%22country%22%3Bs%3A2%3A%22AI%22%3Bs%3A5%3A%22state%22%3Bs%3A5%3A%22Staat%22%3Bs%3A4%3A%22city%22%3Bs%3A5%3A%22Stadt%22%3Bs%3A6%3A%22street%22%3Bs%3A8%3A%22Stra%DFe+1%22%3Bs%3A3%3A%22zip%22%3Bs%3A5%3A%2201234%22%3Bs%3A6%3A%22coupon%22%3Bs%3A0%3A%22%22%3Bs%3A10%3A%22do_payment%22%3Bs%3A1%3A%221%22%3Bs%3A11%3A%22price_group%22%3Bs%3A0%3A%22%22%3Bs%3A6%3A%22aff_id%22%3BN%3Bs%3A9%3A%22paysys_id%22%3Bs%3A4%3A%22free%22%3B%7D
    2. 'entschlüsselte reqest: i_agree=1&do_agreement=1&data=a:18:{s:10:"product_id";s:1:"7";s:8:"issuerID";s:1:"0";s:6:"name_f";s:7:"Vorname";s:6:"name_l";s:8:"Nachname";s:5:"email";s:20:"email@emailhoster.fr";s:5:"login";s:9:"uusername";s:5:"pass0";s:8:"passwort";s:5:"pass1";s:8:"passwort";s:7:"country";s:2:"AI";s:5:"state";s:5:"Staat";s:4:"city";s:5:"Stadt";s:6:"street";s:8:"Straße+1";s:3:"zip";s:5:"01234";s:6:"coupon";s:0:"";s:10:"do_payment";s:1:"1";s:11:"price_group";s:0:"";s:6:"aff_id";N;s:9:"paysys_id";s:4:"free";}
    4. Dim Post As String = "i_agree=1&do_agreement=1&data=a%3A18%3A%7Bs%3A10%3A%22product_id%22%3Bs%3A1%3A%227%22%3Bs%3A8%3A%22issuerID%22%3Bs%3A1%3A%220%22%3Bs%3A6%3A%22name_f%22%3Bs%3A" & CStr(Vorname.Length) & "%3A%22" & Vorname & "%22%3Bs%3A6%3A%22name_l%22%3Bs%3A" & CStr(Nachname.Length) & "%3A%22" & Nachname & "%22%3Bs%3A5%3A%22email%22%3Bs%3A" & CStr(email.Length - 2) & "%3A%22" & email & "%22%3Bs%3A5%3A%22login%22%3Bs%3A" & CStr(username.Length) & "%3A%22" & username & "%22%3Bs%3A5%3A%22pass0%22%3Bs%3A" & CStr(passwort.Length) & "%3A%22" & passwort & "%22%3Bs%3A5%3A%22pass1%22%3Bs%3A" & CStr(passwort.Length) & "%3A%22" & passwort & "%22%3Bs%3A7%3A%22country%22%3Bs%3A2%3A%22AU%22%3Bs%3A5%3A%22state%22%3Bs%3A" & CStr(staat.Length) & "%3A%22" & staat & "%22%3Bs%3A4%3A%22city%22%3Bs%3A" & CStr(stadt.Length) & "%3A%22" & stadt & "%22%3Bs%3A6%3A%22street%22%3Bs%3A" & CStr(strasse.Length) & "%3A%22" & strasse & "+1%22%3Bs%3A3%3A%22zip%22%3Bs%3A" & CStr(plz.Length) & "%3A%22" & plz & "%22%3Bs%3A6%3A%22coupon%22%3Bs%3A0%3A%22%22%3Bs%3A10%3A%22do_payment%22%3Bs%3A1%3A%221%22%3Bs%3A11%3A%22price_group%22%3Bs%3A0%3A%22%22%3Bs%3A6%3A%22aff_id%22%3BN%3Bs%3A9%3A%22paysys_id%22%3Bs%3A4%3A%22free%22%3B%7D"

Facebook
Telefonspende