Answer Posted / satya

Using third party API:
If you have Acrobat Writer installed you use ArcoExch object
to manipulate pdf files.

Function GetPDFPageCount(filename)
Dim pdfFile,Acroapp,pdf
'PDF File preparations
Set Acroapp = CreateObject("AcroExch.App")
Set pdf = CreateObject("AcroExch.PDDoc")
pdf.Open filename,"temp"
Set pdfFile = pdf.GetPDDoc
GetPDFPageCount = pdfFile.GetNumPages
Set pdffile = nothing
Acroapp.Exit
End Function

I am trying to install QTP 9.5 but i am getting error message saying that ("Path is \QuickTest Professional\bin\vb_init.exe") vb_init.exe file is not find. can anybody give me the advise what to do ?

2209

---

Where to use function or action?

1102

---

Which environments does qtp support?

1042

---

How QTP identify the system time that's changes every seconds?

995

---

In keyward driven framework what will be the step for yahoo login page ,inbox logout,plz explain in detail

1999

---

Explain how you can find the absolute value of the number in qtp?

1022

---

what the difference between shared repository and per action repository?

994

---

Explain different recording modes?

970

---

How are actions and functions different in QTP?

1014

---

Explain qtp(quick test professional)?

971

---

what are the mandatory properties for a tex boxc (scenario?)

1952

---

Which environments are supported by hp qtp?

941

---

What are the various types of Actions in UFT?

999

---

Hi How to retrieve data from web element line by line?

1994

---

I used the below code to open QTP through VBscript?But i can unable to Invoke QTP...PLZ help me with the correct code to invoke QTP through VBS with description of the code aswell. Dim qtApp 'As QuickTest.Application 'Declare the Application object variable Dim qtTest 'As QuickTest.Test 'Declare a Test object variable Dim qtResultsOpt 'Declare a Run Results Options object variable Set qtApp = CreateObject("QuickTest.Application") 'Create the Application object qtApp.Launch 'Start QuickTest qtApp.Visible = False 'Make the QuickTest application visible qtApp.Open "C:\form", True 'Open the test in read-only mode 'set run settings for the test Set qtTest = qtApp.Test qtTest.Run 'Run the test 'WScript.StdOut.Write "Status is: " & qtTest.LastRunResults.Status 'Check the results of the test run qtTest.Close 'Close the test qtApp.quit 'Close QuickTest Pro Set qtResultsOpt = Nothing 'Release the Run Results Options object Set qtTest = Nothing 'Release the Test object Set qtApp = Nothing 'Release the Application object

2853

---