Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Getting run time error while executing the QTP script in command prompt.
#1
Solved: 10 Years, 7 Months ago Exclamation 
Hi All,

I'm getting the below error when I tried to run the QTP script via command prompt.

Error Message: cmd_QTP.vbs<13,1> Microsoft VBScript runtime error: Type mismatch: 'Run'

In command prompt i'm using the command

cscript //nologo cmd_QTP.vbs

Code:
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

qtApp.Open "C:\Users\Vi$hruth143\Desktop\QTP\Scripts\LogIn", True ' Open the test in read-only mode

' set run settings for the test
Set qtTest = qtApp.Test
[b]qtTest.Run qtResultsOpt ' Run the test[/b]

WScript.StdOut.Write "Status is: " & qtTest.LastRunResults.Status ' Check the results of the test run
qtTest.Close ' Close the test

Set qtTest = Nothing ' Release the Test object
Set qtApp = Nothing ' Release the Application object

I doubt the error is on code line 13 which is higlighted in the above code.

Please help me to get this resolved.

Thanks
Vishruth
Reply
#2
Solved: 10 Years, 7 Months ago
What you said was correct. I think i have solved the issue you are facing. Just check this code
first you have to create an object and if not able to create. check if your running Admin mode
Code:
Dim App
Set App = CreateObject("QuickTest.Application")
App.Launch
App.Visible = True
Dim QTP_Tests(2)
QTP_Tests(1) = "C:\Documents and Settings\thomas\Desktop\Tests\paypage hits"
QTP_Tests(2) = "C:\Documents and Settings\thomas\Desktop\Tests\digitsecure net docs"
'Creating the RunResultsOptions object. It is a collection of properties that indicate preferences for the run results. E.g. ResultsLocation property as used below which tells the path in which the run results will be stored.
Set res_obj = CreateObject("QuickTest.RunResultsOptions")
For i = 1 to UBound (QTP_Tests)
App.Open QTP_Tests(i), True
Set QTP_Test = App.Test
res_obj.ResultsLocation = QTP_Tests(i) & "\Res25" ' Set the results location
'Using the Run method. Run Method runs the open test or business component and creates results in the specified file or Quality Center path. A Boolean value - true or false can be set. Indicates whether the Test.Run statement waits until the end of the run before performing the next statement in the automation script. Default=True.
QTP_Test.Run res_obj, True
QTP_Test.Close
Next
App.Quit
Set res_obj = nothing
Set QTP_Test = nothing
Set App = nothing
Reply


Possibly Related Threads…
Thread Author Replies Views Last Post
  How to send/pass UFT Run Error Dialog as output value to main driver script lravi4u 0 281 11-05-2023, 03:55 PM
Last Post: lravi4u
  How do you Change Run mode mid script? Caleytown 6 6,436 03-25-2021, 08:27 AM
Last Post: RB26578
  error when executing an UFT automation script alexalloza 0 1,363 10-30-2018, 06:17 PM
Last Post: alexalloza
  Executing via create "RES"xx folder? nishitd 0 1,087 03-07-2018, 01:09 AM
Last Post: nishitd
  Telnet command not recognized Sanjana1987 1 1,835 09-20-2017, 03:16 PM
Last Post: Ankur

Forum Jump:


Users browsing this thread: 1 Guest(s)