The below code is working perfectly.
Code:
Expected = "Raj"
For i=0 to 10
Actual = Browser("Browser").Page("Page").WebTable("WebTable").GetCellData(i,5)
ActualSplit = Split(Actual,", ")
'print Actualsplit(0)
If Expected = Actualsplit(0) Then
'print "expected=actual"
Set DP = Description.Create
DP("micclass").Value = "WebElement"
DP("class").Value ="T-Jo-auh"
DP("html tag").Value = "DIV"
Set DPChkBox = Browser("Browser").Page("Page").childobjects(DP)
With DPChkBox
print DPChkBox.Count
DPChkBox(i).Click
End With
Set Mouse = CreateObject("Mercury.DeviceReplay")
x=Browser("Browser").Page("Page").WebElement("Delete").GetROProperty("abs_x")
y=Browser("Browser").Page("Page").WebElement("Delete").GetROProperty("abs_y")
Mouse.MouseMove x+5,y+5
Mouse.MouseClick x+5,y+5,LEFT_MOUSE_BUTTON
Else
print "expected<>actual"
End If
Next