Consider the below example:

'In [Action 1]
Dim sVariable
sVariable = "Text"

'In [Action 2]
MsgBox sVariable

Above, you will notice that sVariable is blank. This is because, all local variables have limited scope when it comes to actions. This means, a local variable within Action 1 cannot be seen or used by Action 2.

Now, consider the same scenario with Environment variables:

'In [Action 1]
Environment("sVariable") = "Text"

'In [Action 2]
MsgBox Environment.Value("sVariable")

Were you able to access the Environment variable in Action 2?

Try this:

Browser("title:=A B A C U S – Recruitment.*").WpfTreeView("html id:=TreeControl1_mtrvDsasList").Select "SR"

Also, is this object a WbfTreeView instead of WpfTreeView?

Set MyPage = Description.Create()
MyPage(“title”).value = “A B A C U S – Recruitment ”

Set MyFrame = Description.Create()
MyFrame(“title”).value = “Contents”

Set MyTree = Description.Create()
MyTree(“html id”).value = “TreeControl1_mtrvDsasList”
MyTree(“innertext”).value = “SR”

Browser(MyBrowser).Page(MyPage).Frame(MyFrame).WbfTreeView(“html id = TreeControl1_mtrvDsasList” , “innertext = SR” ).Select “SR”
Browser(MyBrowser).Page(MyPage).Frame(MyFrame).WbfTreeView(MyTree ).Select “SR”
it does not identify tree in Frame
It gives error as “Object doesn’t support this property or method: ‘Browser(…).Page(…).Frame(…).WbfTreeView’”
Can you pls tell me the possible reason for the same

If you need further assistance, I would strongly suggest you to download the first chapter (Basic VBScript) from Dani’s Book. It can be found here. Note: You must register with AdvancedQTP to view this material.

Do
	var = InputBox("Enter Tickets")
	If var < 10 And var > 0 Then Exit Do
Loop

var1=inputbox(“Enter Tickets”)
Window(“Flight Reservation”).WinEdit(“Tickets:”).Set var1
‘When “Insert order” is clicked, error message is populated for Tickets.
Window(“Flight Reservation”).WinRadioButton(“Business”).Set
Window(“Flight Reservation”).WinButton(“Insert Order”).Click
If var1>10 Then
If Window(“Flight Reservation”).Dialog(“Flight Reservations”).Exist Then
Window(“Flight Reservation”).Dialog(“Flight Reservations”).WinButton(“OK”).Click
Window(“Flight Reservation”).WinRadioButton(“Business”).Set
Window(“Flight Reservation”).WinButton(“Insert Order”).Click
End if
End If
Window(“Flight Reservation”).WinMenu(“Menu”).Select “File;New Order”

Kindly help.
Vrinda

Typo mistake….for above elseif statement,
elseif uname = ‘invalid username’ or Password = ‘invalid Password’ then
msgbox “Username or Password are invalid”

The method that you have explained in section above seems to be much easier to understand and also in systematic way. That is first checking whether webedit, buttons, etc exists and then checking for there validations. I think i’ll go with above script of yours and execute.
Doing a very good job for a beginner like me… Thanks a lot.

Radha

Browser("").Page("").WebEdit("Username").set "Parameterized values as shown in table below"
Browser("").Page("").WebEdit("Password").set "Parameterized values as shown in table below"

As long as the maxLength property of the WebEdits is not 0, something will definitely be set. Therefore, the following statement:

if Uname ="" and Password = "" then

can only be true if nothing was set, or the properties supplied were incorrect. For the latter, its better to use .Exist instead. Don’t think I understand the following statement though:

elseif Uname  'valid username' or Password 'valid Password' then
  msgbox "Username or Password are invalid"

Good post on DP. I have prepared one script which validates username and password field using mercury’s default website. Can you please see and let me know if m going on correct path?

Script is as below:

Systemutil.Run "iexplore", "http://newtours.demount.com/"

Browser("").Page("").WebEdit("Username").set "Parameterized values as shown in table below"
Browser("").Page("").WebEdit("Password").set "Parameterized values as shown in table below"

'Usign GetRoProperty to get value from table.
Uname = Browser("").Page("").WebEdit("Username").GetRoProperty("value")
Password = Browser("").Page("").WebEdit("Password").GetRoProperty("value")

Browser("").Page("").Image("Sing in").click 48,39

if Uname ="" and Password = "" then
  msgbox "Please enter Username and Password")

elseif Uname  'valid username' or Password 'valid Password' then
  msgbox "Username or Password are invalid"

elseif Uname = 'valid' and Password = 'valid' then
  msgbox "Login successful"

