Saturday, January 16, 2010

Check whether scrollbars exists inside a editor

IF (Browser(Obj).Page(Obj).WebEdit(Obj).FireEvent (“OnMouseOver”, “”,””,0) ) then
Msgbox “ Exists Scrollbar in the Web Editor”
Else
Browser(Obj).Page(Obj).WebEdit(Obj).Exist
Msgbox “ No Scrollbar in the Web editor”
End if
(Or)
MyString = Browser(Obj).Page(Obj).WebEdit(Obj).GoRoPerperties (“Visible items”)
Mystring1 = Browser(Obj).Page(Obj).WebEdit(Obj).GoRoPerperties (“itemscount”)
IF (MyString = MyString1 ) then
Msgbox “ Is Scrollbar is visible ”
Else
Msgbox “ Is Scrollbar is not visible ”
End if

1 comment:

Anonymous said...

What could be an Obj?