Sunday, June 26, 2011

How to check a value exists in a weblist using QTP

noItems=browser("name:=Web*.*").page("title:=Web*.*").weblist("name:=depart").GetROProperty("items count")
flag=false
For i=1 to noItems
If lcase(browser("name:=Web*.*").page("title:=Web*.*").weblist("name:=depart").GetItem(i))="uday" then
flag=true
end if
Next

If flag=true Then
msgbox "Exists"
else
msgbox "Not Exists"
End If

1 comment:

Sagar Agrawal said...

Or you could simply do something like this:

vendorListItems = Browser("...").Page("...").WebList("...").GetROProperty("all items")
If Not instr(vendorListItems, VendorNameToSearch) > 0 Then
Msgbox "Vendor Name not found"
End If