I have few but great friends :)

Like many of you I love to interact face to face looking into eyes, I am not a phone or chat guy. I always had complains for not picking up there calls, I never did that intentionally, just happened. As a result, I have few friends.

• Friends with whom I can have Healthy Discussion
• Friends who are Honest to me
• Friends who can read my face
• Friends who Encourage me all the time
• Friends who feel great with your Success
• Friends who are there 24/7
• Friends who never send Good Morning and Good Night greetings

Great friends never let you feel alone

Descriptive Programming in QTP

Descriptive Programming

Set Obj = Description.Create()

Pure Descriptive - Copy and paste below code in your QTP window and press run button, no need to have any OR.

systemutil.Run "www.google.com"

Browser("title:=Google").Page("title:=Google").WebEdit("name:=q").Set "Jaijeet Pandey"

Browser("title:=Google").Page("title:=Google").WebButton("name:=btnG").Click

Set NewObj=Description.Create()
NewObj("micclass").value="Link"
NewObj("name").value="Automation Testing.*"
Set ChildObj=Browser("title:=.*").Page("title:=.*").ChildObjects(NewObj)
Browser("CreationTime:=0").Navigate ChildObj(0).getroproperty("url") 

Leave your comments in case of any query.............

Learn QTP online from Expert

I have been training software testers to become QTP automation experts. Currently I provide online training. Classes are taken on weekends. The course includes the following lectures with hands on automation.

Lecture 1 ................................................

Basics

Keyword View

Expert view

DataTable

Active Screen

Repository

Settings

Record & Play

Lecture 2 ................................................

Actions

Default Name

Properties

Call to existing

Call to copy

Reusable Action

External Action

Split Action

New Action

Repository

Delete Action

Settings

Lecture 3 ................................................

DataTable - Basic Operations

Local and Global sheet

Parameterization

Moving up & down in rows

Add columns at run time

Regular Expression

Import Sheet, Export Sheet

Lecture 4 ................................................

Object Repository

Local Repository

Shared Repository

Repository Merge tool

Associate Repository

Object Spy & Other Options

Smart Identification

Mandatory properties

Assistive Properties

Lecture 5 ................................................

Descriptive Programming

Working with Excel Objects

Web Tables & best uses

Lecture 6 ................................................

Error Handling

Recovery Scenario

Recovery Manager

Recovery Triggers

On Error Resume

Go To Zero

Lecture 7 ................................................

Checkpoints

Standard

Image

Bitmap

Text

Output alues

Checkpoints using Function

Lecture 8 ................................................

Others

Missing Resource

Reporter Event

Batch Execution

Transaction Timer

Quality Center Connection

Environment Variables

Recording Modes

Lecture 9 ................................................

Function

Library Files

In Built Functions (strcomp, mid, split, instr, replace,filter etc)

Date Functions

User Defined Functions

GetRo

GetTo

SetTo

Lecture 10 ..............................................

Script Debugging

Breakpoints

Shortcut

Debug Viewer

Lecture 11 ..............................................

Seat License

Concurrent License

Basic of VB Script

Conditional Statements

Looping Statements

Introduction of Framework

Case Study

Write to me at

________ jaijeetpandey@gmail.com

___http://twitter.com/jaijeetpandey

Error Handling

On Error resume next             -- > Activate Error Handler
.................................................
...............................................
...............................................
...............................................
.................................................

On Error go to 0                        -- > Stops Error Handler

Script Debugging Shortcuts in QTP

F3	Record
F4	Stop
F5	Run
Ctrl + F5	Run From Step
F9	Insert/Remove Breakpoints
Ctrl + F9	Enable/Disable Breakpoints
F10	Step by Step execution
Ctrl + F10	Execution from line 1 to step x, where x is the step where you placed your curson at the time of execution.
F11	Step by Step Execution (helps to debug functions)
Shift + F11	Execute Function in one GO.

https://twitter.com/jaijeetpandey

QTP FAQs

Basics

1. What is the purpose of Folder "ActionZero"?
2. Default run time settings & Global run time settings?
3. How to inform QTP about application under test?
4. Which all Browser's QTP supports for recording?
5. Which all Browser's QTP supports for execution?
6. Use of Active Screen?
7. Checkpoints Parameterisation?
8. How to execute alternate iterations?
9. List all the web - objects QTP supports?
10. Extension of QTP script?
11. Result option exists under which Menu of QTP?

Script Debugging

1. What is the difference b/w F10 and F11 keys?
2. How to use different shortcuts when we have multiple actions withing 1 script?
3. What is the use of Debug Viewer and different components of Debug Viewer?
4. Difference b/w Step Over and Step Into.

Actions

Others

1. Difference b/w Error Handler and Recovery Scenario?

Working with Excel

'Open existing excel file
Set obj=Createobject("Excel.Application")
Set objwb=obj.WorkBooks.Open("D:\temp1.xls")
Set objsheet=objwb.Sheets("Sheet1")
obj.visible="True"

'Delete Row from sheet
objsheet.Rows(4).Delete

'Delete Columns from sheet
objsheet.Columns(1).Delete

'Enter data into excel sheetobjsheet.cells(5,5)="Welcome"

'Change Font Color
objsheet.Cells(5,5).Font.Color = vbRed

'Get data from excelsheet by mentioning row and col
msgbox objsheet.cells(5,1)

'Change name of excel sheet
objsheet.Name ="NewSheet"

'Count # of sheet
sheetCount = objwb.Sheets.Count

'Add New Sheet
objwb.Sheets.Add

'Delete existing sheet
objsheet.Delete
RemoveWorksheet = "SheetNew"

'Find/Search data in excel Sheet   If search_item found within excel sheet , flag will hold the row # (found)
search_item="North"
set foundrow=objsheet.Cells.Find(search_item)
On Error resume next
 flag=foundrow.Row
msgbox flag
objwb.Save
objwb.Close