Hi All,

The following code is not updating the status of the test cases in the Test 
Set. Can someone throw some light on why it is not updating the status?
On error resume next
  Set TestSet = QCUtil.CurrentTestSet
      TestSetName = TestSet.name
      Msgbox "TestSetName : "&TestSetName

      Set TSTestSetList = QCUtil.CurrentTestSet.TSTestFactory.NewList("")
      For each tests in TSTestSetList
        Msgbox "tests.Name :"&tests.Name
          If Instr(tests.Name, "02.03.10.02.02 .100 Google_Search_Program") 
<> 0 Then                                                
             tests.field("TC_STATUS") = "Passed"
             tests.status = "Passed"
             tests.Post
             Exit For
           End If
      Next

    Set TSTestSetList = Nothing
    Set TestSet = Nothing
 Thanks,
Narin

-- 
-- 
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en

--- 
You received this message because you are subscribed to the Google Groups "QTP 
- HP Quick Test Professional - Automated Software Testing" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
For more options, visit https://groups.google.com/d/optout.

Reply via email to