Forum Discussion
someshg2
11 years agoOccasional Contributor
Hi..Simon
I tried with the following code in vbs file
Sub MySub
' Initialize variables
sProjectNameFileName = "C:\Users\u304080\Desktop\26_07_2013\Shakedowns\Shakedowns.pjs"
sProjectName = "Scenarios"
sUnitName = "aaaaaa"
sRoutineName = "funHi"
' Creates the application object
Set TestCompleteApp = CreateObject("TestComplete.TestCompleteApplication")
' Obtains the integration object
Set IntegrationObject = TestCompleteApp.Integration
' Opens the project
IntegrationObject.OpenProjectSuite sProjectNameFileName
' Checks whether the project was opened
If Not IntegrationObject.IsProjectSuiteOpened Then
MsgBox "The project suite was not opened."
Exit Sub
End If
' Runs the routine
IntegrationObject.RunRoutine sProjectName, sUnitName, sRoutineName
End Sub
It doesnot respond ..Can you please check it !!!
Regards
G.Someswara Rao
I tried with the following code in vbs file
Sub MySub
' Initialize variables
sProjectNameFileName = "C:\Users\u304080\Desktop\26_07_2013\Shakedowns\Shakedowns.pjs"
sProjectName = "Scenarios"
sUnitName = "aaaaaa"
sRoutineName = "funHi"
' Creates the application object
Set TestCompleteApp = CreateObject("TestComplete.TestCompleteApplication")
' Obtains the integration object
Set IntegrationObject = TestCompleteApp.Integration
' Opens the project
IntegrationObject.OpenProjectSuite sProjectNameFileName
' Checks whether the project was opened
If Not IntegrationObject.IsProjectSuiteOpened Then
MsgBox "The project suite was not opened."
Exit Sub
End If
' Runs the routine
IntegrationObject.RunRoutine sProjectName, sUnitName, sRoutineName
End Sub
It doesnot respond ..Can you please check it !!!
Regards
G.Someswara Rao
Related Content
- 2 years agoianlop
- 11 months agoIso_Yura
- 6 years agovthomeschoolmom
- 11 years agojose_pita
Recent Discussions
- 10 hours agoSvetaG