QTP – Descriptive Programing – Examples

QTP – Descriptive Programing – Examples OneTestingCenter @ QTP @ Descriptive Programming @ Start up Script ‘@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ ‘ QTP – Descriptive Programing – Examples ‘@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ 'Browser("MyBrowser").Page("MyPage").WebEdit("MySearchBox").Set "GAReddy" 'Browser("MyBrowser").Page("MyPage").WebButton("btnG").Click 'wait(5) ‘@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ ' Descriptive Programing - without OR ‘@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ ‘@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ '...

Read More

QTP – Descriptive Programing – Any Web App - Working with Web Check Boxes

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...

Read More

QTP - Descriptive Programming - Any Web App - Working with Web List-boxes

QTP - Descriptive Programming - Any Web App - Working with Web List-boxes OneTestingCenter @ QTP @ Descriptive Programming @ Working with Web Lists '@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ 'Any Web App - Working with any list box '@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ Set oPage=Browser("name:=.*").Page("title:=.*") Set oWebList=Description.Create() oWebList("micClass").Value="WebList" oWebList("Html Tag").Value="Select" 'oWebList("Index").Value="0" Set AllWebList=oPage.ChildObjects(oWebList) MsgBox "AllWebList" & vbtab &...

Read More

QTP - Descriptive Programming - Broken Link Checking

OneTestingCenter @ QTP @ Descriptive Programming @ Broken Link Checking ' @@@@@@@@@@@@@@@@@@@@@@@@@@@@ ' QTP – DP - Broken Link Checker tool for Any Web App ‘ Broken Link Check – Descriptive Programing '@@@@@@@@@@@@@@@@@@@@@@@@@@@@ On Error Resume Next Set oPage=Browser("name:=.*").Page("title:=.*") DataTable.AddSheet "dtLinkName" DataTable.GetSheet("dtLinkName").AddParameter "LinkName","" DataTable.GetSheet("dtLinkName").AddParameter "PageTitle","" Set oLink=Description.Create() oLink("micClass").value="Link" Set AllLinks=oPage.ChildObjects(oLink) PageTitle=oPage.GetROProperty("title") MsgBox...

Read More

QTP - Descriptive Programing - Dynamic Object Repository Creation

QTP - Descriptive Programing - Dynamic Object Repository Creation OneTestingCenter @ QTP @ Descriptive Programming @ Dynamic Object Repository Creation ‘@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ ' Create a Dynamic Object Repository for  any Web App – Model 1 '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ‘@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ 'Set oPage=Browser("name:=.*").Page("title:=.*") 'PageTitle=oPage.GetROProperty("title") DataTable.AddSheet "dtAppOR" DataTable.GetSheet("dtAppOR").AddParameter "ObjectNo","" DataTable.GetSheet("dtAppOR").AddParameter...

Read More

QTP - Descriptive Programming - Any Web App - Working with all Objects

QTP - Descriptive Programming - Any Web App - Working with all Objects OneTestingCenter @ QTP @ Descriptive Programming @ Any Web App - Working with all the Objects '@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ ' Any Web App ==> working with all Links '@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ Set oPage=Browser("name:=.*").Page("title:=.*") Set oLink=Description.Create() oLink("micClass").value="Link" Set AllLinks=oPage.ChildObjects(oLink) MsgBox AllLinks.count For i= 0 to AllLinks.count-1 msgBox i & vbtab & "LinkName" & vbtab...

Read More

QTP - Descriptive Programming - Working with Any Web App

QTP - Descriptive Programming - Working with Any Web App OneTestingCenter @ QTP @ Dynamic Descriptive Programming @ Any Web App Testing '@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ '@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ 'Working with any app - Part 1 'Click on Link 'Set Text On Edit Box 'Click on Button  ‘ Select a list item '@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ Set oPage=Browser("name:=.*").Page("title:=.*") AnyWebAppTesting oPage,"WebEdit","email","GAReddy" AnyWebAppTesting oPage,"WebEdit","passwd","GAReddy" AnyWebAppTesting...

Read More