[VB.NET] HttpWebRequest - Tutorial

12/18/2011 13:33 Train™#16
Quote:
Originally Posted by xKraizy View Post
WebBrowser? Ich benutze die nicht weil die mist sind und was soll man da für ein Tutorial machen?
ja du hast recht^^

aber was meinst du mit "textboxQuelltext" ?
12/18/2011 18:16 Kraizy​#17
Das ist nur ein Beispiel..kann man ja benutzen um in der TextBox den Seitenquelltext anzeigen zu lassen. Musst du natürlich nicht machen.
02/28/2012 16:30 DasSchwarzeT#18
Ich weiß halt nich wo das
PHP Code:
Private Sub btnLogin_Click (sender As ObjectAs EventArgsHandles btnLogin.Click
   Dim h 
As New Http
   
//Login ausführen
   
textboxQuelltext.Text h.GetResponse("http://www.elitepvpers.com/forum/login.php?do=login""vb_login_username=EPVP_USERNAME&vb_login_password=EPVP_PASSWORT&cookieuser=1&s=&securitytoken=guest&do=login&vb_login_md5password=&vb_login_md5password_utf=")
   
//Hauptseite aufrufen
   
textboxQuelltext.Text h.GetResponse("http://www.elitepvpers.com/forum/")
   
//prüfen, ob Login erfolgreich war
   
If textboxQuelltext.Text.Contains("Log Out")
      
//eingeloggt
   
Else
      
//nicht eingeloggt
   
End If
End Sub 
hinkommt..
02/28/2012 16:38 Kraizy​#19
Bitte lieber erst Grundlagen lernen, bevor du an so einem Thema arbeitest. Das ist eine ganz normale Methode, die aufgerufen wird, wenn der Button "btnLogin" geklickt wurde.
02/28/2012 18:04 DasSchwarzeT#20
Quote:
Originally Posted by xKraizy View Post
Bitte lieber erst Grundlagen lernen, bevor du an so einem Thema arbeitest. Das ist eine ganz normale Methode, die aufgerufen wird, wenn der Button "btnLogin" geklickt wurde.
Ich kann die Grundlagen^^ Naja em nur i wie gibt es nur eine Textbox (textboxQuelltext) die PW + ID beinhaltet?!

ich blick das irgendwie nicht :O
Kannste nicht vllt ein Projekt hochladen wo das drin ist?
02/28/2012 18:45 Kraizy​#21
Am Ende des Beitrags ist die gesamte Source, die man braucht, um sich einzuloggen. Wenn du das trotzdem nicht schaffst, dann kannst du die Grundlagen nicht, sry ist aber so. Und in diesem Thread geht es um WebRequests, nicht wie man irgendwelche Buttons auf die Form klatscht.
03/25/2012 09:21 'xLeatz.#22
Also erstmal Super Tutorial.
Nur etz komm ich nicht weiter ich möchte das es einen Post macht, ich habes fast genau so wie beim Einloggen gemacht. Die neuen Scores mit Firefox gesucht aber es macht keinen Post.
03/25/2012 12:53 Kraizy​#23
Dein Code?
03/25/2012 13:12 'xLeatz.#24
Code:
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim h As New Http
        'Posten ausführen
        textboxQuelltext.Text = h.GetResponse("http://www.elitepvpers.com/forum/newreply.php?do=postreply&t=1784743", "message=bump%3Cbr%3E&wysiwyg=1&styleid=0&signature=1&fromquickreply=1&s=&securitytoken=1332659524-11093eb9d98690c9630171388c53caf8df179273&do=postreply&t=1639683&p=who+cares&specifiedpost=0&parseurl=1&loggedinuser=4048456&sbutton=Antworten")

        textboxQuelltext.Text = h.GetResponse("http://www.elitepvpers.com/forum/")
        'prüfen, ob Post erfolgreich war
        If textboxQuelltext.Text.Contains("bump") Then
            MessageBox.Show("Post erfolgreich!")
            'Erfolgreich --> Sonst ~ Else
        Else
            MessageBox.Show("Post nicht erfolgreich!")
        End If
    End Sub
Ich muss auf die Letzte Seite vom Thread dann schauen ob dort ein Bump steht und wenn das erfolgreich ist sollte es gehen aber ka es postet nicht :D
03/25/2012 13:34 Kraizy​#25
Du loggst dich gar nicht ein..? Außerdem, warum rufst du die Hauptseite auf nachdem du versuchst einen Beitrag zu erstellen?
03/25/2012 13:41 'xLeatz.#26
Doch ich logg mich schon ein das geht auch. Das ist nur der Button2 mit der Belegung zum Pushen!

Code:
rivate Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim h As New Http
        'Posten 
        textboxQuelltext.Text = h.GetResponse("http://www.elitepvpers.com/forum/elite-gold-trading/1639683-vk-spammer-mit-hotkeys-hot.html", "message=bump%3Cbr%3E&wysiwyg=1&styleid=0&signature=1&fromquickreply=1&s=&securitytoken=(textboxQuelltext.Text)&do=postreply&t=1639683&p=who+cares&specifiedpost=0&parseurl=1&loggedinuser=4048456&sbutton=Antworten")

        textboxQuelltext.Text = h.GetResponse("http://www.elitepvpers.com/forum/elite-gold-trading/1639683-vk-spammer-mit-hotkeys-hot.html")
        'prüfen, ob Post erfolgreich war
        If textboxQuelltext.Text.Contains("bump") Then
            MessageBox.Show("Post erfolgreich!")
            'Erfolgreich
        Else
            MessageBox.Show("Post nicht erfolgreich!")
        End If
    End Sub
03/25/2012 13:47 Kraizy​#27
Durch den Button2-Klick machst du aber eine neue Instanz der Http-Klasse:
Quote:
Dim h As New Http
Somit verlierst du alle Cookies und bist nicht mehr eingeloggt.
03/25/2012 13:49 'xLeatz.#28
Stimmt danke für die Hilfe!

€: Hab keine Ahnung wie ich das Fixxen kann :D
03/25/2012 19:43 Kraizy​#29
Was genau? Dass du danach noch eingeloggt bist? Erstell die Variable außerhalb des Klicks, also:

PHP Code:
Dim h As New Http

Private Sub Button1_Click...//login
   
h.GetResponse...
End Sub

Private Sub Button2_Click...//post
   
h.GetResponse...
End Sub 
07/03/2012 08:32 airsonic#30
Hallo ich habe mir dein Tutorial angesehen und gelesen
du hast es auch wunderbar beschrieben aber ich verstehe nicht wo man seinen Namen und sein PW eingeben muss um sich einzuloggen. Ich hoffe das du mir das erklären kannst weil ich noch nicht soviel Erfahrung mit VB und anderen Sprachen hab.