请问,下边这种写法为什么没有内容呢?
:) On Error Resume NextSet Doc = Browser("Google").Page("Google").Object'获取page中的所有对象
msgbox Doc.all
For Each Element In Doc.all
TagName = Element.TagName '获取标签名
InnerText = Elemment.InnerText '获取InnerText
Reporter.ReportEvent micDone, TagName,InnerText
Next 1. On Error Resume Next,所以不报错,继续执行。
2.msgbox Doc.all Doc.all是个对象的集合,不能用msgbox
3.Elemment写错了,多了个m
页:
[1]