QTP – Descriptive Programing – Any Web App - Working with Web Check Boxes
OneTestingCenter @ QTP @ Descriptive Programming @ Web Check Boxes @ DP Script
‘@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
‘ Any Web App – Working with Web Check Boxes
‘ QTP – Descriptive Programing – Working with Web Check Boxes
‘@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
Set oWebCheckBox=Description.Create()
oWebCheckBox("micClass").value="WebCheckBox"
Set oPage=Browser("name:=.*").Page("title:=.*")
Set oWebCheckBoxAll=oPage.ChildObjects(oWebCheckBox)
MsgBox "Total Number of Check Boxes on the page are " &vbtab & oWebCheckBoxAll.Count
For i= 0 to oWebCheckBoxAll.Count-1
msgBox "Check Box Name" &vbtab & i &vbtab & oWebCheckBoxAll(i).GetROProperty("value")
' oWebCheckBoxAll(i).Set "ON"
oWebCheckBoxAll(i).Set "OFF"
wait(2)
Next
Set oPage=Browser("name:=.*").Page("title:=.*")
oPage.WebCheckBox("value:=Technology,10,").Set "ON"
'oPage.WebCheckBox("value:="& WebCheckBoxName).Set "ON"
‘@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
‘ Any Web App – Working with Web Check Boxes
‘@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
0 comments:
Post a Comment