GetCellData

[mv8167]

Can we get more information on a cells data other than just the shown information?

Currently, I have:

Code:

FaxStatus = TableObj.GetCellData(3,1)

But is it possible to return if the cell is: visible, htm id, etc?

I am trying to do a If FaxStatus = value Then Higlight

I tried:

Code:

set a = Browser("Fax Request").Page("Page").WebTable("Fax Status").ChildItem(3,1,"WebElement", 1) b= a.GetROProperty("abs_x")

But I get the Run Error: "Object required a"

[inborntester]

Code:

inrtxt=Browser("Fax Request").Page("Page").WebTable("Fax Status").Object.rows(2).cells(1).innertext identifier ="innertext:="&inrtxt a=Browser("Fax Request").Page("Page").WebElement( identifier).GetROProperty("abs_x") msgbox(a)

[surya_7mar]

this may not work every time..

[mv8167]

thx inborntester

This did not work. But thx for the idea ;-)

[inborntester]

what is the error you got?. are you sure with row and column index.

Code:

inrtxt=Browser("Fax Request").Page("Page").WebTable("Fax Status").Object.rows(2).cells(0).innertext

is there two web elements in the cell ? do u want second.

[mv8167]

Thx inborntester (nice name)

Ok, I have been trying this in different ways, but all I get is an empty cell "" and im not sure why.

The cell has data and i am positive that i found the correct cell as i do ReportName2 = TableObj.GetCellData(r,c) just to find the cell.

I tried the childobjects, but it to returns ""

my code:

Code:

For r = BeginTableCount to EndTableCount ColCount = TableObj.ColumnCount(r) For c = 1 to ColCount 'ChildCount = TableObj.ChildItemCount(r, c, "WebElement") 'If ChildCount > 0 Then 'For k = 0 to ChildCount - 1 rNumber = rNumber +1 'Set LinkObj = TableObj.ChildItem(r, c, "innertext:=" & FaxName", k) ReportName1 = TableObj.GetROProperty("innerText") ReportName2 = TableObj.GetCellData(r,c) If ReportName2 = FaxName Then 'absX = LinkObj.GetROProperty("abs_x") 'absY = LinkObj.GetROProperty("abs_y") inrtxt=Browser("Fax Request").Page("Page").WebTable("Fax Status").Object.rows(r).cells(1).innertext identifier ="innertext:="&inrtxt a=Browser("Fax Request").Page("Page").WebElement( identifier).GetROProperty("abs_x") msgbox(a) Browser("Fax Request").Page("Page").WebElement("innertext:=" & FaxName ).Highlight Reporter.ReportEvent micPass, "Fax Found: " & FaxName , "The fax: " & FaxName & " - was found in the Fax Status report." Window("hwnd:=" & hWnd).Close Exit Function End If 'Next 'End If Next Next End If

[inborntester]

can you change the code and try

Code:

inrtxt=Browser("Fax Request").Page("Page").WebTable("Fax Status").Object.rows(r-1).cells(c-1).innertext

[mv8167]

I finally got back to this point.

Code:

inrtxt=Browser("Fax Request").Page("Page").WebTable("Fax Status").Object.rows(r-1).cells(3).innertext (c no longer exists so set to column 3, for 4-1) returns correct cell value, CCI_8717 identifier ="innertext:="&inrtxt returns, innertext:=CCI_8717 a=Browser("Fax Request").Page("Page").WebElement( identifier).GetROProperty("abs_x") returns,

The "[ WebElement ]" object's description matches more than one of the objects currently displayed in your application. Add additional properties to the object description in order to uniquely identify the object.

Line (68):

Code:

"a=Browser("Fax Request").Page("Page").WebElement( identifier).GetROProperty("abs_x")".

Tip: If the objects in your application have changed, the Maintenance Run Mode can
help you identify and update your steps and/or the objects in your repository.

There ar two cells with CCI_8717. I create the 8717 using RandNum = RandomNumber(1000, 9999), but it is not very random as I get the same values daily. ie 87127 and 1010 are very common.

[inborntester]

Can you try like

Code:

Set objDesc = Description.Create objDesc("innertext")=inrtxr ' depends on your need set index objDesc("index")="0" a=Browser("Fax Request").Page("Page").WebElement(objDesc).GetROProperty("abs_x")