Facebook

Course Name Start Date Time Duration Registration Link
No Training Programs Scheduled ClickHere to Contact
Please mail To sudhakar@qtpsudhakar.com to Register for any training

Wednesday, September 2, 2009

Find Hidden Rows in a Table

Find Hidden Rows in a Table

'*****************************************************************************
Function FindTableHiddenRows(oTableId,BrowserProp)

Dim oDocument
Dim oTableObject
Dim oTableRowCount
Dim rIndex

Set oDocument=browser(BrowserProp).Object.Document

Set oTableObject=oDocument.getElementById(oTableId)

oTableRowCount=oTableObject.Rows.length

For rIndex=0 to oTableRowCount-1
  If  oTableObject.rows(rIndex).style.display <> "" and lcase(oTableObject.rows(rIndex).style.display)="none" then
 msgbox "RowNumber "&rIndex+1&" with text '"& oTableObject.rows(rIndex).innertext &"' Is hidden"
  End If
Next

Set oDocument=nothing
Set oTableObject=Nothing
End Function
'*****************************************************************************
'Calling the Function
FindTableHiddenRows "MyTable","title:=Google"

Here MyTable is the Table HTML ID.
____________________________________________________________


Please send your Suggestions and Doubts to my yahoo group http://in.groups.yahoo.com/group/qtpsudhakar

2 comments :

  1. hi sudhakar,

    i have a webtable row whose style has visibility:hidden. i am not able to get that row using above method..any ideas?

    Thanks

    ReplyDelete
  2. Never mind, i got it after some more research

    ReplyDelete