Quick Test Professional Tutorials

Write a Script to open an excel workbook through VB Scripting

2011-02-15T13:13:00.002+05:30

The below vb script will open an excel work book for which the path is mentioned.
set xl = CreateObject("Excel.Application")
xl.visible = true
set wb = xl.workbooks.open("C:\test.xls")
wb.close
xl.quit

Child Objects in QTP scripts with examples

2010-09-09T13:24:00.002+05:30

Many at times in Scripting we come across scenarios where we need to count the objects in the application or even highlight a child object like highlighting a text box or check and uncheck check boxes using scripting in QTP.

Below are some of the examples where in you can do different actions. For our example we are using Flight Reservation application as reference.

'Script to count the number of child objects of flight reservation application
Set chd_obj = Dialog("text:=Login").ChildObjects
msgbox chd_obj.count

'Script to highlight all the child objects in Login dialog of flight reservation application
Set chd_obj = Dialog("text:=Login").ChildObjects
For i = 0 to chd_obj.count - 1
chd_obj(i).Highlight
Next

'Script to highlight all the child objects(buttons) in Login dialog of flight reservation application
Set button_obj = Description.Create
button_obj("nativeclass").Value = "Button"

Set chd_obj = Dialog("text:=Login").ChildObjects(button_obj)
For i = 0 to chd_obj.count - 1
chd_obj(i).Highlight
Next

'Script to check and uncheck all the check boxes in open order dialog box of flight reservation application
Set checkbox_obj = Description.Create
checkbox_obj("Class Name").value = "WinCheckBox"

Set chd_obj = Window("text:=Flight Reservation").Dialog("text:=Open Order").ChildObjects(checkbox_obj)
For i = 0 to chd_obj.Count - 1
chd_obj(i).Set "ON"
chd_obj(i).Set "OFF"
Next

Write a Script to delete all the spam mails in Gmail

2010-08-05T17:47:00.004+05:30

We will write a script in QTP for deleting all the spam mails in Gmail Account. What we will do is first we will get the innertext of the Spam Link using GetROProperty so that if there are no spam mails then we will exit the test using ExitTest method or can use ExitAction method if we want to only exit that particular action.

If there are spam mails then we will count the unread spam mails and then display it to the user and then delete all the spam mails by checking all the check boxes and clicking the delete forever button. To check all the check boxed we will create a description object and add properties to it WebCheckBox Property. We will use the Childobjects method to get all the checkboxes and using the count method we will get the number of checkboxed. By using a For loop we will set the Checkbox to On so that all will be selected and then click the Delete Forever button to delete the mails.

'Script to Delete spam messages from Gmail
'First get the spam count. if there are no spam mails then exit test
'using GetROProperty to get the innertext of the Spam Link

spamct = browser("title:=Gmail.").Page("title:=Gmail.").link("innertext:=Spam.").GetROProperty("innertext")

'Checking whether spam mails are there or not

If spamct = "Spam" Then
Print "No spam Mails"

'Since there are no spam mail you can exit Test or Exit Action. Based on users decision

ExitTest

'If spam mails are present then we will enter the else part

Else

'we will take the innertext of Spam link and remove all the unnecessary characters and print only the spam count.

spamcount = Replace(spamct, "spam", "") 'replacing the spam word with space
spamcount = Trim(spamcount)
spamcount = Replace(spamcount, "(","")
spamcount = Replace(spamcount, ")","")

'Printing the number of spam mails to the user

print "You have "&spamcount& " unread spam mails and all the available spam mails will be deleted forever"

'clicking on the spam link

Browser("title:=Gmail.").Page("title:=Gmail.").sync
Browser("title:=Gmail.").Page("title:=Gmail.").link("innertext:=Spam.").Click

'Creating a description object for check boxes

Set abc_obj = Description.Create
abc_obj("micclass").Value = "WebCheckBox"

'Getting the childobjects i.e Checkboxes

Set browser_checkbox = Browser("title:=Gmail.").Page("title:=Gmail.").childobjects(abc_obj)

'using a for loop to set the check boxes to on position i.e selecting them

For i = 0 to browser_checkbox.Count - 1
browser_checkbox(i).Set "ON"
Next

'Clicking on the delete forever button to delete the spam mails

Browser("title:=Gmail.").Page("title:=Gmail.").webElement("innertext:=Delete forever","index:=.").Click

'using windows script host environment to make sure that the delete forever button is clicked

Set wsh = CreateObject("wscript.Shell")
wsh.sendkeys ("{Enter}")

End If

Description Object in QTP (Description. Create)

2010-08-03T17:04:00.002+05:30

We will look at Description Objects (Description. Create in QTP) which is very important in Descriptive programming in QTP. In Descriptive programming we can create object with description being a single property or multiple properties. We actually put a collection of properties for an object. We can create and empty object and place all the required properties in it. This object can be used instead of the actual object.

We will see how to create a Description Object

Set Desc = Description.Create

We are actually using a variable called Desc and add properties to the variable using the Description.Create method. The variable Desc should follow a Set statement and the variable Des is an object reference.

Let us look at the Flight Reservation Application and create some Description objects for logging in to the Flight Reservation Application.

'script to login flight reservation using dynamic descriptive programming

Set dialog_login = Description.create
dialog_login("text").value ="Login"

Set edit_agentname = Description.Create
edit_agentname("attached text").value = "Agent Name:"

Set edit_password = Description.Create
edit_password("attached text").value = "Password:"

Set button_ok = Description.Create
button_ok("text").value ="OK"

Dialog(dialog_login).Activate
Dialog(dialog_login).WinEdit(edit_agentname).Set "Ravi"
Dialog(dialog_login).WinEdit(edit_password).Set "mercury"
Dialog(dialog_login).WinButton(button_ok).Click

In the above code we are actually using the properties and values and creating the objects and using them instead of the actual objects. This kind of method is very easy and maintainable because there is always a scope of adding new properties and values to the Description objects.

The other way to login in to the Flight Reservation Application is by simply putting in the properties and values in the script it self instead of creating description Objects. Instead of learning the objects into the object repository we use the associated properties and values of the object and directly pass them.

Look at the simple script using descriptive programming.

'Descriptive programming to login to the flight application.

Dialog("text:=Login").Activate
Dialog("text:=Login").WinEdit("attached text:=Agent Name:").Set "Ravi"
Dialog("text:=Login").WinEdit("attached text:=Password:").Set "mercury"
Dialog("text:=Login").WinButton("text:=OK").Click

Write a script to delete the mails in the Trash Folder in Gmail Account?

2010-07-30T11:46:00.002+05:30

We can write a script to delete all the trash mails in the Gmail Account. First we need to Click the Trash link then click the all link in the trash mail page so that all the available mails in the table are checked and then we need to click the Delete Forever button. I have faced a problem when clicking on the All Link because when the All link is clicked it is actually selecting all the mails in the Inbox because the objects used like Select: All, None, Read, Unread, Starred, Unstarred are being used the same. So I faced a little problem but we can solve that by using object repository for that particular line of code.

If the below script is unable to run then use the other script given below and also learn the objects into the repository specially the Trash Link and the All Link in Gmail. Please look at the Object Repository Image below.

Please note that you need to be logged in to the Gmail Account to successfully run the below scripts.

First Method to delete the trash mails from Gmail Account:

Browser("title:=Gmail.").Page("title:=Gmail.").Link("text:=Trash", "class:=n.").Click
Browser("title:=Gmail - Trash.").Page("title:=Gmail - Trash.").Sync
If Browser("title:=Gmail - Trash.").Page("title:=Gmail - Trash.").WebElement("innertext:=Empty Trash.", "html id:=:.").Exist(1) Then
Browser("title:=Gmail - Trash.").Page("title:=Gmail - Trash.").WebElement("innertext:=All", "Index:=.*").Click
Wait 2
Browser("title:=Gmail - Trash.").Page("title:=Gmail - Trash.").WebElement("innertext:=Delete forever","index:=.").Click
Else
Print "You are not in proper page"
End If
Set wsh = CreateObject("WScript.Shell")
wsh.SendKeys ("{ENTER}")

If the above script does not work then you need to add objects to the repository and then use this script. We use Windows Script Host because we need to explicitly tell QTP to Click the Delete Forever Button which otherwise some times does not work so in order to resolve this issue we need to create a variable to interact with the Windows Script Host Library. We are also using the Reporter.ReportEvent method to return a pass or fail to the test result whether the messages are deleted or not.

Second Method to delete the trash mails from Gmail Account:

Browser("Gmail").Page("Gmail").Frame("frame").Link("Trash").Click
If Browser("Gmail").Page("Gmail").Frame("frame").Webtable("No conversations in the").Exist (1) Then
Reporter.ReportEvent micPass, "No messages", "There are no messages to be deleted"
Else
Browser("Gmail").Page("Gmail").Frame("frame").WebElement("All").Click
Browser("Gmail").Page("Gmail").Frame("frame").WebElement("Delete forever").Click
Set wsh = CreateObject("wscript.shell")
wsh.sendkeys ("{Enter}")
Reporter.ReportEvent micPass, "Deleted", "All the selected messages are deleted"
End If

The Object repository should learn these objects from the Application in order to run the above script.

Write a Script in QTP to count the no of buzz messages in a Gmail Account.

2010-07-29T17:17:00.002+05:30

We will need to use the GetROProperty method to get the count of the buzz messages in the Gmail Account for a user and this number is dynamic so we use the GetRoProperty method and get the innertext value. We will use the GetROProperty (Get Run Time Object Property) to get the count of the Buzz Messages ex Buzz (25) and then replace Buzz, (,) with a null and then print only the number to the user.

