--
--
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to Mercu...@googlegroups.com
To unsubscribe from this group, send email to
MercuryQTP+...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en
---
You received this message because you are subscribed to the Google Groups "QTP - HP Quick Test Professional - Automated Software Testing" group.
To unsubscribe from this group and stop receiving emails from it, send an email to mercuryqtp+...@googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.
--
You received this message because you are subscribed to a topic in the Google Groups "QTP - HP Quick Test Professional - Automated Software Testing" group.
To unsubscribe from this topic, visit https://groups.google.com/d/topic/mercuryqtp/fAfmbT2BwmY/unsubscribe.
To unsubscribe from this group and all its topics, send an email to mercuryqtp+...@googlegroups.com.
Try with below code
Browser ().page ().frame ().weblist ().select "Blue"
Tnx,
Bhuvan
strCount=Browser("Browser Name").Page("Page Name").WebList("MyList").GetRoProperty("items count")
for i = 0 to strCount
strValue=Browser("Browser Name").Page("Page Name").WebList("MyList").GetItem(i)
AppID="All"
If Trim(strValue)=trim(AppID) Then
Browser("Browser Name").Page("Page Name").WebList("MyList").Select strValue
Exit for
End if
Next
End if