End if

Table:

Username	Password
1. abc	abc(invalid)
2. Blank	Blank
3. Valid	valid

Thanks,
Radha

I like the way you explain the DP. You broke my bad assumptions on descriptive programming.

Cheers,
Neelakantan G S

The code doesn’t work.I implement the code but it doesn’t work.
“Enter” through keyboard is not possible.
Only Mouse click is possible and it is only possible to the 3rd column in the row(0).
If we click any where else in the row,it will not work.
The new window will come only if we click the 3rd column.
If i can post any screenshot here,I will post my application’s screenshot,so that u can understand better.

Thanks &regards
achu

Thank you very much for the reply.I am sorry for the late reply.
I will implement ur code,in my code and will tell the result.
Thans once again.

Thanks&Regards
achu

I found the code I had written for my application:

sText = "TestTOFind"

'Insert Dialog description below
With Dialog("")

	'Get total number of items in the WinListView
	iItemsCnt = .WinListView("window id:=1").GetItemsCount

	'Start searching from the most recent (bottom-most) item to the oldest item
	For ix = iItemsCnt - 1 to 1 Step - 1

		'Activate the row
		.WinListView("window id:=1").Activate ix

		If Dialog("", "regexpwndtitle:=" & sText).Exist(1) Then
			Set oWScript = CreateObject("WScript.Shell")
			oWScript.SendKeys "{ENTER}"
			Exit For
		End If

	Next

End With

Its very similar to what you have there..

I don’t know exactly but I think ‘Flight Reservation Table’ is also a WinList View object.Is it?

Thanks&Regards
achu

Currently I had one application with me,That is “Scan to Email Setup”wizard.
I think in Medical field applications ,we can see such type of schenario.
I ‘m not remembering any other application,
I try to post a screenshot of the application,but I can’t.
I think if that is possible the scenario will be very easy to understand.
I will try once again and will get back to you soon.

Thanks&Regards
dhanya

It might be hard for me to reproduce this scenario, but from what I remember about WinListViews, there is a technique that can enable you to traverse through each row depending upon the column of focus. I don’t quite remember how I did it before.. I will try to find an application with such an object and only then would I be able to provide with a solution.

Achu, is there any application that you could suggest that would enable me to have access to a WinListView object?

How can we click an item in a listbox using Dp?

The dialog box contains a listbox.In that there are 4 columns and rows.
I had to click in the 3rd column’s item.

I had searched for the script in many sites.I didn’t get any answer.
Finally I had done low level recording.From that I get the item’s positon’s value,but it is not the exact ‘x & y’ value.
And I had put that value in Script,it works.

My code is like this
“Dialog(“text:=HP Scan to E-mail Setup Wizard”).WinListView(“window id:=1093″).Click 454,27
Dialog(“text:=HP Scan to E-mail Setup Wizard”).Dialog(“text:Dialog”).WinButton(“text:Show Send Log”).Click”

But I know,it is depend upon the machine.

So can you suggest any other alternative method for doing that…

thanks
achu

Thanks a lot for such a wonderful discription on descriptive programming in a very easy manner.
Your explanation to questions asked was simply super.

You can send anwser in this site itself so other can also take advantage.

Bye
Renu

Thanks in advance
Renu :-)

What you see in these articles on RelevantCodes and on other websites detail pretty much everything that is relevant to know about Descriptive Programming. You have an excellent background for this field, and there are a handful of people with strong development background and I am sure you’ll do fantastic work.

Good luck! :)

Thanks in Advance
Renu

The below statement is invalid:

username = NewUser = ‘provider’

What the above statement means is, username is a boolean value that evaluates NewUser = 'Provider'. It should be this instead:

userName = NewUser

userName = "provider"

The rest of the code should be this:

If SwfWindow("HA – You are currently").SwfWindow("Add User").Dialog("HA – [Acknowledgement]").Exist Then
	Reporter.ReportEvent micPass, "Verify the user has been added", "The " &username "successfully has been added"
	SwfWindow("HA – You are currently").SwfWindow("Add User").Dialog("HA – [Acknowledgement]").WinButton("OK").Click
End If

When i input a new user then the reporter.event should display the new user. I have indicated &username which indicated in my script. I know I am definitely doing something wrong. Any help will greatly appreciate it.

Dim username
username = NewUser = ‘provider’

SwfWindow(“HA – You are currently”).SwfWindow(“Add User”).Dialog(“HA – [Acknowledgement]“).Exist Then
Reporter.ReportEvent micPass, “Verify the user has been added”, “The ” &username “successfully has been added”
SwfWindow(“HA – You are currently”).SwfWindow(“Add User”).Dialog(“HA – [Acknowledgement]“).WinButton(“OK”).Click
Exit For