'You need to be logged into the Gmail account
Browser("title:=Gmail.").Page("title:=Gmail.").Link("innertext:=Buzz.","class:=n.").Click
'To get the innertext of Buzz link
buzzcount = Browser("title:=Gmail.").Page("title:=Gmail.").Link("innertext:=Buzz.","class:=n.").GetROProperty("innertext")
If buzzcount = "Buzz" Then
Print "No Buzz Messages"
ExitAction
Else
buzzct = Replace(buzzcount, "Buzz","")
buzzct = Rtrim(ltrim(buzzct))
buzzct = Replace(buzzct, "(","")
buzzct = Replace(buzzct,")","")
Print "You have "&buzzct& " Buzz Messages."
End If

Write a Script in QTP to count the unread emails of a gmail account.

2010-07-29T16:57:00.002+05:30

In order to count the unread emails of a gmail account you need to be logged into the Gmail account and then run this script which will count all the unread email and display the no of unread emails. We will use the GetROProperty (Get Run Time Object Property) to get the no of unread emails ex Inbox (25) and then replace Inbox, (, ) with a null and then print only the number.

The reason for us to use the GetROProperty on the Inbox Link is that the count of unread mails is dynamic and so we need to get the innertext and print the unread emails. So no matter you run any number of times you will get the exact number of unread emails in gmail account. If no unread emails are there then it will print a message saying " No Unread Emails" else it will print "You have xxx unread emails in your inbox"

'You need to be logged into the Gmail account
Browser("title:=Gmail.").Page("title:=Gmail.").Link("innertext:=Inbox.").Click
Browser("title:=Gmail.").Page("title:=Gmail.").Sync

'To get the innertext of inbox link
inboxcount = Browser("title:=Gmail.").Page("title:=Gmail.").Link("innertext:=Inbox.").getroproperty("innertext")
If inboxcount = "Inbox" Then
Print "No Unread Emails."
ExitAction
Else
emailcount = replace(inboxcount, "Inbox","") 'replaces inbox with space
emailcount = Rtrim(ltrim(emailcount)) 'removes all the spaces
emailcount = replace(emailcount, "(","")
emailcount = replace(emailcount, ")","")
Print "You have "&emailcount& " unread emails in your inbox."
End If

Write a Script to Login in to Gmail Account using QTP?

2010-07-29T16:07:00.006+05:30

We will write a script to login to a Gmail Account. This QTP Script to log into Gmail Account is a Generic one. There is no need for us to have Object Repository since I am using Descriptive Programming. Where we use the properties and the values to identify the run time object in the Application under test.

We will write a descriptive program to login to Gmail Account. What I am doing is that each of the script contains a line of code to launch Gmail Application and then log into the application

To launch the Gmail application we need to use QTP reserved object like Systemutil or can interact with the Internet Explorer library and launch gmail. After launching the Gmail Application we have the script to login to the account by passing username and password. We will be printing the result at each step to see how the application is behaving

Systemutil.Run "http://www.gmail.com"

Or

'Launching Internet Explorer and Opening Gmail Application
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
IE.Navigate "http://www.gmail.com"

'We will use the sync method to wait till Gmail opens
Browser("Title:=Gmail.").Page("title:=Gmail.").Sync

'Script to set username and password to login
Browser("Title:=Gmail.").Page("title:=Gmail.").WebEdit("name:=Email").Set "xxxxxx"
Browser("Title:=Gmail.").Page("title:=Gmail.").WebEdit("name:=Passwd").Set "yyyyyy"
Browser("Title:=Gmail.").Page("title:=Gmail.").WebButton("name:=Sign in").click
Browser("Title:=Gmail.").Page("title:=Gmail.").Sync
If Browser("Title:=Gmail.").Page("title:=Gmail.").Link("innertext:=Sign out", "html id:=:.").Exist(1) Then

'Print a Pass message for the user if logged in
Print "User " &Username& " is successfully Logged in"
Else If not Browser("Title:=Gmail.").Page("title:=Gmail.").Link("innertext:=Sign out", "html id:=:.").Exist(1) Then

'Print a Fail message for the user if not able to log in and terminate the action
Print "User " &Username& " is not able to Login in"
Print "The Test has been terminated"
ExitAction
End If
End If

What is a Virtual Object and it helps in solving Object Recognition Problem in QTP ?

2010-07-28T13:58:00.001+05:30

Virtual Objects comes into picture if QTP is unable to recognize an object and we often see errors as Object not found. This is because even thought you have recorded the actions during playback time QTP is unable to recognize an object and because of which the script fails.

Virtual Objects in QTP are created to resolve the object recognition problems in QTP. When an area of an application is not recognized by QTP we use the Virtual Object Wizard to map the area to a standard Class. These virtual objects are generally used to resolve the object recognition problems. All the Virtual Objects created are stored in the Virtual Object Manager. After we have learned an object as a Virtual Object we can record on that object successfully. You can create a Virtual Object by navigating to Tools, Virtual Objects, New Virtual Object.

Points to Note:

1. We cannot use object spy on a Virtual Object.
2. We can only record on Virtual Objects.
3. Scroll Bars and Labels cannot be treated as Virtual Objects.

In order to disable the Virtual Objects Navigate to Tools, Options, General, Check the check box for "Disable Recognition of Virtual Objects While Recording"

When Object recognition Problem occurs in QTP during playback on the Application Under test there are ways to handle this Object Recognition Problem. It depends solely on the user as to what they want to use.

The different ways to handle Object Recognition Problem are:

1. By Creating Virtual Objects.
2. Using Low Level Recording.
3. Using Analog Recording.

Creating a MS Word Document using QTP 9.2

2010-07-27T12:53:00.001+05:30

Creating a MS Word Document in QTP is not difficult but is very easy and one needs to know how to use the Word Application in QTP.

It is very easy to create a MS Word Document using QTP. There is no need to invoke the MS Word application in QTP but we require to use the Word Library by using the CreateObject method. If you have word on Excel Application in QTP then it is more or less similar working with Word Library. I will show a sample script to create a word document and also add some text to the word Document.

Script to create a Word Document in QTP

Set wordapp = CreateObject("Word.Application")
wordapp.visible = True
wordapp.documents.Add
wordapp.Selection.TypeText "This is a sample document"
wordapp.ActiveDocument.SaveAs "E:\testdoc.doc"
wordapp.Quit
Set wordapp = Nothing

We are using Wordapp.Visible = true because we want the application to be visible for the user while the text is being written to the Word Document. TypeText property is used to write the text in the word document. In order to save the document we use ActiveDocument menthod because in case if there are other word document already opened then the active document will be saved.

Recovery Settings in QTP

2010-07-05T17:47:00.002+05:30

Recovery scenario comes into picture when you want to handle some exception in the test by creating a Recovery scenario. Now to add this recovery scenario to a test we need to associate it in the test Settings.

You need to navigate to File > Setting > Test Settings >Resources.

You can add the recovery scenario file .qrs by clicking the + button and checking the check button in the list pane for a particular recovery file and also can activate the recovery scenario for which you want like Never, On every Step or On error.

You can also edit the recovery scenario by clicking the edit button.

Environment Settings in QTP

2010-07-05T17:44:00.002+05:30

User Defined Environment Variables in QTP

Environment Variables in QTP are the utility objects of QTP which enables us to work with Environment Variables. In the Test Settings we can add user defined Environment Variables for a particular test or can also load an environment XML file to a test.

You need to Navigate to File > Settings > Test Settings > Environment

User defined variables are of two types Internal and External. Internal Environment variables can be modified or deleted while External Environment variables are Read only.

In this setting we can add environment variables by clicking the + button which pops up a dialog box where in you can enter the name of the variable and the value of the variable and will be displayed in Black color and the type would be displayed as Internal and you have full control over these kinds of variables. You can modify or delete these variables.

You can create an external XML file of all the user defined environment variables to an XML file listed in the pane by clicking the export button.

In order to load environment variables from an external XML file you need to check the check button of Load variables and values from external file and click the browse button of the File Text Box and select the XML file from the desired location. All the environment variable will be listed and will be in Blue color and are read only.

Built in EnvironmentVariables Settings in QTP

2010-07-05T17:41:00.002+05:30

Environment Variables in QTP are the utility objects of QTP which enables us to work with Environment Variables. Here in this tab you have two settings one is Built in and user Defined.

You need to Navigate to File > Settings > Test Settings > Environment

Built in Environment Variables:

Built in environment settings in QTP is where you will be shown a list of all built in environment variables of QTP and their description. These are read only.

Resources Settings in QTP

2010-07-05T17:38:00.001+05:30

Associating Function Libraries to a QTP Test is very important as it is associated from an external location and since we use frame work each of the test script is broken down into different functions and there should be a way to associate them to a test. The Resource Tab in Test Settings helps you to do this.

You need to navigate to File > Settings > Test Settings > Resources.

Here we will look at the various options available for user to set under resources in QTP while running a test.

Here you can associate function libraries to QTP test by clicking the + sign and select the location from where you want to add. In order to delete a library file select that file from the list and click the Delete button i.e X button. You can arrange the function library files by using the up and Down key.

It also provides a means to check the syntax of the files associated by clicking the Check syntax Button.

There is a means to associate a data table from other location i.e Excel sheet for passing values as parameters to the test from default location or from any other location.

Run Settings in QTP

2010-07-05T17:33:00.002+05:30

Test Settings in QTP is very vital as it provides a lot of settings for a test and allows you to control the way QTP should run.

You can customize the settings of QTP for each test by navigating to File > Settings > Test Settings > Run.

Here we will look at the various options available for user customize Run Settings in QTP while running a test.

Run one iteration only: The test will run only for one time.

Run on all rows: The test will run on all rows

