execute tests using VB Script

[rajpes]

Try the below code after killing all instances of QTPro.exe in task manager>processes

Code:

set qtApp1 = CreateObject("QuickTest.Application")
If Not qtApp1.Launched then
qtApp1.Launch
end if
qtApp1.Visible = True '
qtApp1.Options.Run.RunMode = "Fast"
qtApp1.Options.Run.ViewResults = True
qtApp1.Open "D:\Test2"
qtApp1.Test.Run
qtApp1.Quit
set qtApp1=Nothing