Forum Discussion
Dmitry_Nikolaev
12 years agoStaff
Hi uday,
Here's the VBScript version of the routine:
Sub Test
Dim Page
Set Page = Sys.Process("iexplore").Page("*")
Log.Message GetLinksCount(Page)
End Sub
Function GetLinksCount(page)
Dim Links, LinksCount
Links = page.FindAllChildren("ObjectType", "Link", 9000)
LinksCount = 0
LinksCount = UBound(Links)
GetLinksCount = linkscount
End Function
Related Content
- 6 months agomacheshmeh
- 9 months agoenschim
Recent Discussions
- 5 hours agosimonaferrara
- 14 hours agoSubhraDas
- 2 days agotramuntana