When error occurs during run session combo has these options

1. Pop up message box
2. Proceed to next action iteration
3. Stop Run
4. Proceed to next step

Check box items are:

Object synchronization time out text box with 20 sec as default.

Disable smart identification during run session

How to compare two xml files using CreateXMLfromFile Method

2010-06-23T10:17:00.001+05:30

In order to compare two xml files in QTP we use the "XMLUtil Object" which is used to access and return XML objects.The Associated Methods for this object is CreateXML Method & CreateXMLfromFile Method.

1. CreateXML Method: This method is used to create and return an object of the type XMLData. If a root name is specified i.e path of the xml file, a new document is created containing the specified root tag.

2. CreateXMLFromFile Method: This method is used to create and return an object of type XMLData

Example: Below is an example which creates an XML object and uses it to load an XML file.

CreateXML Method

Set XMLObj = XMLUtil.CreateXML()
XMLObj.LoadFile("E:\Environment.xml")

Using this method we will write a script to compare two xml files and return the result in a result.xml file.

'assigining the path of the xml file to a variable

xmlFile1 = "E:\Perspectives_FrameWork\Environment.xml"
xmlFile2 = "E:\Perspectives_FrameWork\Environment 1.xml"

'Creates and returns an object of type XMLData

Set objxml1 = XMLUtil.CreateXML()
Set objxml2 = XMLUtil.CreateXML()

'Loading the c=xml file

objxml1.LoadFile (xmlFile1)
objxml2.LoadFile (xmlFile2)

' Comparing the two xml files and setting the value either 1 or 0 to the variable
Result = objXML1.compare(objXML2, objResultsXML)

If Result = 1 Then
MsgBox "XML Files Match"
Else
MsgBox "XML Files do not match"

'saving the result xml file

objResultsXML.savefile ("E:\results.xml")

End If

CreateXMLfromFile Method

This method is used to create and return an object of type XMLData

Example: Below is the example given which creates an XML object and loads the XML file Environment.xml into it.

Set XMLObj = XMLUtil.CreateXMLFromFile("E:\Environment.xml")

Below is the script to compare two xml files named Environment and Environment 1.

' using a CreateXMLfromFile Method creates an XML object and loads the XML file specified into it

Set objxml1 = XMLUtil.CreateXMLFromFile("E:\Perspectives_FrameWork\Environment.xml")
Set objxml2 = XMLUtil.CreateXMLFromFile("E:\Perspectives_FrameWork\Environment 1.xml")

' Comparing the two xml files and setting the value either 1 or 0 to the variable

Result = objXML1.compare(objXML2, objResultsXML)

If Result = 1 Then
Msgbox "XML Files Match"
Else
Msgbox "XML Files do not match"
objResultsXML.savefile ("E:\results.xml")
End If

How to associate Function Libraries to a Test in QTP using Script?

2010-06-21T13:07:00.001+05:30

Associating function libraries to a test in QTP is with respect to user defined functions which means either you or some one else are the owners of the functions and have rights to manage those functions. When it comes to writing scripts and running the test and that too in a frame work architecture every script is converted in to a function and relevant functions are called into the test script.

Functions in this context is the user defined and associating the function libraries to a test in QTP is by the two mentioned methods.

1. Using the feature of QTP
2. Using a Script.

Associating a Function Library using a Script

Step 1: Convert a script into a function, pass the necessary arguments, prepare the appropriate documentation for the function.

Step 2: Cut the function from the main script and open a note pad and paste the function in to the note pad and save it as a .vbs file in the appropriate folder.

Let us take the previous example of invoking/Login into the Flight Reservation application. We will create a library function called Login_FR and associate the function into QTP and it can be viewed by navigating to Resources and Associated Library Functions. When this is done you can just simply put the function call into the main script and run the test and you can see that QTP passes the username and password into the Flight Reservation application and you main script will have only one line of code and creating functions is useful for maintenance of the scripts.

Public Function LoginFR(byval username, byval password)

Dialog("Login").Activate
Dialog("Login").WinEdit("Agent Name:").Set username
Dialog("Login").WinEdit("Password:").Set password
Dialog("Login").WinButton("OK").Click

End Function

What you will do is cut this function from the main script and paste it in a note pad and save it as Login_FR.vbs

Associate Function Libraries to a Test in QTP 9.2

2010-06-21T12:53:00.000+05:30

Associating function libraries to a test in QTP is with respect to user defined functions which means either you or some one else are the owners of the functions and have rights to manage those functions. When it comes to writing scripts and running the test and that too in a frame work architecture every script is converted in to a function and relevant functions are called into the test script.

Functions in this context is the user defined and associating the function libraries to a test in QTP is by the two mentioned methods.

1. Using the feature of QTP
2. Using a Script.

Using the feature of QTP

In order to associate a function library using the feature of QTP we need to navigate to the desired feature of the QTP

File -> Settings -> Resources

To associate a function library you need to click the + sign which is for adding function library files from external location.

Viewing the Associate Function

In order to view the associated function library for the test you need to navigate in this manner

Resources -> Associated Library Functions

You can see the associated function which you have just now added to the test.

What is Update Run Mode in QTP

2010-06-18T15:59:00.000+05:30

Update Run Mode updates the test object description, Checkpoints properties, active screen images and values.

How to navigate to update run mode?

1. Automation -> Update Run Mode

2. Object Repository ->Update from Application. This updates the properties of objects of the application which are recorded.

2. Click update run mode button next Stop button in the tool bar.

When the Smart Identification properties are configured then click update run mode and then click run the properties and values will be updated in the object repository.

If you have not installed Microsoft debugger then update run mode feature will be disabled in QTP and for this you need to make changes in the Object Identification Dialog Box as mentioned in the previous post.

What is Smart Identification in QTP and explain it

2010-06-18T15:29:00.000+05:30

Smart Identification is a unique feature of QTP that comes into picture if the following conditions are satisfied.

1. When Normal Object Identification Fails

2. When the Enable Smart Identification check box is checked in the Object Identification Dialog Box.

Smart Identification (SI) works on the principle of filtration.

When the check box is selected and the configure button is clicked another dialog box is opened where you can set the Base Filter properties which are mandatory and Optional Filter Properties based on which the object is identified. When the properties are configured in the Smart Identification mode then the properties are not changed in the object repository for that object for this we need to run the script/test in Update Run Mode.

If you feel that this also failed then you can use one more property of Smart Identification known as "Ordinal Identifier" which makes use of the two types of properties for object identification. They are

1. Index
2. Location.

QTP traces the location of the object and assigns a unique Id which can be used for object Identification.

If all these fails for Object Identification then the only solution is to do descriptive programming.

Explain the what does "createobject" mean with an example

2010-06-17T14:39:00.000+05:30

CreateObject creates an object to interact with the specified library.

For Example If we want to interact with internet explorer to launch IE then we use create object and the library name.

Set IE CreateObject("InternetExplorer.Application")
IE.visible True
IE.Navigate http://www.google.com

Here IE is an object which is created to interact with the Internet Explorer Library.

Like wise for any library

Set xlapp CreateObject("Excel.Application")
Set QTapp CreateObject("QuickTest.Application")

What is the difference between a check point and output value?

Checkpoint compare the expected result of the Test object with the Actual result from the run time object and returns a pass or fail to the test result.

Output value retrieves the value of an Run Time object and returns to the test result.

Differentiate the Local Object Repository and Shared Object repository types of QTP

2010-06-17T14:37:00.000+05:30

There are two types of Object Repositories in QTP namely

1. Local Object Repository (.mtr)
2. Shared object Repository (.tsr)

1. Local Object Repository : Local Object Repository is for that particular action i.e you have learned objects into the repository for that test or action and you have the privilege to edit the object properties and values and this is stored in that test file. you cannot use this repository with other tests.

2. Local Object Repository : Shared Object Repository is a global repository which can be used by any test. Its like a centralized placed where all information about the objects are stored and can be associated to any test. The advantage of Shared Object Repository is that for multiple actions or test you can use the same Object Repository and this has to be associated to the current test or action so that the object identification takes place.

When you associate a shared object into your current test then all the objects will be read only and you cannot make any changes to the object properties and by enabling editing you can make changes to the repository but if you want to save the repository then you have to save as a new copy.

What is the command in QTP to invoke IE Browser?

2010-06-17T14:32:00.002+05:30

To Invoke Browser in QTP there are three ways to invoke IE browser and launch a website from QTP. To be very specific to your question to invoke only IE browser in QTP you can do it but it will only open a blank IE browser. In order to do this you need to use the method called as "InvokeApplication"

Syntax

InvokeApplication "Path"

Example

Invokeapplication "C:Program Files\Internet Explorer\iexplore.exe"

Invokeapplication "C:Program Files\Mercury Interactive\QuickTest Professional\bin\QTPro.exe" 'This will invoke QTP.

There are other ways to Invoke browser in QTP and also a particular web site like google.com

1. We will use the "SystemUtil" object associated with a "Run" method

Syntax

SystemUtil.Run "url"

Example

SystemUtil.Run http://www.google.com

Here when you run this line of code systemutil.run executes a method called run by which the IE browser is opened and also the url mentioned is launched. This is useful when you want QTP to directly launch the website you want in a single step.

2. When you want to invoke IE and then launch a url through script you can use the object function library.

Set IE CreateObject("InternetExplorer.Application")
IE.Visible True
IE.Navigate http://www.google.com

How to execute a qtp script from command prompt?

2010-06-17T14:23:00.000+05:30

It is very much possible to launch a QTP test from Command prompt and then run it. The script to open QTP and then load the test into QTP and run the test is given in the "Quick Test Automation reference" file which is given in the Documentation Folder.

