Whether function can return number of links and their names in a web page

[kotaramamohana]

Hi Friends,

Whether function can return number of Links and their names in a web page. I have tried but I am getting error as "Wrong number of arguments or invalid property assignment"

Here is my code:

Code:

n=abc() msgbox n.count Public function abc() Set linkdesc=description.Create linkdesc("micclass").value="Link" Set objlink=browser("g").Page("g").ChildObjects(linkdesc) abc=objlink End Function

Can you please share your ideas

[ssvali]

Try the below code

Code:

oval= lnkCount() For j = lbound(oval) to ubound(oval) Print oval(j) Next Print "Total No . of Link" & ubound(oval) Function lnkCount() Set linkDesc = Description.Create linkDesc("micclass").value = "Link" Set lnk = Browser("g").Page("g").ChildObjects(linkDesc) For i = 0 to lnk.Count - 1 ReDim Preserve lnkname(i) lnkname(i) = lnk(i).GetROProperty("name") Next lnkCount = lnkname End Function

[kotaramamohana]

Thanks Ssvali, Its working fine.

[elango87]

Your approach is right.
Instead of using abc = objlink, you should have used
abc = objlink.count()

and in place of msgbox = n.count, you should use msgbox = n

below is the modified version of your code.

--

Code:

SystemUtil.Run "iexplore.exe", "google.com" n=abc() msgbox n Public function abc() Set linkdesc=description.Create linkdesc("micclass").value="Image" Set objlink = Browser("Google").Page("Google").ChildObjects(linkdesc) abc = objlink.Count() End Function

--

hope this helps.

Thanks,
Elango