Browser("title:=Flight.*").WebElement("innertext:=\D+ to \D+", "index:=0").Highlight
Browser("title:=Flight.*").WebElement("innertext:=\D+ to \D+", "index:=1").Highlight

If you would like to retrieve the text:

MsgBox Browser("title:=Flight.*").WebElement("innertext:=\D+ to \D+", "index:=0")_
    .GetROProperty("innertext")
MsgBox Browser("title:=Flight.*").WebElement("innertext:=\D+ to \D+", "index:=1")_
    .GetROProperty("innertext")

This would be custom checkpoint though. However, you can use the exact same regex to identify the text in the flight confirmation page through Object Repository also.

Please read the following document which describes different types of frameworks, with examples. My framework will be available in a few weeks, and I think that may serve as an example you are looking for. Its a conceptual framework, meaning, it contains concepts from several different frameworks and methodologies which may help people new to framework development understand the principles behind creating a good architecture.

Good luck :)

As you said, if the date changes (which it will), your test will fail. Such situations are good candidates for regular expressions or parameterization. What you would need to do here is, instead of using a static date for your CheckPoint, you would have to use a dynamic date. Now, this date value can come from the DataTable, or it can be a Regular Expression. Can you try either of the 2 options and see which one works better? If you have any questions, please feel free to ask.

Thanks,
Raju N

DataTable.ImportSheet(FileName, SheetSource, SheetDest)

Example:

DataTable.ImportSheet "C:\MyFile.xls", "Sheet1", "Action1"

As for functions, they can be called in QTP the exact same way as they’re called in VBScript.

I haven’t work on OpenOffice with either VBScript or QTP, so I am not sure how it is going to work. This post outlines several ways OpenOffice can work with VB and you can modify the code for your use.

I am not sure how you can use it to import data to QTP’s DataTable though. I doubt this will be possible.

I hope you are doing well.

What you see in this example, which checks the existence of the WebEdit before entering a value is nothing but a (custom) Checkpoint. You can do the same with a Standard Checkpoint as well, but I find custom checkpoints easily written and highly manageable.

For example, inserting 1) standard checkpoint for “Login” and “Cancel” button, 2) Image checkpoint for the flight image…etc (If applicable, can you please give me the exact location in script where i can insert checkpoints)

Its hard to describe an exact location; numerous validations performed through each script. To give you an example though, when you launch an application, you can check whether all the mandatory objects exist, or not. If not, the test fails. If they do, you proceed to the next step.

Let’s take a Cart Checkpoint process for example too. When you click “Checkout” you may expect a customized message for you, the amount of purchase, your Card details, your address etc. You can verify all of this, to make sure the application’s behavior is as expected. You can choose to create Standard Checkpoints, or custom, as long as they verify correct entities within the application.

since the buttons are always enabled there is no need to check and so no checkpoint and same for image.

That’s quite true. But, a good script doesn’t trust the application completely and performs all necessary validations. You never know when one of your validation catches something that may be extremely valuable to your team. :)

In the above example we have checked the availability of text boxes and buttons in login page and then entering values to login and move on to the next page.
Does inserting of “Checkpoints” is applicable here?
For example, inserting 1) standard checkpoint for “Login” and “Cancel” button, 2) Image checkpoint for the flight image…etc (If applicable, can you please give me the exact location in script where i can insert checkpoints)
OR
since the buttons are always enabled there is no need to check and so no checkpoint and same for image.

Please guide…
Thanks,
Radhika

I think it will be easier to demonstrate it through Descriptive Programming:

Browser("title:=Welcome.*").WebEdit("name:=userName").Set "test"
Browser("title:=Welcome.*").WebEdit("name:=password").Set "test"
Browser("title:=Welcome.*").Image("name:=login").Click
Browser("title:=Find a Flight.*").Image("name:=findFlights").Click
Browser("title:=Select a Flight.*").Image("name:=reserveFlights").Click
Browser("title:=Book a Flight.*").Image("name:=buyFlights").Click
'Solution 1
MsgBox Browser("title:=.*Confirmation.*")_
    .WebElement("innertext:=.*(19|20)\d\d-\d\d-\d+", "index:=0")_
    .GetROProperty("innertext")
'Solution 2
MsgBox Browser("title:=.*Confirmation.*")_
    .WebElement("innertext:=.*\d+-\d\d-\d+", "index:=0").GetROProperty("innertext")

Please test the above code and let me know if you have any questions..