The path to get the file and the code is "C:Program FilesMercury InteractiveQuickTest ProfessionalhelpAutomationObjectModel.chm"

I have taken this script from this file and changed the path of my test to be loaded and saved the file as a .vbs and executed it from the command prompt.

The script is given below for quick reference

Dim qtApp 'As QuickTest.Application ' Declare the Application object variable
Dim qtTest 'As QuickTest.Test ' Declare a Test object variable
Dim qtResultsOpt 'As QuickTest.RunResultsOptions ' Declare a Run Results Options object variable

Set qtApp = CreateObject("QuickTest.Application") ' Create the Application object

qtApp.Launch ' Start QuickTest
qtApp.Visible = True ' Make the QuickTest application visible

' Set QuickTest run options

qtApp.Options.Run.ImageCaptureForTestResults = "OnError"
qtApp.Options.Run.RunMode = "Fast"
qtApp.Options.Run.ViewResults = False
qtApp.Open "E:\Test Scripts\actiTIME FunctionCalls Script", True ' Open the test in read-only mode

' set run settings for the test

Set qtTest = qtApp.Test

qtTest.Settings.Run.IterationMode = "rngIterations" ' Run only iterations 2 to 4
qtTest.Settings.Run.StartIteration = 2
qtTest.Settings.Run.EndIteration = 4
qtTest.Settings.Run.OnError = "NextStep" ' Instruct QuickTest to perform next step when error occurs

Set qtResultsOpt = CreateObject("QuickTest.RunResultsOptions") ' Create the Run Results Options object

qtResultsOpt.ResultsLocation = "E:\Test Scripts\actiTIME FunctionCalls Script\Res1" ' Set the results location
qtTest.Run qtResultsOpt ' Run the test
MsgBox qtTest.LastRunResults.Status ' Check the results of the test run
qtTest.Close ' Close the test

Set qtResultsOpt = Nothing ' Release the Run Results Options object
Set qtTest = Nothing ' Release the Test object
Set qtApp = Nothing ' Release the Application object

For this you should have created a test with some actions in QTP and saved it then you need to specify the path of the test correctly at qtapp.Open

Save this file in a desired location with a .vbs extension.

Launch command prompt by going to run and type cmd and click enter.

The command prompt is visible. Since i store this .vbs file in E drive i have changed the directory in command prompt to E drive

C:\>E: and press enter

E:\> "This will be displayed" now enter the vbs file and click enter

E:\>testrun.vbs and clicked enter

Now the QTP will automatically launch load the specified test and runs it and gives you a message box prompt saying passed after the test is completed.

When QTP throws "verify that parent properties match an object currently displayed in your application." How to resolve issue

2010-06-17T14:20:00.000+05:30

The reason for QTP throwing this error "verify that parent properties match an object currently displayed in your application." is that when the test is running the object identification could not happen i.e the object property and values of the test object while recording and the runtime object properties and Values did not match and hence the error was thrown.

When ever there is an object identification problem QTP throws these kinds of errors.

To resolve this you need to open the Object repository and locate the object which throws the error and click the "Highlight in Application" icon and see whether that object is identified in the application under test. If identified then there is a problem in the script. You have to correct the script to see whether the methods associated with the object is correct or not.

If the object is not highlighted in the AUT then try adding that object from the application to the repository and run the test. If the objects are dynamic then you need to use regular expressions for that property.

If you are using Descriptive programming then see that the properties given for that object are correct or not.

To sum it up QTP throws these kind of errors when the Object is not identified during run time. Its an Object Identification Problem. There are ways to handle this if normal identification does not resolve the problem. Use Smart identification where you can set the Base filter values and optional Filter values and also Ordinal Identifiers where in you can set the Index or location of the object.

How to capture dynamically changing data in web page through scripting in QTP along with any sample working code

2010-06-17T14:11:00.000+05:30

To capture the value of a dynamic object in a web application GetROProperty method is executed. In order to capture the value of an object and that too of a dynamic object then we will use the GetROProperty which means Get Run Time Object Property and we need to decide which property we want to capture. This can be text innertext etc.

I would list down a sample code for gmail to count unread emails from any account.

Since the inbox count is dynamic and ever changing from account to account i have used descriptive programming so that this piece of code can be run for any gmail account.

The prerequisite is that you log in to your gmail account and then run this script

This script prints the number of unread emails in the inbox.

inboxcount = Browser("title: Gmail.").Page("title: Gmail.").Link("innertext: Inbox.*").getroproperty("innertext")
If inboxcount = "Inbox" Then
Print "No Unread Emails"
ExitAction

Else

emailcount = replace(inboxcount, "Inbox","") 'replaces inbox with space
emailcount = trim(emailcount) 'removes all the spaces
emailcount = replace(emailcount, "(","")
emailcount = replace(emailcount, ")","")

Print "You have "&emailcount& " unread emails in your inbox"

End If

How to convert a local object repository into a shared object repository?

2010-06-04T12:59:00.000+05:30

If we are working in a frame work environment then creation of Local Object Repository will create object identification issues when different people want to use the same script on a different machine you recorded or wrote and if the objects in your script are from the local object repository then identification problem persist. The solution to this is to create the learn the objects to the repository using the shared object repository. If you already created the local object repository and you want to convert it into a shared object repository then QTP provides way to convert it thus making it a shared object repository and different users can use the object repository.

Step 1: Open Object Repository either by navigating to Resources > Object Repository or by clicking Ctrl+R. The "Object Repository > All Object Repositories" window will be open with the object’s loaded.

Step 2: From the "Object Repository – All Object Repositories" Navigate to File > Export Local Object… or you can use Alt+F shortcut key and select "Export Local Object…"

Step 3: In the "Export Object Repository" window select the location where you want to save the .tsr file and give the file name and click save button.

Step 4: A copy of the Local Object Repository is now created as a shared object repository.

Associating a Shared Object Repository to the Current Test in QTP 9.2

2010-06-02T15:36:00.000+05:30

Once a shared object repository is created i.e the .tsr file it has to be associated to the current test other wise the objects cannot be identified and hence your script do not work because for your current script there won’t be any object repository associated. Shared Object repository is where you store your information in a central place and different users can access the repository. It is to be noted that by default the shared object repository will be in read only mode.

In order to associate the shared object repository we need to perform the following steps.

Step 1: Navigate to Resources > Associate Repositories. The "Associate Repositories" window will be opened.

Step 2: In the "Associate Repositories" window Click the "+" button which is in green color. The Add Shared Object Repository Widow Opens. Here you can select the path of the .tsr file and click Open Button.

Step 3: In the "Associate Repositories" window under the "Repositories" frame you will be seeing the path of the .tsr file highlighted and also in the "Available Actions" frame you will see "Action 1" displayed.

Step 4: Now select the "Action 1" and click the right arrow button. The "Action 1" will be shifted to "Associated Actions" frame and click "OK" button. This means that the shared object repository is now associated to the current test.

Step 5: Now open the Object repository by navigating to Resources > Object repository or Press "Ctrl + R". The "Object repository > All Object repositories" window will be opened and you can see the objects listed in the window under Action 1.

Note: When you use a shared object repository in your current test as associated repository the objects and the properties are read only which means you cannot change the object & properties names, values.

If you add any objects from the application under test to this repository then they will not be added into the shared object repository but will be added in the local object repository and you can manage them but if you try to export the objects it will create a new shared object repository and only the object added locally will be stored in the new .tsr file.

Look in the image and the highlighted object and properties. The object identification for this object during run time happens for this current test and you cannot save this object into the shared repository you have associated. Even if you export it will create a new .tsr file and only the object added currently will be saved.

Assignment: Create a shared object repository and associate it to the current test. Now learn an object from the Application and try to export the object repository and see what happens.

How to use a Shared Object repository in QTP 9.2

2010-06-01T17:43:00.000+05:30

Object Repository manager in QTP is used to manage a Shared Object repository.

Resources – Object Repository Manager – Add Objects

What is a Shared Object Repository?

Shared Object Repository in QTP is a centralized place where all the object information is stored and will be stored as a .tsr file (Test Shared Repository). The extension of a shared object repository is a .tsr while working in a shared environment with multiple quick test licenses it is always a better practice to use a shared object repository.

How to create a shared object repository?

Open a new test in QTP.

Navigate to Resources, Object Repository Manager. Object Repository Manager Window opens up.

Now start learning objects from the application under test into the repository by clicking the Add Objects Button.

Now save the repository as a .tsr file in to the desired location and folder from where you can access.

Now your shared object repository is ready to be used for your test.

Some quick tips:

1. Add Objects using shared object repository manager to create a .tsr file.

2. Associate the .tsr file to the current test. Note: we can start using a shared object repository only after we associate the object repository to the test.

3. Object Repository manager is used to create/edit a .tsr file.

4. Associate repository is used to associate a .tsr file with the current test.

Frame Work in QTP 9.2

2010-06-01T17:40:00.000+05:30

Framework in QTP is a complex internal architecture made easy for the end user. A Frame work follows the set of best practices towards test automation.

Generations in Automation

Generation One: Record and Playback
Generation Two: Linear Scripting
Generation Three: Data Driven Testing

Now from Generation Three we have moved to Hybrid Architecture which contains fileSystemObjects, Excel Application, database, functions & Procedures, Environment variables, Shared Object Repository, VB Script. Generally a Framework will be built on a web application.

More on Frameworks will be posted shortly........

Debugging in Quick Test Professional 9.2

2010-06-01T17:33:00.000+05:30

Debugging in QTP 9.2 plays a vital role in analyzing the script when an issue is faced and to correct a script we debug the script to understand where the error is there in the script. Debugging is the process of identifying the errors in the script. With respect to QTP 9.2 debugging should be used in context of functions.

