我的目的是在人人网留言页面中最近联系人中搜索对应的用户,如果搜索到则点击该内容:
Set list=Browser("人人网 - 我的留言板").Page("人人网 - 我的留言板").Object.getElementById("content").childnodes
Set list3=list.item(2).childnodes
print list3.length
Set list5=list3.item(0).childnodes
Set list6=list5.item(3).childnodes
dim lens,text
lens= list6.length
For i=0 to lens-1
text=list6.item(i).innertext
If text="郭平安" Then
Browser("人人网 - 我的留言板").Page("人人网 - 我的留言板").Link(text).Click
End If
Next