Checkbox = chk
Dialog Box = dbDisplay = displ Icon = icLabel = lbl Links = linkList Box = lb ...
4 Running QTP Script through vbs file
Public Sub ExecuteTest(TestPath)
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...
0 Right click simulation in DP
Simulating a right click to open a link in a new window does not require descriptive programming.
Here is the code:
url = Browser("IT Resource Center forums_2").Page("IT Resource Center forums").Link("Henry Floyd").GetROProperty("url")
SystemUtil.Run "C:\Program Files\Internet Explorer\IEXPLORE.EXE",url,"","open"
Method :2
object.FireEvent "oncontextme...
5 QTP 10 patch for Windows 7 and IE8
Just few months back (7th/Dec), HP announced the support for Windows 7 and WindowsServer 2008 R2 for QTP10.
Download QTP 10 patch 00644 for Windows 7
Download QTP 10 patch 00037 for Windows 7 - Support for Internet Explorer 8
Also find more patches...
Both patches to support IE8.0 (qtpweb_00037.exe) Windows 7.0(qtp_00644.exe) need to be installed for QTP10.0
You might need to check your UAC settings on windows 7.0 for recognizing Web objects.Try...
0 HP QuickTest Pro Patches
Download all the patches for HP QTP
http://knowledgeinbox.com/forums/hp-quicktest-pro-patches/?PHPSESSID=b7ec032b1ef9dfab540931a3e9c85...
0 Screen capture when checkpoints fail
'=======This code minimizes the QTP
sTitleMask = "QuickTest Professional - .*"
Window("regexpwndtitle:=" & sTitleMask).Minimize
'=======Checkpoint code
chk_txt_Acc=Browser("Xyz::Xyz").Page("Xyz::Xyz").Check(CheckPoint("Xyz::Xyz"))
If chk_txt_Acc=false Then
Browser("Xyz::Xyz").Page("Xyz::Xyz").CaptureBitmap "c:\z_scrn_cap_Accounts.bmp",True
Msgbox "Screen Captured!"
End...
0 How to Close QTP after execution
Private Function CloseQTP Set objWMIService = GetObject(“winmgmts:\\.\root\CIMV2″) Set colProcess = objWMIService.ExecQuery (“Select * from Win32_Process Where Name = ‘QTPro.exe’”) For Each objProcess in colProcess ...
0 Reporter Object in QTP
This object is to send the information to the Test results.Reports the status of test results ( pass, fail, warning) Enable/Disable reporting of step(s) following the statement. Retrieve the folder path in which the current test's results are stored. Retrieve the run status at the current point of the run session. Methods and PropertiesReporterEvent Methodsyntax : Reporter.ReportEvent EventStatus, ReportStepName, Details where EventStatus can be:0 or micPass:...
1 WPF and WCF application testing in QTP
WCF : Windows Communication FoundationQTP cannot be used for testing WCF services using NetTcpBinding. They should be using plain BasicHttpBinding for it to work.WPF : Windows Presentation FoundationQTP has the WPF addin but even after adding it, QTP seems to give only limited suppo...
0 QTP 10 on Windows Vista - Web objects problem
Problem :QTP 10 is not recognizing any of the web objects in Windows VistaSolution : Task 1Windows->Start->Control Panel->User Accounts->Turn User Account Control on or off,UNCHECK the check box "Use User Account Control (UAC) to help protect your computer.Task 2Open QTPCheck only the 'Web' Add-in and click ...
0 Test Automation Framework
A framework is a standard for settings and procedures a a task that is more flexible for development and maintenance in future.This is also for any professional to understand the system better and easy for him to work on development and maintenance.For instance, you will have the 'Startup', 'Driver', 'Data' and the 'Result' scripts are the basic parts of the framework.There are some types of Test Automation Framework like,Key Word DrivenData-drivenModularity-driven...
0 Open IE from QTP
Public Function IE_Open(url) Set IE = CreateObject("InternetExplorer.Application") IE.Navigate url IE.Visible = TrueEnd Funct...
1 Close all IE browsers
'// This will close all IE browsersPublic Function closeAllBrowsers Dim oDesc, x 'Create a description objectSet oDesc = Description.CreateoDesc( "micclass" ).Value = "Browser" 'Loop through the collection and close each browserIf Desktop.ChildObjects(oDesc).Count > 0 Then For x = 0 to Desktop.ChildObjects(oDesc).Count - 1 Browser( "creationtime:=" & x ).Close NextEnd IfEnd Funct...
0 Reading from an EXCEL file in QTP - VBScript
Pre-requisite : Have an excel file names c:\data.xls with data in 3 rows and 3 columns, remember to close the excel file before running the script.QTP Code to read an excel fileDim arr() ' Declares the array arrzRead_frm_Excel "c:\data.xls","Sheet1",1 For i=0 to ubound(arr)-1 msgbox arr(i) next' This function is to read and close the xl | arg1=path of xl, arg2=sheet name, arg3=startn rowFunction zRead_frm_Excel(xl,sheet,srt_row) Set xlApp = GetObject("","Excel.Application")...