Thursday, July 4, 2013

Working with WebButton

'Working With WebButton

SystemUtil.Run "iexplore", "http://youngistaancafe.blogspot.com/2013/07/student-registration-formhtml.html"

Set oWebButton = Description.Create 'This line is used to create description object
oWebButton("micclass").Value = "WebButton"  'This line is used to identify the property.( In our case its link)
Set oWebButtonCount = Browser("name:=Youngistaan Cafe: Student Registration Form.html").Page("title:=Youngistaan Cafe: Student Registration Form.html").ChildObjects(oWebButton)  'This line is used to return the childobjects having 'WebButton object' description.
vrCount = oWebButtonCount.Count 'This line is used get number of buttons on a webpage
MsgBox vrCount

For i=0 to vrCount-1
                Button_Name = oWebButtonCount(i).GetROProperty("name")
    MsgBox  "Button: " &Button_Name 

Next

No comments:

Post a Comment