08-21-2012, 04:22 PM
hi all
i m getting this error while running this code
thanks
sia
i m getting this error while running this code
thanks
sia
Code:
A = Browser("Justdial").Page("Justdial").WebElement(DataTable("categories", dtGlobalSheet)).GetROProperty("innertext")
msgbox A
If A.Exist Then
Reporter.ReportEvent micPass,"pass","category found 1"
else
Browser("qpr").Page("qpr").Link("2").Click
If A.Exist Then
Reporter.ReportEvent micPass,"pass","category found 2"
else
Browser("qpr").Page("qpr").Link("3").Click
If A.Exist Then
Reporter.ReportEvent micPass,"pass","category found 3"
else
Browser("qpr").Page("qpr").Link("4").Click
If A.Exist Then
Reporter.ReportEvent micPass,"pass","category found 4"
else
Browser("qpr").Page("qpr").Link("5").Click
If A.Exist Then
Reporter.ReportEvent micPass,"pass","category found 5"
else
Reporter.ReportEvent micFail,"invalid","category not found"
End If
End If
End If
End If
End If