QTP has a debug tool bar and you can set debug tool bar in QTP by navigating to View – Toolbar – Debug.

Debug tool bar contains 6 features. There are 6 buttons in the tool bar and they are given below

1. Pause
2. Step Into
3. Step Out
4. Step Over
5. Insert/Remove Breakpoints (F9)
6. Clear all Breakpoints (Ctrl+Shift+F9)
7. Enable/Disable all Breakpoints.

What is a Breakpoint ?

A breakpoint pauses test execution at a specified line of code. Ideally we need to insert a breakpoint at a function call.

To set a breakpoint in the script you need to do any of the following

1. Click in the left margin of a step in the test or function library where you want the run to stop.

2. Click a step and then perform any of the mentioned step

a. Click the Insert/Remove Breakpoint button.

b. Choose Debug > Insert/Remove Breakpoint.

The breakpoint symbol is displayed in the left margin of the test or function library.

Step Into

When Step Into is clicked the execution control pauses at the first executable line within the function. After creating a breakpoint you need to use a step into to enter a function. After this you can either select step over or step out to execute the rest of the function.

Step Out

Step Out would execute all the lines within a function at once and the execution halts at the next function call.

Step Over

After we step into the function body Step over would execute one line at a time and pauses. The test would pause even at the end of the function. We can add variables to watch using the Step Over feature.

If a variable is added to watch we can observe the trend of the variable during execution. We need to use step over to do so.

How will you connect the Database from QTP without creating a DNS

2010-05-28T18:52:00.000+05:30

In QTP you can connect to the database by creating a DSN and then selecting the database server and the database. The other alternative to connect to the database in QTP is through a connection string. there is no need for you to create a DSN (Data Source name) but you need to know the details of the server and the userid, password and the database name.

For our reference and to understand how to create a data base connection without creating a DSN Name we will navigate to the Database Query Wizard from Insert - checkpoint - database Checkpoint.

Step 1: Open the Database Query Wizard

Step 2: Select the 'Specify SQL statement manually" radio button and click Next

Step 3: It will redirect to the next screen where you have a Create button to create a new Connection String. We will not create a new one because we need to create a DSN.Instead of that in the Connection String Text box which is below the create button enter the connection string as follows.

If you are using mysql database then use the mentioned connection string:

Driver={Mysql};server=testserver;uid=sa,password=sa;app=quicktestprofessional;database=Testdb

If you are using MS Sql database then use the mentioned connection string:

Driver={SQL Server};server=testserver;uid=sa;password=sa;app=quicktestprofessional;database=Testdb

If you are using MS Sql 2008 database then use the mentioned connection string:

Driver={SQL Server Native Client 10.0};server=testserver;uid=sa,password=sa;app=quicktestprofessional;database=Testdb

Step 4: In the SQL statement Text Box write the query you want to execute like

Select Top 10 * from employee.

Then click Finish Button.

You can see the 10 rows displayed.

If you perform the above steps for inserting a database checkpoint then you can see the result in the "database Checkpoint Properties" window displayed after clicking Finish button.

Write a script to store all the environment variables in a text file?

2010-05-14T19:45:00.001+05:30

In order to write the script we will use the File System Object Library and also use the Create Text File method and WriteLine Method to write our script.

The script to store all the Environment Variables in a text files is given below:

Built in Environment Variables in QTP 9.2

2010-05-14T19:40:00.000+05:30

Below are the list of built in Environment variables available in QTP 9.2. Built in Environment variables are read only. You can retrieve the values of the built in variables but you cannot set values for these environment variables unlike the user defined environment variables. These variables can be used like global variables through out your test in different actions and there is no need for you to create them or declare them. Since they are built in they are readily available for us to use them to retrieve useful and important information.

Syntax

Environment.value(variablename)

Example:

Msgbox Environment.value("OS")

This will print the Operating System of the machine on which QTP is installed.

1. Action Iteration: Indicates which action iteration is currently running. The value will be displayed or valid only during the test run.

2. Action Name: Displays or indicates which action is currently running. The current value is valid only during test run.

3. ControllerHostName: The name of the computer that serves as the controller. Used when Load runner is running. The current value is valid only during test run under Load.

4. GroupName: This is w.r.t. Load Runner. It is the scenario identification number. The current value is valid only during test run under Load.

5. LocalHostname: Gives the Local Host Name on which QTP is Installed. The current value displayed is WINDOWS XP.

6. OS: Displays the operating system on which QTP is installed. The current value os Microsoft Windows XP Work Station.

7. OS Version: Displays the version of the Operating System.

8. ProductDir: Displays the folder path where the product (QTP) is installed.

9. ProductName: Gives the name of the Product.

10. ProductVersion: Gives the product version.

11. ResultDir: Displays the folder path where the current test results are saved.

12. SceanrioId: This is w.r.t. LoadRunner. Displays the scenario identification number.

13. SystemTempDir: Displays the system temporary directory.

14. TestDir: This is the path of the folder in which the test is located.

15. TestIteration: Indicates which test iteration is currently running.

16. TestName: Displays the name of the test.

17. UpdatingActiveScreen: Indicates whether the active screen images and values are being updated.

18. UpdatingCheckPoints: Indicates whether the checkpoint properties are being updated.

19. UpdatingToDescriptions: Indicates whether test object descriptions are being updated.

20. UserName: Displays the windows login user name.

21. VUserId: This is w.r.t. Load Runner. Indicates the virtual user identification number.

Environment Objects Methods and Properties in QTP 9.2

2010-05-14T19:10:00.000+05:30

Environment objects enables you to work with Environment variables. You can retrieve values of In bulit environment variables but you can set and retrieve values of user defined variables.

Syntax:

To retrieve a value of an environment variable.

Environment.value(VariableName)

To set a value to a User defined environment variable.

Environment.value(VariableName) = NewValue

The Associated Methods and Properties of Environment Objects are

1. ExternalFileName Property
2. LoadFromFile Method
3. Value Property

ExternalFileNameProperty

This returns the name of the loaded external environment variable file specified in the environment tab of the Test settings dialog box. If no external environment variable file is loaded it returns an empty string.

Syntax

Environment.ExternalFileName

The following example uses the ExternalFileName property to check whether an environment variable file is loaded, and if not, loads a specific file and then displays one of the values from the file.

'Check if an External Environment file is loaded and if not, load it.

fileName = Environment.ExternalFileName
If (fileName = "") Then
Environment.LoadFromFile("C:\Environment.xml")
End If

'display value of one of the Environment variables from the External file
msgbox Environment("VariableName")

LoadFromFileMethod

This method loads the specified environment variable file. The environment variable file must be an xml file. Your xml file should contain the variables in this convention.

Syntax

Environment.LoadFromFile(Path of xml File)

The following example loads an xml file and also prints the value of a environment variable.

Environment.LoadFromFile("E:\Hybrid_FrameWork\Environment.xml")
msgbox Environment("Result")

Value Property

It sets or retrieves the value of an environment variable. You can retrieve the value of any environment variable but you can only set the values of an user defined environment variables.

Syntax

Environment.value(VariableName)

Even though you do not specify value QTP takes by default the value property.

Environment(VariableName)

Environment Parameters in QTP 9.2

2010-05-14T18:18:00.000+05:30

Environment parameters deal with the environment where quick test is installed.

Environment variables are of two types:

1. Built In Environment Variables
2. User Defined Environment Variables.

Built in Environment variables are created when QTP is installed and they are read only.

User Defined Environment variables are of two types:

1. Internal Variables.
2. External Variables.

Internal variables are defined in QTP by navigating to File, Settings, Test Settings, Environment, Select User Defined from the Variable Type Combo Box. Click the + sign and you will be displayed a dialog box “Add New Environment Parameter”. Enter the name and Value and click OK. You will see that the newly created variable is listed and it is an internal type. Look at the image below.

External Variables are those which are defined in an external xml file and then loaded into the current Test by selecting the check box of “Load variables and values from external file” and brows the path of the xml file and click ok. The variables are loaded and you can see the type as External. Look at the image below

If there is a need to create a environment variable we define it in a xml file and load it as user defined environment variable. All the environment variables are listed in Test Settings.

Environment Object is an utility object in QTP that deals with the Quick Test Environment.

Value Property is used to set or retrieve values of environment parameters.

Environment object enables you to work with environment variables. You can retrieve the value of any environment variable. You can set the value of only user defined environment variables.

Syntax:

Environment.Value(VariableName)

Print Environment.Value(“OS”)

This will fetch the value of the Operating system on which QTP is installed and print it for the user as “Microsoft Windows XP Workstation”

Write a script in QTP to import data from an external data sheet using Excel application File system object?

2010-05-11T19:28:00.000+05:30

We will write a script and import the run time data from the external excel sheet and also fetch the order number to the run time data table and store it under the orderno column. Also we would print a pass or a fail based on the order no. If the order number is generated then it will print pass and in green color and if the order number is not generated then it will print fail in green color under the result column. For this apart from the four columns you need to add a column for Orderno and a column for Results and leave them blank because the values will be inserted during run time.

'Script to insert an order and print the Order Number

'Create an object to interact with Excel Library

Set xlapp = CreateObject("Excel.Application")

'Open the excel workbook

Set wbook = xlapp.workbooks.Open("E:\InsertOrder.xls")

'Set the pointer to the worksheet

Set wsheet = xlapp.worksheets(1)

'Get rowcount

rowcount = wsheet.usedrange.rows.count

For i = 1 to rowcount-1

