Launch QTP and driver script

[eltee]

Hi,

Could you help me with writing a script which will launch QTP, associate the function library and repository, import inputsheet and run the driver script?

Thanks,
Liju

[manishbhalshankar]

Hi Eltee,

This can be done using VBScript. Search for it I am sure you will get something in this forum.

[basanth27]

Since its easy to answer -
Search with the keyword as AOM or Quicktest.application

[eltee]

Hi team,

I wanted to keep it simple. Here's my code:

Code:

Dim qtApp Const ForReading = 1, ForWriting = 2 Dim fso, f, result Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.OpenTextFile("C:\Results.txt", ForWriting, True) Set qtApp = CreateObject("QuickTest.Application") qtApp.Launch qtApp.Visible = True qtApp.Test.Settings.Resources.Libraries.Add(LibraryDirectory&"Generic_function.qfl") Set qtResourcesTab = qtApp.Test.Settings.Resources qtTestResourcesTab.ObjectRepositoryPath = "E:\Framework\Object_Repository\AAI_Object_Repository_merged_March24.tsr" qtp.open "E:\Framework\SampleTest\DriverScript_WithoutDiscount",True,True

And VBScript error throws upon line 11 (w.r.t to qtResourcesTab). Please help me launch the correct Obj Rep and open the driver script in QTP.