vb webbrowser 控件点击按钮问题。
贴上相关代码:=================================Setdoc=WebBrowser1.DocumentDimiAsIntegerFori=...
贴上相关代码:
=================================
Set doc = WebBrowser1.Document
Dim i As Integer
For i = 0 To doc.All.length - 1
If UCase(doc.All(i).tagname) = "INPUT" Then
Set Item = doc.All(i)
If Item.Type = "submit" Then
Item.Click
End If
End If
Next i
==========================================
执行item.click会提示脚本错误,程序自动化错误。
debug.print Item.outerhtml发现最后有“errormsg”,网页源代码里没有 展开
=================================
Set doc = WebBrowser1.Document
Dim i As Integer
For i = 0 To doc.All.length - 1
If UCase(doc.All(i).tagname) = "INPUT" Then
Set Item = doc.All(i)
If Item.Type = "submit" Then
Item.Click
End If
End If
Next i
==========================================
执行item.click会提示脚本错误,程序自动化错误。
debug.print Item.outerhtml发现最后有“errormsg”,网页源代码里没有 展开
3个回答
展开全部
建议用INET来或XMLHTTP实现提交表单
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
系统问题
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
这个我也不会 你知道后告诉我一下 非常非常感谢QQ1135400418
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询