Thursday, June 3, 2010

Program to check whether edit box is focused

IF ( Browser(Obj).Page(Obj).Webedit(Obj).Fireevent (“Onmouseover”) then
Msgbox “ Web edit is focused”
Else
Msgbox “ Web edit is not focused”
End if
(OR)
ChkEd = Dialog("Login").WinEdit("Agent Name:").GetROProperty("enabled","visiable")
IF(ChkEd = True) then
Reporter.ReportEvent micPass,"Agent Name Edit Button", "Object is Visiable and Enabled"
else
Reporter.ReportEvent micPass,"Agent Name Edit Button", " Object is not Visiable and Enabled"
End if

No comments: