' Capture Weblist contests to a ; separated scripting
tmp = browser("micClass:=Browser").page("micClass:=Page").WebList("html id:=pname").GetROProperty("all items")
' Convert string to array
wlValues = Split(tmp,";")
' List items
For i = 0 To UBound(wlValues)
MsgBox wmValues(i)
Next
tmp = browser("micClass:=Browser").page("micClass:=Page").WebList("html id:=pname").GetROProperty("all items")
' Convert string to array
wlValues = Split(tmp,";")
' List items
For i = 0 To UBound(wlValues)
MsgBox wmValues(i)
Next
No comments:
Post a Comment
Note: only a member of this blog may post a comment.