Dim oWebElements,oDesc
Set oDesc=description.Create()
oDesc("micClass").value="WebElement"
oDesc("html tag").value="ul"
oDesc("class").value="pf_l_cl"
set oWebElements= Browser("").Page("").ChildObjects(oDesc)
oCount=oWebElements.count()
Dim tempObj
Dim MyString, MyArray, Msg
Dim deleteIndex
deleteIndex=-1
For i=0 To oCount-1
Set tempObj = oWebElements.Item(i)
print tempObj.GetROProperty("innertext")
Next作者: 黑羽祭 时间: 2013-6-21 13:23 回复 1#小丫头amy