How to connect QTP to Testdirector
- 4 Answers
- 20001 Views
- BirlaSoft, Polaris, I also Faced
- E-Mail Answers
Answer Posted / murali raju
I am sending the complete script to connect Quality Center
'***********************************************************
************************************************************
*
'Description:
'
'This example connects to a Quality Center project, opens a
test (checks it out, if applicable),
'updates the Active Screen values and test object
descriptions, and, if applicable,
'checks the modified test back into the Quality Center
project.
'
'Assumptions:
'The test1 test is not already checked out.
'There is no unsaved test currently open in QuickTest.
'For more information, see the example for the Test.SaveAs
method.
'When QuickTest opens, it loads the add-ins required for
the test.
'For more information, see the example for the
Test.GetAssociatedAddins method.
'***********************************************************
************************************************************
*
Dim qtApp 'As QuickTest.Application ' Declare the
Application object variable
Dim qtUpdateRunOptions 'As QuickTest.UpdateRunOptions '
Declare an Update Run Options object variable
Dim qtRunResultsOptions 'As QuickTest.RunResultsOptions '
Declare a Run Results Options object variable
Dim blsSupportsVerCtrl ' Declare a flag for indicating
version control support
Set qtApp = CreateObject("QuickTest.Application") ' Create
the Application object
qtApp.Launch ' Start QuickTest
qtApp.Visible = True ' Make the QuickTest application
visible
' Make changes in a test on Quality Center with version
control
qtApp.TDConnection.Connect "http://tdserver/tdbin", _
"MY_DOMAIN", "My_Project", "James", "not4you",
False ' Connect to Quality Center
If qtApp.TDConnection.IsConnected Then ' If connection is
successful
blsSupportsVerCtrl =
qtApp.TDConnection.SupportVersionControl ' Check whether
the project supports vervion control
qtApp.Open "[QualityCenter] Subject\tests\test1",
False ' Open the test
If blsSupportsVerCtrl Then ' If the project supports
version control
qtApp.Test.CheckOut ' Check out the test
End If
' Prepare the UpdateRunOptions object
Set qtUpdateRunOptions = CreateObject
("QuickTest.UpdateRunOptions") ' Create the Update Run
Options object
' Set the Update Run options: update the Active Screen
and test object descriptions. Do not update checkpoint
values
qtUpdateRunOptions.UpdateActiveScreen = True
qtUpdateRunOptions.UpdateCheckpoints = False
qtUpdateRunOptions.UpdateTestObjectDescriptions = True
' Prepare the RunResultsOptions object
Set qtRunResultsOptions = CreateObject
("QuickTest.RunResultsOptions") ' Create the Run Results
Options object
qtRunResultsOptions.ResultsLocation
= "<TempLocation>" ' Set a temporary results location
'Update the test
qtApp.Test.UpdateRun qtUpdateRunOptions,
qtRunResultsOptions ' Run the test in Update Run mode
qtApp.Test.Description = qtApp.Test.Description &
vbNewLine & _
"Updated: " & Now ' Document
the update in the test's description (Test Settings >
Properties tab)
qtApp.Test.Save ' Save the test
If blsSupportsVerCtrl And qtApp.Test.VerCtrlStatus
= "CheckedOut" Then ' If the test is checked out
qtApp.Test.CheckIn ' Check it in
End If
qtApp.TDConnection.Disconnect ' Disconnect from Quality
Center
Else
MsgBox "Cannot connect to Quality Center" ' If
connection is not successful, display an error message.
End If
qtApp.Quit ' Exit QuickTest
Set qtUpdateRunOptions = Nothing ' Release the Update Run
Options object
Set qtRunResultsOptions = Nothing ' Release the Run Results
Options object
Set qtApp = Nothing ' Release the Application object
| Is This Answer Correct ? | 9 Yes | 1 No |
Post New Answer View All Answers
what is profile tool?
What are benefits of qtp?
why text area checkpoints cannot used for web applications
To which environments does quicktest professional (qtp) supports?
What is the syntax to call one script from another?
What are the disadvantages of recording test cases in qtp?
Dear All , For UFT 12.02 which version QC or ALM will support ? Thanks Balaji
What is difference between Recording time object identification and Run time (Execution) time.
In what occasion we can specify global sheet and action sheet?
How do you delete unwanted results in qtp?
what frame work you are following?
Explain the types of object repositorys in qtp?
What is regular expression?
what is ODC and GDC?
Mention the different actions types of qtp.
