Micro Focus QTP (UFT) Forums

Hi,
Any one please help me, AOM script is running only one or two scripts i wrote correct code but it was running sometimes only even qtp is not closing
does we have to change any settings in qtp tool
Here is my code

Code:
Dim App

set App=createobject("quicktest.application")

App.launch

App.visible=true

dim QTP_Tests(3)

QTP_Tests(1)="E:\qtp scripts\excel"

QTP_Tests(2)="E:\qtp scripts\popup"

QTP_Tests(3)="E:\qtp scripts\flight"

set res_obj=createobject("Quicktest.runresultsoptions")

for i=1 to ubound(QTP_Tests)

wscript.sleep 1000

App.open QTP_Tests(i),true

set QTP_Test=App.Test

res_obj.ResultsLocation=QTP_Tests(i)& "\suvarna"      'set the results location

QTP_Test.run res_obj,true

QTP_Test.close

next

wscript.sleep 1000

App.quit

set res_obj=nothing

set QTP_Test=nothing

set App=nothing

Did you check the result log? Where is it exiting the code? You may need to debug.

thanks for reply sir
but i didn't understood what u r saying

Are you running the code from QTP? IF yes then chk the Run REsult. There may be some issue.

no, i am running from notepad vbs file it does not give any error simply remains constant

jramya

Ankesh

jramya

Ankesh

jramya