Cheat Engine Forum Index Cheat Engine
The Official Site of Cheat Engine
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 


VB Myspace Login?

 
Post new topic   Reply to topic    Cheat Engine Forum Index -> General programming
View previous topic :: View next topic  
Author Message
Micah
Grandmaster Cheater
Reputation: 1

Joined: 30 Mar 2007
Posts: 833
PostPosted: Wed Sep 30, 2009 12:25 am    Post subject: VB Myspace Login? Reply with quote
Im using vb2008.
Code:
 Dim base As String = "http://myspace.com/"
        Dim User As String = TextBox1.Text
        Dim Pass As String = TextBox2.Text
        Dim WB1 As New WebBrowser
        WB1.Height = 100
        WB1.Width = 100
        WB1.Location = New Point((GroupBox1.Location.X + GroupBox1.Width + 10), (GroupBox1.Location.Y))
        Me.Controls.Add(WB1)
        WB1.Navigate(base)
        If Not WB1.IsBusy Then
            WB1.Document.All("ctl00_ctl00_cpMain_cpMain_LoginBox_Email_Textbox").InnerText = User
            WB1.Document.All("ctl00_ctl00_cpMain_cpMain_LoginBox_Password_Textbox").SetAttribute("value", Pass)
        End If
End Sub
End Class

How do you enter it into the text box if neither of those ways work...?
_________________
Back to top
View user's profile Send private message MSN Messenger
NothingToShow
Grandmaster Cheater Supreme
Reputation: 0

Joined: 11 Jul 2007
Posts: 1579
PostPosted: Wed Sep 30, 2009 9:02 am    Post subject: Reply with quote
I would send a HTTP Post request instead of that.
Back to top
View user's profile Send private message
Micah
Grandmaster Cheater
Reputation: 1

Joined: 30 Mar 2007
Posts: 833
PostPosted: Wed Sep 30, 2009 6:23 pm    Post subject: Reply with quote
I am trying to learn to use html elements, but thanks Smile
I figured it out.
Just made a button that enabled the timer then
Code:
Private Sub MyspaceLogin_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyspaceLogin.Tick
        Dim User As String = TextBox1.Text
        Dim Pass As String = TextBox2.Text
        If WB1.ReadyState = WebBrowserReadyState.Complete Then
            WB1.Document.GetElementById("ctl00_ctl00_cpMain_cpMain_LoginBox_Email_Textbox").InnerText = User
            WB1.Document.GetElementById("ctl00_ctl00_cpMain_cpMain_LoginBox_Password_Textbox").InnerText = Pass
            WB1.Document.GetElementById("dlb").RaiseEvent("onclick")
            MyspaceLogin.Enabled = False
        End If
    End Sub

_________________
Back to top
View user's profile Send private message MSN Messenger
Display posts from previous:   
Post new topic   Reply to topic    Cheat Engine Forum Index -> General programming All times are GMT - 6 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You cannot attach files in this forum
You can download files in this forum


Powered by phpBB © 2001, 2005 phpBB Group

CE Wiki   IRC (#CEF)   Twitter
Third party websites