vb.net - 使用 vb.net 对每个页面加载执行特定功能

Question

我正在 vb.net2008 中制作应用程序。我正在使用一个 webbrowser 控件来打开一个网站。我希望在网站的每个网页加载中，我的应用程序以编程方式执行特定功能。喜欢

1）当我们打开 www.yahoo.com 然后页面完全加载后，我的程序应该以编程方式单击登录按钮。

2）之后，当加载了提示用户名和密码的下一页时，我的程序应该自动输入用户名和密码。

3）登录后，我的程序应该以编程方式单击邮件链接。

Answer 1

Private Sub Command1_Click()
'Operation 1
WebBrowser1.Navigate "http://www.yahoo.com/"
Do Until WebBrowser1.ReadyState = WebBrowserReadyState.Complete    
 DoEvents
Loop


'Operation 2, signing in
WebBrowser1.Document.getElementById("Username").Value = "MyUsername"
WebBrowser1.Document.getElementById("Password").Value = "Password"
WebBrowser1.Document.getElementById("buttonLogOn").Click


Do Until WebBrowser1.ReadyState = WebBrowserReadyState.Complete 
DoEvents
Loop

'Operation 3
Dim link as HtmlElement = webBrowser1.Document.GetElementByID("mailLink")
link.InvokeMember("Click")

End Sub

而不是使用 webbrowser 控件的DocumentCompleted事件Do Until WebBrowser1.ReadyState =要好得多。我将把这个练习留给你。