0

您好，我正在制作一个应用程序登录到 Nexon.net，我无法让它工作，因为文本字段似乎没有要使用的 ID GetElementByID....

这是网页http://www.nexon.net/

这是我尝试过的代码，但它不起作用=/

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")

我试图用它来验证登录但不起作用

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

2 回答 2

0

改用Document.All：

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

而不是id，将元素的name属性值传递给All如上所示。

于 2012-06-13T18:21:17.530 回答
0

您的代码工作正常，但有问题。您是否在页面加载时发送这些值

填写这个

 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

并检查

于 2012-06-13T19:51:23.227 回答