|
hsjzfling,能不能麻烦你帮我看一下下面这个脚本,按照你说的我写了一下。
但是取不到INNERTEXT的值,我想大概是因为LINK属性里没有INDEX属性的关系
Browser("百度一下,你就知道").Page("百度一下,你就知道").WebEdit("wd").Set DataTable("searchitem", dtGlobalSheet)
Browser("百度一下,你就知道").Page("百度一下,你就知道").WebButton("百度一下").Click
Dim x,y,z
x=datatable("expectitem",GlobalSheet)
Do
For i=0 to 9
y=Browser("百度一下,你就知道").Page("百度一下,你就知道").Link("class:=Link","index:=i").GetTOProperty("innertext")
z=InStr(1,y,x,1)
If z>0 Then
Browser("百度一下,你就知道").Page("百度一下,你就知道").Link("class:=Link","index:=i").Output.CheckPoint("url")
Exit for
Exit do
End If
Next
Browser("百度一下,你就知道").Page("百度一下,你就知道").Link("下一页").Click
loop
我在写Link("class:=Link","index:=i")时,没有出错显示,是不是表明QTP是能找到这个对象的?
但是我MSGBOX(y)的值始终为空,是不是找不到LINK对象所以取不了INNERTEXT的属性呢?
SPY了LINK的属性里,没有INDEX,但是不这样我不知道该怎么一个一个地去取LINK的INNERTEXT进行比较了
麻烦帮忙看一下 |
|