Code:Public Class Form1 Public Wrapper As HTTPWrapper = New HTTPWrapper Private Sub login_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles login.Click Dim strHTML As String If username.Text = vbNullString Or password.Text = vbNullString Then MessageBox.Show("You left the username and/or password field blank." & vbNewLine & "Try again..") Exit Sub End If username.Enabled = False password.Enabled = False login.Enabled = False strHTML = Wrapper.GetWrapper("http://www.gaiaonline.com/auth/login/", "http://www.gaiaonline.com/") strHTML = Wrapper.PostWrapper("http://www.gaiaonline.com/auth/login/", "username=" & username.Text & "&password=" & password.Text & "&token=390877768.1259031155.231727528&sid=&redirect=http%3A%2F%2Fwww.gaiaonline.com%2F&chap=2f23608d4e502e6f959acabe21950f74", "http://gaiaonline.com/") If strHTML.Contains("Location: http://www.gaiaonline.com/?login_success=1") Then MessageBox.Show("You are now Logged on...") Else MessageBox.Show("Login Failed...") username.Enabled = True password.Enabled = True login.Enabled = True End If End Sub End Class
Well I got the original from here :
[VB.NET] Gaia Login with WINSOCK - Gaming Gutter
Sorry about linking to gaming gutter but it was the only place I could find that gave me the information I needed for VB8...
I also edited because chad told me to...
He said he couldn't really help me, Can anyone help?
Results 1 to 31 of 31
Threaded View
- 24 Nov. 2009 03:20am #1
[Vb.net/VB8] What Am I doing wrong here...
Last edited by Eternal Darkness; 24 Nov. 2009 at 03:22am.