Unable to get total number of links on a web page

[RGummadidala]

Hi all,
Can anybody please help me on this code.

Code:

Dim odesc Set odesc = Description.Create odesc("micclass").value="Browser" odesc("title").value = "Welcome: Mercury Tours" Set odescp = Description.Create odescp("micclass").value="Page" odescp("tile").value= "Welcome: Mercury Tours" Set odescL = Description.Create odescL("micclass").value="Links" Links=Browser(odesc).Page(odescp).ChildObjects(odescL) MsgBox Links.count

When i am running the code i am getting this error.

General : Run time erro

Line (10):

Code:

"Links=Browser(odesc).Page(odescp).ChildObjects(odescL)".

Thanks,
Rgummadidala.

[markQA]

Turn off the Regular Expression..

Code:

odescp("micclass").RegularExpression = False

[jsknight1969]

Might just be a typo but

Code:

odescL("micclass").value = "Link" set Links = Browser(odesc).Page(odescp).ChildObjects(odescL)

[Rekhapramod]

Hi,

Use the below code

Code:

Set Desc1=Description.Create() Desc1("micClass").Value="Link" Set Coll=Browser("title:=Google").Page("title:=Google").ChildObjects(Desc1) MsgBox Coll.Count

[RGummadidala]

Hi All,

I have corrected the typo error "Links" in my code and now the code looks as below (this is taken from some other thread in this forum)

Code:

Set oBrowserDescriptions = Description.Create () oBrowserDescriptions("micClass").Value = "Browser" oBrowserDescriptions("openedbytestingtool").Value = "True" Browser(oBrowserDescriptions).Exist() Set oPageDescriptions = Description.Create () oPageDescriptions("micClass").Value = "Page" Set oBrowserObj = Browser(oBrowserDescriptions).Page(oPageDescriptions) Systemutil.Run "iexplore" Browser(oBrowserDescriptions).Navigate("http://www.yahoo.com" ) oBrowserObj.Sync 'Set oBowserChObj = oBrowserObj.ChildObjects(oLinkDescriptions) Set oBowserChObj = oBrowserObj.ChildObjects() iChObjCnt = oBowserChObj.Count -1 msgbox iChObjCnt For iCount = 0 to iChObjCnt If oBowserChObj(iCount).GetROProperty("micclass") = "Link" Then If oBowserChObj(iCount).GetROProperty("visible") = true Then msgbox oBowserChObj(iCount).GetROProperty("name") End if End If Next

When I ran this, it is failing when invoking some method on "Browser" object like "Browser(oBrowserDescriptions).Exist()" or "Browser(oBrowserDescriptions).Navigate("http://www.yahoo.com" )", as if some kind of NullPointerException in java or some other language. The exact error message I see here is

Cannot identify the object "[ Browser ]" (of class Browser). Verify that this object's properties match an object currently displayed in your application.

Line (8):

Code:

"Browser(oBrowserDescriptions).ClearCache".

From the error, it appears as if Browser object was not created. Do I need to create the Browser object explicitly or for that matter, how does this work in Descriptive Program. Many examples which I saw in other posts and forums, the skeleton remains the same as above, but some how it is failing or apparently I'm missing something here.