03-11-2008, 09:27 PM
I have a webTable named "Binary Id" that i can see using object spy and that i have added to the repository. I have a table thats lists some files that i can download, this table changes from time to time, so i was going to go down table rows and check if all links are valid, but when i run following code i always get this error:
The "Binary Id" WebTable object was not found in the Object Repository. Check the object Repository to confirm that the object exists or to find the correct name for the object. Here is the code that i am using and i will attach a snapshot of the repository, object spy and the error.
In the object spy its inside another table called "Latest RMS Clients" I tried accessing that table also, but no luck, same error. i am not sure what i am doing wrong here, can anyone help.
The "Binary Id" WebTable object was not found in the Object Repository. Check the object Repository to confirm that the object exists or to find the correct name for the object. Here is the code that i am using and i will attach a snapshot of the repository, object spy and the error.
In the object spy its inside another table called "Latest RMS Clients" I tried accessing that table also, but no luck, same error. i am not sure what i am doing wrong here, can anyone help.
Code:
With Browser("RMS Login")
With .Page("RMS Login")
.WebEdit("username").Set "user"
.WebEdit("password").Set "coffee23"
.Image("ImageButtonLogin").Click
End With
With .Page("RMS by Sage")
.Frame("nav").WebElement("Bullet4").Click
.Frame("SiteView").WebElement("monitor-1.03.03-04.i386.rpm").Click
End With
.Dialog("File Download").WinButton("Cancel").Click
With .Page("RMS by Sage")
.Frame("nav").WebElement("Bullet4").Click
With .Frame("SiteView")
RowCount = .WebTable("Binary Id").RowCount
For row = 2 To RowCount
Set RMSLink= .WebTable("Binary Id").ChildItem(2,row,"Link",0)
If TypeName(RMSLink) = "TextLink" Then
RMSLink.Click()
End If
Next
End With
End With
.Page("RMS by Sage").Frame("header").Link("Logout").Click
.Page("RMS Login_2").Sync
.Close
End With