QTP Rare Tips II

1. Optional Step in QTP
As we know, lot of times we need to check the existence of the object before continuing to the actual operation  on that object. Here is nice option which will reduce these kind of If(obj.Exist) lines like,

1. OptionalStep.Browser("Mercury Tours").Page("Find Flights").WebList("depart").Select "Paris"

Keep in mind that this OptionalStep considers test objcts only. If Object exists, will do the action otherwise will skip the line and continue.

Drawback:
This OptionalStep can be used only with full test object descriptions like above statement.

1. 'This will not work
2. Dim objPage
3. Set objPage = Browser("Mercury Tours").Page("Find Flights")
4. OptionalStep.objPage.WebList("depart").Select "Paris"
6. 'and You can't use inside with statement
7. With Browser("Mercury Tours").Page("Find Flights")
8.   .WebList("depart").Select "Paris"
9. End With
11. 'If you want to use inside with you should give like,
12. With Browser("Mercury Tours").Page("Find Flights")
13.   .WebList("depart").Select "Paris"
14.   OptionalStep.Browser("Mercury Tours").Page("Find Flights").WebEdit("name").Set "abcd"
15. End With