' get the app object
Set appObj = Browser("Welcome To Nexaweb").Page("Welcome To Nexaweb").JavaApplet("DefaultJvmDetector").Object.getScriptObject()
' get the table object
Set tableObj = appObj.findObjectById("EditTable")
' select some cells
tableObj.selectCellAt 1, 1
tableObj.selectCellAt 2, 0
tableObj.selectCellAt 2, 1
' double click on a cell to put it into edit mode
tableObj.doubleClickCellAt 0, 1
' enter new text by using app object fireKeys() and fireKey()
appObj.fireKeys("A new value")
appObj.fireKey("Enter")
' navigate through table with arrow keys
appObj.fireKey("Down")
appObj.fireKey("Down")
appObj.fireKey("Left")
' edit cell using table obj edit cell
tableObj.editCellAt 0, 1, "Something else"
' get cell that was just edited
Set obj = tableObj.getObjectAt( 0, 1 )
' test the text of the cell that was edited
cellText = obj.getText()
if( cellText <> "Something else" ) then
Reporter.ReportEvent micFail,"Edit Cell", "Expected text to be 'Something else'. Text was actually " + cellText
End if
Reporter.ReportEvent micPass,"Edit Cell", "Cell was edited correctly"