PS. You can use the same Regular Expression with Record/Playback as well.

Browser(“Welcome: Mercury Tours”).Page(“Welcome: Mercury Tours”).WebEdit(“userName”).Set “satishdega”
Browser(“Welcome: Mercury Tours”).Page(“Welcome: Mercury Tours”).WebEdit(“password”).SetSecure “4aefbf53f0eb009d5a950f455b4090533e17″
Browser(“Welcome: Mercury Tours”).Page(“Welcome: Mercury Tours”).Image(“Sign-In”).Click 29,5
Browser(“Welcome: Mercury Tours”).Page(“Find a Flight: Mercury”).Image(“findFlights”).Click 38,10
Browser(“Welcome: Mercury Tours”).Page(“Select a Flight: Mercury”).Image(“reserveFlights”).Click 36,6
Browser(“Welcome: Mercury Tours”).Page(“Book a Flight: Mercury”).Image(“buyFlights”).Click 43,10
Browser(“Welcome: Mercury Tours”).Page(“Flight Confirmation: Mercury”).WebElement(“Flight Confirmation #”).Check CheckPoint(“Flight Confirmation # 2009-11-03002139″).

1. Start Recording if QTP is not in Record mode
2. Insert -> Checkpoint -> Standard Checkpoint
3. Click the “Flight Confirmation XXXX-XX-XXXXXXXX” WebElement
3. Object Selection Window -> Makes sure WebElement shows up as the bottom-most object
5. Click OK
6. Uncheck “HTML TAG” if its checked. Only “InnerText” should be selected.
7. Click on the “InnerText” Row
8. Besides the Constant Textbox, there is a button to the right. Click that.
9. A window titled “Constant Value Options” will show up.
10. Replace “Flight Confirmation XXXX-XX-XXXXXXXX” with this “(19|20)\d\d-\d\d-\d+” and check “Regular Expression”
11. Click OK
12. Click OK to close the Checkpoint Properties Window
13. Stop Recording
14. Once you’re done, you will have the following statement in QTP:

Browser("Flight Confirmation: Mercury").Page("Flight Confirmation: Mercury")_
    .WebElement("Flight Confirmation #")_
    .Check CheckPoint("Flight Confirmation # 2009-10-30092408")

15. Execute your code now and check the results.

Note: You will have to follow the same process for the WebElement object because when its recorded, its recorded to match with the static string. You will have to replace it with a Regular Expression shown above.

But, I’m glad you did. :)

Please go through this article on Regular Expressions. You should be able to find some information on the use of Regular Expressions when using QTP. If you have any questions after having read the article, please feel free to ask. However, there is ample detail on the use of both WildCards and Regex formats there you get you started.

You can also see this article, which also covers a few basics on this topic.

I know I am always directing you to different sources, but there has been so much already said about these topics, which even if I try won’t do as good of a job in explaining everything in this small space :)

I will definitely go through the document you have mentioned….also you have given a good start with such a simple example….

Thanks,
Radhika

As per my understanding, Data driven is nothing but parameterization…ie using different input values for same test case. Am i correct?

Correct. It is parameterization off data-pools on potentially a large scale. However, apart from only retrieving the Input values, a data-driven framework also retrieves the Output values for verifications. Lots of variables here.

And for Keyword driven am not clear

This type of framework runs on “keywords” that represent a logical entity on the code level. For example:

All the outputs will be available after the script has been run.

Of course, the above table is just an example. The framework itself will be quite large and it can have provision for more keywords, depending on the type of application.

I would also recommend you to refer to this document by Carl Nagle which provides a brief overview of different sorts of frameworks. Bullets 1.2.1 and 1.2.2 discuss Data-Driven and Keyword-Driven frameworks. This is also an excellent source.

I hope this helps..

Can you please explain the difference between Data driven testing and keyword driven testing?
As per my understanding, Data driven is nothing but parameterization…ie using different input values for same test case. Am i correct?
And for Keyword driven am not clear….
Kindly help.
Radhika

20\d\d-10-\d+

Or, if you would like to test only 2009 dates, you can use this:

2009-10-\d+

Or, if you would like to match any such number with the same pattern, you can simply use this:

\d+-\d+-\d+

There are several ways you can use the approaches above. But, I would recommend a good walkthrough on Regular Expressions first – the knowledge you gain will be very useful to you.

This will match any year that begins with 20. Example: 2000, 2010, 2099 etc:

20\d\d

This will match any year that begins with 200. Example: 2000, 2001, 2009 etc:

200\d

You can also refer to this great website for more information on Regular Expressions.