WebBrowser问题
网页里有一个按钮,怎么样自动点击他。Set vDoc = WebBrowser1.Document
For i = 0 To vDoc.All.length - 1
If UCase(vDoc.All(i).tagName) = "INPUT" Then
Set vTag = vDoc.All(i)
If vTag.Type = "submit" Then
vTag.Click
End If
End If
Next i
这种方法需要每次都检测每一个标签,有些麻烦,能不能直接用WebBrowser1.Document.All(173).Click这种形式呢
[[it] 本帖最后由 zfc123 于 2008-9-25 17:03 编辑 [/it]]