Ciao a tutti piacere sono Michele, sono nuovo di questo forum, volevo chiedervi un aiuto sulla programmazione.
Volevo fare un programma che quando sbagliavi l'acesso su facebook(email o password), ti portasse sulla pagina di youtube.
Io avevo scritto questo codice
Public Class Form1
Dim EMAIL, PASS, NAM As String
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
EMAIL = "ANONIOFLFLFLDKGIJ@live.it"
PASS = "12BDLO/(N57"
NAM = "fghjghj.ghjghjghj"
WebBrowser1.Document.GetElementById("email").Inner Text = EMAIL
WebBrowser1.Document.GetElementById("pass").InnerT ext = PASS
WebBrowser1.Document.GetElementById("u_0_q").Invok eMember("click")
If WebBrowser1.Document.Url.ToString = "https://www.facebook.com/login.php?login_attempt=1&lwv=110" Then
WebBrowser1.Navigate("https://www.youtube.com")
WebBrowser1.Document.GetElementById("masthead-search-term").InnerText = NAM
WebBrowser1.Document.GetElementById("search-btn").InvokeMember("click")
End If
End Sub
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
End Sub
End Class
L'unico problema di questo codice è che mi rimane sulla pagina di facebook sull'utente errato.
, non mi fa andare su youtube.
P.S.
NON FATE CASO ALLE VARIABILI, LE CAMBIERò CON DELLE TEXTBOX
Grazie mille in anticipo