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 ...