Dim ObjPage
Set ObjPage=Browser("name:=Brw").Page("title:=Pge")
ObjPage.WebEdit("xpath:=//INPUT[@name='username']").Set "FirstUser"
ObjPage.WebEdit("xpath:=//INPUT[@name='password']").Set "Password"
ObjPage.WebButton("xpath:=//INPUT[@name=Login]").Click
No comments:
Post a Comment