06-21-2012, 02:46 PM
Pls try the below code
Code:
rCount = Browser("").Page("").WebTable("").RowCount
For i = 1 to rCount
cCount = Browser("").Page("").WebTable("").ColumnCount(i)
For j = 1 to cCount
cData = Browser("").Page("").WebTable("").GetCellData(i,j)
Print cData
Set cData1 = Browser("").Page("").WebTable("").ChildItem(i,j,"WebCheckbox",0)
' ChildItem -- Returns a test object from the cell by type and index.
Act_val = cData1.GetROProperty
IF Act_val = “Administrator” THEN
cData1.SET ON
END IF
Next
Next