please help for no of links

[excellentpawan]

this code does not give total no of links on some websites like flipkart.com

Code:

Dim des, obrowser, opage,a
Set des = description.Create
des("micclass").value = "Link"

Set obrowser = description.Create
obrowser("micclass").value = "Browser"

Set opage = description.Create
opage("micclass").value = "Page"

set a = browser(obrowser).page(opage).ChildObjects(des)
val = a.count
print "total no of link = "&val

For i=1 to val-1
print a(i).getROProperty("name") & vbnewline
Next

[ssvali]

Above code is perfectly working.

Can you please confirm what error message you are getting ?

[vinod123]

Code:

Set des_obj = Description.Create
des_obj("micclass").value = "Link"
Set link_col = Browser("micclass:=Browser").Page("micclass:=Page").ChildObjects(des_obj)
msgbox link_col.count

Just Check the code which i am sending

[excellentpawan]

hi ssvali first thanks for your answer i have attached an image please see it.

[Staff]

Please ensure to include your code between [code] tags while asking or replying to questions. I have done this for you for this time.