Hi All,

I am trying to update the Test case status in the test status as either 
"Failed" or "Passed". The following code is not doing that. Can someone 
throw some light on it?

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