Window("Flight Reservation").Activate
Window("Flight Reservation").WinButton("New").Click
Window("Flight Reservation").WinObject("Date of Flight:").Type wsheet.cells(i+1,1).Value
Window("Flight Reservation").WinComboBox("Fly From:").Select wsheet.cells(i+1,2).Value
Window("Flight Reservation").WinComboBox("Fly To:").Select wsheet.cells(i+1,3).Value
Window("Flight Reservation").WinButton("FLIGHT").Click
Window("Flight Reservation").Dialog("Flights Table").WinButton("OK").Click
Window("Flight Reservation").WinEdit("Name:").Set wsheet.cells(i+1,4).Value
Window("Flight Reservation").WinButton("Insert Order").Click
Wait 8
Orderno = Window("Flight Reservation").WinEdit("Order No:").GetRoProperty("text")
wsheet.cells(i+1,5).Value = Orderno

If Orderno = null Then
wsheet.cells(i+1,6).Value = "Fail"
wsheet.cells(i+1,6).Font.Colorindex = 3
Else
wsheet.cells(i+1,6).Value = "Pass"
wsheet.cells(i+1,6).font.colorindex = 10

End If

Next

wbook.save
wbook.close
xlapp.quit

Set wsheet = nothing
Set wbook = nothing
Set xlapp = nothing

Parameterization using Excel Application in QTP 9.2

2010-05-11T19:25:00.000+05:30

We should have a clear understanding of How to import an external data sheet in to QTP and parametrize the script with Excel Application? Because there is a problem using the local data sheet because if we want to make any changes in the data or use a different set of data then for each time we need to open Quick Test Application, open the script and make the changes in the script local data sheet or the global data sheet and this is time consuming and also not the best practice.

Instead of opening the script every time the data is changed we can actually create a excel sheet and store it externally and then call it into the run time data sheet. This is easy to maintain and no confusion at all. You need to create the excel sheet with all the values and then use the excel library commands in the script to invoke the excel worksheet and then point the columns to the corresponding variables.

When you work with excel worksheet always keep in mind that the first row is set for the parameter names i.e the first row columns should have the variable names which we call in the script.

If you want the data to be imported to the global sheet then the data in the excel file should be stored in the Sheet 1 of the file. If you want the data to be imported to the Local sheet then the data in the excel file should be stored in Sheet 2 of the file. We will parametrize the variables with the excel application and directly pull in the data from the columns in the excel sheet.

How to import an external datasheet and populate the data into Global Data sheet in QTP?

2010-05-11T19:17:00.000+05:30

We will generate a script in QTP which imports and external data sheet and populate the data into the global datasheet and also exports the run time data sheet with the order number into an external location.

'Script to insert an order from external spreadsheet
'Populate the data into the globalsheet, define the datatable
'iterations using script and execute the insertorder

'Set the datatable iterations under test settings to
'Run one iteration only

'Step1: Import the data into the Runtime datatable

DataTable.Import("E:\Insert Order1.xls")

'Step 2: Get the rowcount and store it in a variable called rowcount

rowcount = DataTable.GetRowCount()

'Step 3: Set the datatable iterations, iterate from the first row till row count

For i = 1 to rowcount

'Step 4: Set the current row as the active row

DataTable.SetCurrentRow(i)

'Step 5: Insert order script with appropriate parameters

Window("Flight Reservation").Activate
Window("Flight Reservation").WinButton("New").Click
Window("Flight Reservation").WinObject("Date of Flight:").Type DataTable.Value(1,1)
Window("Flight Reservation").WinComboBox("Fly From:").Select DataTable.Value(2,1)
Window("Flight Reservation").WinComboBox("Fly To:").Select DataTable.Value(3,1)
Window("Flight Reservation").WinButton("FLIGHT").Click
Window("Flight Reservation").Dialog("Flights Table").WinButton("OK").Click
Window("Flight Reservation").WinEdit("Name:").Set DataTable.Value(4,1)
Window("Flight Reservation").WinButton("Insert Order").Click
Wait 8
OrderNo = Window("Flight Reservation").WinEdit("Order No:").GetRoProperty("text")
DataTable.Value(5,1) = OrderNo

Next

DataTable.Export("E:\InsertOrderResult.xls")

Write a script in QTP 9.2 using Local data sheet

2010-05-11T19:05:00.000+05:30

Write a script in QTP 9.2 using Local data sheet to invoke the application, login, Insert order using Local data sheet and closing the application.

Look at the four actions in our test we create in QTP

Action 1 – Invoke Flight Reservation Application.
Action 2 – Login to the Application.
Action 3 – Insert Order.
Action 4 – Close the Flight reservation Application.

Action 1 renamed as Invoke Application

If Not Dialog("Login").Exist(0) Then
App_Path = "C:\Program Files\Mercury Interactive\QuickTest Professional\samples\flight\app\flight4a.exe"
InvokeApplication App_Path
End If

Action 2 renamed as Login

Dialog("Login").Activate
Dialog("Login").WinEdit("Agent Name:").Set "Testuser"
Dialog("Login").WinEdit("Password:").Set "mercury"
Dialog("Login").WinButton("OK").Click

Action 3 renamed as Insert Order

