Hi Rahul,

Try this code -

Systemutil.Run "iexplore","http://in.yahoo.com/";
wait(10)
Set DescEdit = Description.Create()
DescEdit("micclass").Value = "WebEdit"
Set DescLink = Description.Create()
DescLink("micclass").Value = "Link"
Set DescImg = Description.Create()
DescImg("micclass").value = "Image"
'Set Edits =Browser("name:=Yahoo! India").page("title:=Yahoo!
India").ChildObjects(DescLink)
'Set Link =Browser("name:=Yahoo! India").page("title:=Yahoo!
India").ChildObjects(DescLink)
'Set Image = Browser("name:=Yahoo! India").page("title:=Yahoo!
India").ChildObjects(DescImg)
Msgbox  "Number of Image: " & Browser("name:=Yahoo!
India").page("title:=Yahoo! India").ChildObjects(DescImg).Count
MsgBox  "Number of Edits: " & Browser("name:=Yahoo!
India").page("title:=Yahoo! India").ChildObjects(DescEdit).Count
MsgBox  "Number of Link: " & Browser("name:=Yahoo!
India").page("title:=Yahoo! India").ChildObjects(DescLink).Count

Regards,
Anish

-- 
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 [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en

Reply via email to