Unable to Update QC from QTP

[leninraj]

Hi All,
I am working on QTP 10.0, Running all my scripts from my local machine. I want to just update the results of my script in the QC.
here I am not loading the script from QC, since it cosumes more time , I have all my scripts in the local PC & just want to updae the result in QC.
Its easy to update QC if we load & run the scrpt from QC.

here is the code snap which I treid , but didnt work.

Code:

Set qtApp = CreateObject("QuickTest.Application") ' Create the Application object
Set TDConQTP = qtApp.TDConnection
qtApp.Launch ' Start QuickTest
qtApp.Visible = True ' Make the QuickTest application visible
qtApp.Options.Run.RunMode = "Fast"
qtApp.Options.Run.ViewResults = False
qtApp.Options.Run.ImageCaptureForTestResults = "OnError" ' Set QuickTest run options


Set qtResultsObj = CreateObject("QuickTest.RunResultsOptions")
If TDConQTP.IsConnected = False Then
TDConQTP.Connect QCurl, QCProject, QCRelease, QCUser, QCPwd, False
msgbox "QC Conected"
End If

qtApp.Open ":\D\Extest", True ' Open the test in read-only mode

Set qtTest = qtApp.Test 'set run settings for the test

qtResultsobj.TDRunName = "Run 8-21 13-46-14"
qtResultsobj.TDTestInstance = 1
qtResultsobj.TDTestSet = "[QualityCenter] Root\Trash\Test_MW_QTP"
qtTest.Run qtResultsObj ' Run the test
qtTest.Close ' Close the test

Please help to solve this issue
Thanks
Leninraj