vb.net Navigateur Web Connexion

Question

Bonjour je suis de présenter une demande Pour vous connecter à Nexon.net, je ne peux pas le faire au travail parce que le texte Les champs Dont semblons avoir ID à utiliser GetElementByID ....

C'est la page Web http://www.nexon.net/

ce qui est le code que j'ai essayé, mais cela ne fonctionne pas =/

Dim Username, Password As String 
    Username = TextBox1.Text 
    Password = TextBox2.Text 


    WebBrowser1.Document.GetElementById("userID").SetAttribute("value", Username) 
    WebBrowser1.Document.GetElementById("password").SetAttribute("value", Password) 
    WebBrowser1.Document.GetElementById("gnt_login_submit").InvokeMember("click") 

J'ai essayé de l'utiliser pour vérifier la connexion mais ne fonctionne pas

If (Not WebBrowser1.Document.All.Item("gnt_play_button") Is Nothing) Then 
     MsgBox("Incorrect Username/password , ", 0, "Login error!") 

Answer 1

Utilisation Document.All à la place:

WebBrowser1.Document.All("userName").SetAttribute("value", Username) 
WebBrowser1.Document.All("passwordName").SetAttribute("value", Password) 
WebBrowser1.Document.All("gnt_login_submitName").InvokeMember("click") 

Au lieu de id, passer name la valeur d'attribut de l'élément à All comme illustré ci-dessus.

Answer 2

Votre code fonctionne correctement, mais le problème persiste. est que vous envoyez ces valeurs lorsque la page se charge

Remplissez ce dans

Private Sub WebBrowser1_DocumentCompleted(sender As Object, e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted 

     WebBrowser1.Document.GetElementById("userID").SetAttribute("value", "User") 
     WebBrowser1.Document.GetElementById("password").SetAttribute("value", "Pass") 
     WebBrowser1.Document.GetElementById("gnt_login_submit").InvokeMember("click") 
    End Sub 

et vérifiez