Hey,
ich weiß das man das hier im Forum soooo oft findet aber irgendwie scheint es bei mir nicht zu funktionieren!?..Ich hab mich in den letzten Tagen an "Visual Basic 2008 Expess Edition" versucht und bin wirklich begeistert wie schnell und einfach man da vieles machen kann. Nun bin ich schon seit 4 Stunden am selben Problem und habe sowohl hier schon viel dazu gefunden als auch um die 30 YouTube Videos mit Anleitung geschaut, die recht gut sind.
Ich wollt einfach mal ein auto-login für Yahoo machen und soweit bin ich jetzt:
Es gibt keine Fehler zurück und ich bekomme einfach nicht raus was falsch sein könnte??..Kann mir einer helfen??....
Danke im voraus,
gruß
ich weiß das man das hier im Forum soooo oft findet aber irgendwie scheint es bei mir nicht zu funktionieren!?..Ich hab mich in den letzten Tagen an "Visual Basic 2008 Expess Edition" versucht und bin wirklich begeistert wie schnell und einfach man da vieles machen kann. Nun bin ich schon seit 4 Stunden am selben Problem und habe sowohl hier schon viel dazu gefunden als auch um die 30 YouTube Videos mit Anleitung geschaut, die recht gut sind.
Ich wollt einfach mal ein auto-login für Yahoo machen und soweit bin ich jetzt:
Quellcode
- Public Class Hauptfenster
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- WebBrowser.GoBack()
- End Sub
- Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
- WebBrowser.GoForward()
- End Sub
- Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
- WebBrowser.Stop()
- End Sub
- Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
- WebBrowser.Refresh()
- End Sub
- Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
- WebBrowser.Navigate("https://login.yahoo.com/config/mail?.intl=de&.done=http%3A%2F%2Fde.mg40.mail.yahoo.com%2Fdc%2Flaunch%3F.gx%3D1%26.rand%3D0jl0vtof3i0l1")
- End Sub
- Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
- WebBrowser.Navigate(TextBox.Text)
- End Sub
- Private Sub GeckoWebBrowser_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
- If WebBrowser.CanGoBack = False Then
- Button1.Enabled = False
- Else
- Button1.Enabled = True
- End If
- If WebBrowser.CanGoForward = False Then
- Button2.Enabled = False
- Else
- Button2.Enabled = True
- End If
- End Sub
- Private Sub WebBrowser_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser.DocumentCompleted
- TextBox.Text = WebBrowser.Url.AbsoluteUri
- End Sub
- Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
- WebBrowser.Document.GetElementById("username").SetAttribute("value", "******")
- WebBrowser.Document.GetElementById("passwd").SetAttribute("value", "*******")
- End Sub
- End Class
Es gibt keine Fehler zurück und ich bekomme einfach nicht raus was falsch sein könnte??..Kann mir einer helfen??....
Danke im voraus,
gruß
Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von „meister56“ ()