打开新链接后自动填表的问题
--------------------编程问答--------------------
If WebBrowser1.LocationURL = "http://www.9991.com/" Then
WebBrowser1.Document.getElementById("uName2").Value = "cnsldk@21cn.com"
End If
--------------------编程问答--------------------
--------------------编程问答--------------------
引用楼主 的回复: 窗体中有一个webbrowser1控件,…全部代码如下:
Dim strURL
Private Sub Form_Load()
WebBrowser1.Navigate "www.9991.com"
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
If doc.LocationURL = "http://www.9991.com/" Then
......
我把DOC换成webbrowser1,不报错啊……
--------------------编程问答--------------------
引用 3 楼 的回复: 引用楼主 的回复:
窗体中有一个webbrowser1控件,…全部代码如下:
Dim strURL
Private Sub Form_Load()
WebBrowser1.Navigate "www.9991.com"
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Var……
但在9991网页点新浪的网站,触发自动填表新浪网站时会报错!我要的是打开新网页后能继续自动填表的效果
补充: VB , 基础类