Here we use the local data sheet with values to be inserted. We will have DateofFlight, FlyFrom, FlyTo, OrderNo (which we will fetch to the datatable from application using GetROProperty, Result based on the orderNo generated we will print pass or fail.

Window("Flight Reservation").Activate
Window("Flight Reservation").WinButton("New").Click
Window("Flight Reservation").WinObject("Date of Flight:").Type DataTable("DateofFlight", dtLocalSheet)
Window("Flight Reservation").WinComboBox("Fly From:").Select DataTable("FlyFrom", dtLocalSheet)
Window("Flight Reservation").WinComboBox("Fly To:").Select DataTable("FlyTo", dtLocalSheet)
Window("Flight Reservation").WinButton("FLIGHT").Click
Window("Flight Reservation").Dialog("Flights Table").WinButton("OK").Click
Window("Flight Reservation").WinEdit("Name:").Set DataTable("Name", dtLocalSheet)
Window("Flight Reservation").WinButton("Insert Order").Click
Wait 8
Orderno = Window("Flight Reservation").WinEdit("Order No:").GetRoProperty("text")
DataTable("Orderno",dtLocalSheet) = Orderno

If Orderno = " " Then
DataTable("Result",dtLocalSheet) = "Fail"
Else
DataTable("Result",dtLocalSheet) = "Pass"

End If

Action 4 renamed as Close

Window("Flight Reservation").Close

DataTable Iterations in QTP 9.2

2010-05-11T19:00:00.000+05:30

The datatable iterations for a global datasheet are defined under Table Settings (File > Settings > Run) and the default value is “Run on all Rows”. Quick Test gets the count of the number of rows within the global sheet and sets the iterations from 1 to Rowcount which is similar like a For Loop. For every iteration, it sets the value of ‘I’ as the active row.

The data table iterations for a local sheet are defined under Action call properties and the default value is “Run one Iteration only”.

Quick Reference:

Data Table Iteration for Global Sheet – File > Settings >Run Tab
Data Table iteration for Local Sheet – Action Call Properties (Keyword View > Actions > Action Call Properties > Run > Run on all rows.

When to use Local datasheet in QTP 9.2?

If you want only a particular action for n number of times then put that data in the local data sheet and set the test iteration to “Run for all Rows”. Set the Test Iteration for Global Sheet as “Run only one time”. Look at this scenario to under stand better. We will use the Flight Reservation Application as reference.

Action 1 – Invoke Flight Reservation Application.
Action 2 – Login to the Application.
Action 3 – Insert Order.
Action 4 – Close the Flight reservation Application.

Now set the Global Data sheet iterations to Run only one time (File – Settings – Run Tab – Run only one time). Put down all the data for insert order in the Action 3 local data sheet and you want to insert orders for many users. To do so set the local data sheet test iteration as “Run on all rows”. The reason for doing this is that by default the global data sheet test iteration is set as “Run on all Rows” and the local data sheet Test Iteration by default is set to “Run only one iteration”.

If these Test iteration values are not manually set for both Global and local data sheet then the test runs for 10 * 10 = 100 times. Let me explain this. If you want 10 insert orders to be done and because the test iterations are set by default what happens is that all the actions run for the first time and the insert order runs for 10 times taking values from the local sheet and since the run time data sheet is having 10 rows all the actions from 1 to 4 run 10 times and the action 3 runs 10 times each time making the script to run a total of 100 times.

We do not want to this way what we wanted is all the actions 1,2 and 4 should run one time and only action 3 should run 10 times and that is why we change the Test Iteration values from default to what we want.

Since there are default values set for global and local data sheet it always create a problem like what we have seen above. So when we want that different sets of data to be used we will set the global data sheet to “Run on one row” and local datatable to “Run on all Rows”.

Write a script to insert an Order in flight Reservation Application importing values from an external excel sheet and also display the result as pass

2010-05-10T16:59:00.000+05:30

'Script to insert an order and print the Order Number

'Create an object to interact with Excel Library

Set xlapp = CreateObject("Excel.Application")

'Open the excel workbook

Set wbook = xlapp.workbooks.Open("E:\InsertOrder.xls")

'Set the pointer to the worksheet

Set wsheet = xlapp.worksheets(1)

'Get rowcount

rowcount = wsheet.usedrange.rows.count

For i = 1 to rowcount-1

Window("Flight Reservation").Activate
Window("Flight Reservation").WinButton("New").Click
Window("Flight Reservation").WinObject("Date of Flight:").Type wsheet.cells(i+1,1).Value
Window("Flight Reservation").WinComboBox("Fly From:").Select wsheet.cells(i+1,2).Value
Window("Flight Reservation").WinComboBox("Fly To:").Select wsheet.cells(i+1,3).Value
Window("Flight Reservation").WinButton("FLIGHT").Click
Window("Flight Reservation").Dialog("Flights Table").WinButton("OK").Click
Window("Flight Reservation").WinEdit("Name:").Set wsheet.cells(i+1,4).Value
Window("Flight Reservation").WinButton("Insert Order").Click
Wait 8
Orderno = Window("Flight Reservation").WinEdit("Order No:").GetRoProperty("text")
wsheet.cells(i+1,5).value = Orderno

If Window("Flight Reservation").Exist(8) Then
wsheet.cells(i+1,6).Value = "Pass"
wsheet.cells(i+1,6).Font.Colorindex = 10
Else
wsheet.cells(i+1,6).Value = "Fail"
wsheet.cells(i+1,6).font.colorindex = 3
End If

Next

wbook.save
wbook.close
xlapp.quit

Set wsheet = nothing
Set wbook = nothing
Set xlapp = nothing

Write a script to invole and login to the Flight Application using data from an external Excel Sheet

2010-05-10T16:45:00.000+05:30

'Create an Object Variable to interact with Excel Library

Set xlapp = CreateObject("Excel.Application")

'Open the existing workbook

Set wbook = xlapp.Workbooks.Open("E:\Practise sets\Test Data\LoginFR.xls")

'Create a pointer to the first sheet in the workbook

Set wsheet = xlapp.WorkSheets(1)

'Get the row count

rowcount = wsheet.usedrange.rows.count

For i = 1 to rowcount-1
If not Dialog("Login").Exist(0) Then
InvokeApplication "C:\Program Files\Mercury Interactive\QuickTest Professional\samples\flight\app\flight4a.exe"
End If

Dialog("Login").Activate
Dialog("Login").WinEdit("Agent Name:").Set wsheet.cells(i+1,1).Value
Dialog("Login").WinEdit("Password:").Set wsheet.cells(i+1,2).Value
Dialog("Login").WinButton("OK").Click
Wait 8
If Window("Flight Reservation").Exist(8) Then
wsheet.cells(i+1,3).Value = "Pass"
wsheet.cells(i+1,3).Font.Colorindex = 10
Else
wsheet.cells(i+1,3).Value = "Fail"
wsheet.cells(i+1,3).font.colorindex = 3
End If

Window("Flight Reservation").Close

Next
wbook.save
wbook.close
xlapp.quit

Set wsheet = nothing
Set wbook = nothing
Set xlapp = nothing

Write a script using Functions to invoke the Flight Reservation Application and pass the Login values from external Excel Sheet

2010-05-10T16:26:00.001+05:30

LoginFR username, password

Public Function LoginFR(byval username, byval password)

'Create an Object Variable to interact with Excel Library

Set xlapp = CreateObject("Excel.Application")

'Open the exisiting workbook

Set wbook = xlapp.workbooks.Open("E:\LoginFlightR.xls")

'Create a pointer to the first sheet in the workbook

Set wsheet = xlapp.worksheets(1)

'Get the row count

rowcount = wsheet.usedrange.rows.count

For i = 1 to rowcount-1
If not Dialog("Login").Exist(0) Then
InvokeApplication "C:\Program Files\Mercury Interactive\QuickTest Professional\samples\flight\app\flight4a.exe"
End If

username = wsheet.cells(i+1,1).Value
password = wsheet.cells(i+1,2).Value
Dialog("Login").Activate
Dialog("Login").WinEdit("Agent Name:").Set username
Dialog("Login").WinEdit("Password:").Set password
Dialog("Login").WinButton("OK").Click
Wait 10
If Window("Flight Reservation").Exist(10) Then
wsheet.cells(i+1,3).Value = "Pass"
wsheet.cells(i+1,3).Font.Colorindex = 10
Else
wsheet.cells(i+1,3).Value = "Fail"
wsheet.cells(i+1,3).font.colorindex = 3
End If

Window("Flight Reservation").Close

Next
wbook.save
wbook.close
xlapp.quit

Set wsheet = nothing
Set wbook = nothing
Set xlapp = nothing

End Function

Parameterization in QTP 9.2

2010-05-07T19:28:00.000+05:30

Parametrization in QTP is a process of replacing all the constants within the test script into variables (parameters) so that we can reuse the same script with different sets of data.

Parametrization in QTP happens in 4 ways.

1. Database Parameters.
2. Action parameters.
3. Environment Parameters.
4. Random Parameters.

Database parameters can be set by Internal data sheet, External data sheet and Excel parameters.

What is Data Driven Testing in QTP 9.2?

Data driven testing is the process of passing huge sets of data into Application under test using a data sheet. The data sheet closely resembles to the excel spread sheet. The concept of data driven testing can be achieved using data table parametrization.

Let us look at how a Test in QTP is organized. A test has one or many actions and each action can have one or more functions. Now each action has one local object repository and a local data sheet, like wise all the actions have one local data sheet and local object repository but the entire test has one Global data sheet which all of these actions can have access. Look at the figure below.

What is a Data Table in QTP?

A data table is a combination of local data sheet and global data sheet. Every action has one local data sheet and local object repository but only one global data sheet for the entire test. There may be any number of actions for which that many number of local data sheets are created but for all these actions together has one global data sheet. All actions can access the global data sheet.

Every QTP test will have one global sheet. There is no action associated with a global sheet and global sheet can be accessed by all the actions within the test.

To work with the data table in QTP we make use of data table object. Data table is a utility object in QTP.

What is a Utility object in QTP?

Utility objects are the objects provided by the quick test library used to enhance our test scripts. Data table objects have design time data table and Run time data table.

The data table that exists during script design is the design time data table. The moment you click the run button we enter the run session then the design data table gets converted into run time data table and all the data table objects, properties and methods will be applicable only to the run time data table and the design time data table s not affected. Any manipulations during run time done are written in the run time data table.

Note: data table object is nothing but the run time data table.

Syntax

Data Table.value (parameterid, sheetid)

Example:

DataTable.Value(1,1)
DataTable.Value(2,1)

Window(“Flight Reservation”).WinCombo(“Fly From”).Select Data Table.Value(2,1)

To insert a value in the data table like the order number generated during inserting a order we write the script like this.

Ord_Num = Window(“Flight Reservation”).WinEdit(“Order No:”).GetROProperty(“text”)

Data Table.Value(5,1) = Ord_Num

What is Data Table Object in QTP?

Data table object is a utility object in QTP that points to the run time data table.

What is Value Property in QTP?

Value Property is the data table default property used to set or retrieve values from a specified parameter within the data table. Value property takes the parameter id and the sheet id as part of its syntax.

Data Table.value (parameterid, sheetid)

Bitmap Checkpoint in QTP 9.2

2010-05-06T15:31:00.000+05:30

Bitmap checkpoint captures the expected bitmap of an object while recording. During a run session if the actual bitmap matches the expected bitmap returns a pass to the test result or a fail otherwise. It is always better to insert a bitmap checkpoint while recording and not on the active screen because the active screen might not have updated the latest bitmap and any change in the screen might throw a fail.

How to insert a bitmap checkpoint in QTP 9.2

We will insert a bitmap checkpoint for a disabled FLIGHT button and run the script and then we will enable the FLIGHT button and run the script and see the difference.

1. Open a Blank Test in QTP.

2. Open the Flight Reservation application and stay in Insert Order window.

3. Click Record button. In the record and Run settings Window, select the Windows Application Tab select the Radio Button for “Record and Run test on any windows based application. Click OK.

4. Now go to Insert > Checkpoint Select Bitmap Checkpoint.

5. Now the cursor will change to hand sign. Also the Quick Test will minimize and only the Flight Reservation Application will be active on the screen.

6. Select the FLIGHT Button which in Disabled State.

7. Click OK on the Object Selection – Bitmap Checkpoint Properties.

8. Now the Bitmap Checkpoint Properties window will be opened where in you can check which are of the bitmap image you want to display and also can change the checkpoint timeout and click OK button.

This line of code is displayed.

Window("Flight Reservation").WinButton("FLIGHT").Check CheckPoint("FLIGHT")

Now run the script and you will see that QTP will record a pass in the Test Result.

Lets try to run the script with a small change in the Flight Reservation Application.

Now in the Flight Reservation enter the Date of Flight, Fly From and Fly to. Now the FLIGHT button is Enabled. Now go back to the script and run the script and see that the test result will throw fail status because while recording the expected result is disabled and the actual result while play back is enabled.

Generally Bitmap check point is used specially to check the images on your application or sites to find out any variation in the pixel or color etc.

Inserting more than one Standard Checkpoint in QTP 9.2

2010-05-04T14:10:00.000+05:30

Quick Test Professional Tutorials

Write a Script to open an excel workbook through VB Scripting

Child Objects in QTP scripts with examples

'Script to count the number of child objects of flight reservation applicationSet chd_obj = Dialog("text:=Login").ChildObjectsmsgbox chd_obj.count

'Script to highlight all the child objects in Login dialog of flight reservation applicationSet chd_obj = Dialog("text:=Login").ChildObjectsFor i = 0 to chd_obj.count - 1chd_obj(i).HighlightNext

'Script to highlight all the child objects(buttons) in Login dialog of flight reservation applicationSet button_obj = Description.Createbutton_obj("nativeclass").Value = "Button"Set chd_obj = Dialog("text:=Login").ChildObjects(button_obj)For i = 0 to chd_obj.count - 1chd_obj(i).HighlightNext

Write a Script to delete all the spam mails in Gmail

Description Object in QTP (Description. Create)

Set Desc = Description.Create

'Descriptive programming to login to the flight application.Dialog("text:=Login").ActivateDialog("text:=Login").WinEdit("attached text:=Agent Name:").Set "Ravi"Dialog("text:=Login").WinEdit("attached text:=Password:").Set "mercury"Dialog("text:=Login").WinButton("text:=OK").Click

Write a script to delete the mails in the Trash Folder in Gmail Account?

Write a Script in QTP to count the no of buzz messages in a Gmail Account.

Write a Script in QTP to count the unread emails of a gmail account.

Write a Script to Login in to Gmail Account using QTP?

What is a Virtual Object and it helps in solving Object Recognition Problem in QTP ?

Virtual Objects comes into picture if QTP is unable to recognize an object and we often see errors as Object not found. This is because even thought you have recorded the actions during playback time QTP is unable to recognize an object and because of which the script fails.

Creating a MS Word Document using QTP 9.2

Set wordapp = CreateObject("Word.Application")wordapp.visible = Truewordapp.documents.Addwordapp.Selection.TypeText "This is a sample document"wordapp.ActiveDocument.SaveAs "E:\testdoc.doc"wordapp.QuitSet wordapp = Nothing

Recovery Settings in QTP

Recovery scenario comes into picture when you want to handle some exception in the test by creating a Recovery scenario. Now to add this recovery scenario to a test we need to associate it in the test Settings.

Environment Settings in QTP

User Defined Environment Variables in QTP

Environment Variables in QTP are the utility objects of QTP which enables us to work with Environment Variables. In the Test Settings we can add user defined Environment Variables for a particular test or can also load an environment XML file to a test.

Built in EnvironmentVariables Settings in QTP

Environment Variables in QTP are the utility objects of QTP which enables us to work with Environment Variables. Here in this tab you have two settings one is Built in and user Defined.

Built in Environment Variables:

Resources Settings in QTP

Run Settings in QTP

Test Settings in QTP is very vital as it provides a lot of settings for a test and allows you to control the way QTP should run.

How to compare two xml files using CreateXMLfromFile Method

In order to compare two xml files in QTP we use the "XMLUtil Object" which is used to access and return XML objects.The Associated Methods for this object is CreateXML Method & CreateXMLfromFile Method.

Set XMLObj = XMLUtil.CreateXML()XMLObj.LoadFile("E:\Environment.xml")

Set XMLObj = XMLUtil.CreateXMLFromFile("E:\Environment.xml")

How to associate Function Libraries to a Test in QTP using Script?

1. Using the feature of QTP2. Using a Script.

Public Function LoginFR(byval username, byval password)Dialog("Login").ActivateDialog("Login").WinEdit("Agent Name:").Set usernameDialog("Login").WinEdit("Password:").Set passwordDialog("Login").WinButton("OK").ClickEnd Function

Associate Function Libraries to a Test in QTP 9.2

1. Using the feature of QTP2. Using a Script.

File -> Settings -> Resources

Resources -> Associated Library Functions

What is Update Run Mode in QTP

Update Run Mode updates the test object description, Checkpoints properties, active screen images and values.

How to navigate to update run mode?

What is Smart Identification in QTP and explain it

Smart Identification is a unique feature of QTP that comes into picture if the following conditions are satisfied.1. When Normal Object Identification Fails2. When the Enable Smart Identification check box is checked in the Object Identification Dialog Box.

Explain the what does "createobject" mean with an example

CreateObject creates an object to interact with the specified library.

Set IE CreateObject("InternetExplorer.Application")IE.visible TrueIE.Navigate http://www.google.com

Set xlapp CreateObject("Excel.Application")Set QTapp CreateObject("QuickTest.Application")

Differentiate the Local Object Repository and Shared Object repository types of QTP

There are two types of Object Repositories in QTP namely1. Local Object Repository (.mtr)2. Shared object Repository (.tsr)

What is the command in QTP to invoke IE Browser?

InvokeApplication "Path"

Invokeapplication "C:Program Files\Internet Explorer\iexplore.exe"Invokeapplication "C:Program Files\Mercury Interactive\QuickTest Professional\bin\QTPro.exe" 'This will invoke QTP.

SystemUtil.Run "url"

SystemUtil.Run http://www.google.com

Set IE CreateObject("InternetExplorer.Application")IE.Visible TrueIE.Navigate http://www.google.com

How to execute a qtp script from command prompt?

It is very much possible to launch a QTP test from Command prompt and then run it. The script to open QTP and then load the test into QTP and run the test is given in the "Quick Test Automation reference" file which is given in the Documentation Folder.

When QTP throws "verify that parent properties match an object currently displayed in your application." How to resolve issue

How to capture dynamically changing data in web page through scripting in QTP along with any sample working code

How to convert a local object repository into a shared object repository?

Associating a Shared Object Repository to the Current Test in QTP 9.2

How to use a Shared Object repository in QTP 9.2

Resources – Object Repository Manager – Add Objects

What is a Shared Object Repository?

How to create a shared object repository?

Frame Work in QTP 9.2

Framework in QTP is a complex internal architecture made easy for the end user. A Frame work follows the set of best practices towards test automation.

Debugging in Quick Test Professional 9.2

How will you connect the Database from QTP without creating a DNS

Driver={Mysql};server=testserver;uid=sa,password=sa;app=quicktestprofessional;database=Testdb

Driver={SQL Server};server=testserver;uid=sa;password=sa;app=quicktestprofessional;database=Testdb

Driver={SQL Server Native Client 10.0};server=testserver;uid=sa,password=sa;app=quicktestprofessional;database=Testdb

Write a script to store all the environment variables in a text file?

In order to write the script we will use the File System Object Library and also use the Create Text File method and WriteLine Method to write our script.The script to store all the Environment Variables in a text files is given below:

Built in Environment Variables in QTP 9.2

Environment Objects Methods and Properties in QTP 9.2

Environment objects enables you to work with Environment variables. You can retrieve values of In bulit environment variables but you can set and retrieve values of user defined variables.

Environment.value(VariableName)

'Script to count the number of child objects of flight reservation application
Set chd_obj = Dialog("text:=Login").ChildObjects
msgbox chd_obj.count

'Script to highlight all the child objects in Login dialog of flight reservation application
Set chd_obj = Dialog("text:=Login").ChildObjects
For i = 0 to chd_obj.count - 1
chd_obj(i).Highlight
Next

'Script to highlight all the child objects(buttons) in Login dialog of flight reservation application
Set button_obj = Description.Create
button_obj("nativeclass").Value = "Button"

Set chd_obj = Dialog("text:=Login").ChildObjects(button_obj)
For i = 0 to chd_obj.count - 1
chd_obj(i).Highlight
Next

'Descriptive programming to login to the flight application.

Dialog("text:=Login").Activate
Dialog("text:=Login").WinEdit("attached text:=Agent Name:").Set "Ravi"
Dialog("text:=Login").WinEdit("attached text:=Password:").Set "mercury"
Dialog("text:=Login").WinButton("text:=OK").Click

Set wordapp = CreateObject("Word.Application")
wordapp.visible = True
wordapp.documents.Add
wordapp.Selection.TypeText "This is a sample document"
wordapp.ActiveDocument.SaveAs "E:\testdoc.doc"
wordapp.Quit
Set wordapp = Nothing

Set XMLObj = XMLUtil.CreateXML()
XMLObj.LoadFile("E:\Environment.xml")

1. Using the feature of QTP
2. Using a Script.

Public Function LoginFR(byval username, byval password)

Dialog("Login").Activate
Dialog("Login").WinEdit("Agent Name:").Set username
Dialog("Login").WinEdit("Password:").Set password
Dialog("Login").WinButton("OK").Click

End Function

1. Using the feature of QTP
2. Using a Script.

Smart Identification is a unique feature of QTP that comes into picture if the following conditions are satisfied.

1. When Normal Object Identification Fails

2. When the Enable Smart Identification check box is checked in the Object Identification Dialog Box.

Set IE CreateObject("InternetExplorer.Application")
IE.visible True
IE.Navigate http://www.google.com

Set xlapp CreateObject("Excel.Application")
Set QTapp CreateObject("QuickTest.Application")

There are two types of Object Repositories in QTP namely

1. Local Object Repository (.mtr)
2. Shared object Repository (.tsr)

Invokeapplication "C:Program Files\Internet Explorer\iexplore.exe"

Invokeapplication "C:Program Files\Mercury Interactive\QuickTest Professional\bin\QTPro.exe" 'This will invoke QTP.

Set IE CreateObject("InternetExplorer.Application")
IE.Visible True
IE.Navigate http://www.google.com

In order to write the script we will use the File System Object Library and also use the Create Text File method and WriteLine Method to write our script.

The script to store all the Environment Variables in a text files is given below:

1. ExternalFileName Property
2. LoadFromFile Method
3. Value Property

'Check if an External Environment file is loaded and if not, load it.

fileName = Environment.ExternalFileName
If (fileName = "") Then
Environment.LoadFromFile("C:\Environment.xml")
End If

'display value of one of the Environment variables from the External file
msgbox Environment("VariableName")

Environment.LoadFromFile("E:\Hybrid_FrameWork\Environment.xml")
msgbox Environment("Result")

If Not Dialog("Login").Exist(0) Then
App_Path = "C:\Program Files\Mercury Interactive\QuickTest Professional\samples\flight\app\flight4a.exe"
InvokeApplication App_Path
End If

Dialog("Login").Activate
Dialog("Login").WinEdit("Agent Name:").Set "Testuser"
Dialog("Login").WinEdit("Password:").Set "mercury"
Dialog("Login").WinButton("OK").Click

Data Table Iteration for Global Sheet – File > Settings >Run Tab
Data Table iteration for Local Sheet – Action Call Properties (Keyword View > Actions > Action Call Properties > Run > Run on all rows.

1. Database Parameters.
2. Action parameters.
3. Environment Parameters.
4. Random Parameters.