Hi Sarav,

I have to export results to separate excel sheet and not in Results itself.
Do you have the code for this?

Thanks
Saravanan

On Thu, May 12, 2011 at 12:45 PM, Sarav . <[email protected]> wrote:

> Hi Saravanan,
>
> Instead of going for QTP results, you can put a code in
>
> "Report. reportevent" and write your results to excel. This will help you
> to get the results till the point the scripts is run. You will lot more
> advantage out of fit.
>
> Thanks,
> Sarav.
>
> On Thu, May 12, 2011 at 10:25 AM, Saravanan M <[email protected]>wrote:
>
>> Can you please send me the sample code for this
>>
>> Thanks/Regards
>> Saravanan.M
>>
>>
>> On Wed, May 11, 2011 at 10:31 PM, Saravanan M <[email protected]>wrote:
>>
>>> Thank u Sreedhar....
>>>
>>>
>>> On Wed, May 11, 2011 at 6:12 PM, Sreedhar <[email protected]>wrote:
>>>
>>>>  Before you close the test, write back the start time, end time, test
>>>> name & status to datable. Once it finishes the loop and comes to the end,
>>>> export that sheet to your local dir.
>>>>
>>>> Sent from my iPhone
>>>>
>>>> On May 10, 2011, at 9:51 PM, Saravanan M <[email protected]>
>>>> wrote:
>>>>
>>>>    Hi Friends,
>>>>
>>>> I'm having set of scripts to execute in driver script. After executing
>>>> my driver script that particular test results are stored in corresponding
>>>> test folder (Result.xml). But I need to export some of the results to Excel
>>>> sheet like Test Script name, Status, Start time and End Time. Is this
>>>> possible? Herewith am attaching my driver script.
>>>>
>>>> Anyone pls help me out this one.
>>>>
>>>> Driver Script here:
>>>>
>>>>  Dim App
>>>> Set App = CreateObject("QuickTest.Application")
>>>> App.Launch
>>>> App.Visible = True
>>>>
>>>> Dim QTP_Tests(2)
>>>> QTP_Tests(1) = "C:\Program Files\HP\QuickTest Professional\Tests\Test 1"
>>>> QTP_Tests(2) = "C:\Program Files\HP\QuickTest Professional\Tests\Test 2"
>>>>
>>>> Set res_obj = CreateObject("QuickTest.RunResultsOptions")
>>>>
>>>> For i = 1 to UBound (QTP_Tests)
>>>> App.Open QTP_Tests(i), True
>>>> Set QTP_Test = App.Test
>>>> res_obj.ResultsLocation = QTP_Tests(i) & "\Res1"
>>>>
>>>> QTP_Test.Run res_obj, True
>>>> QTP_Test.Close
>>>> Next
>>>>
>>>> App.Quit
>>>>
>>>> Set res_obj = nothing
>>>> Set QTP_Test = nothing
>>>> Set App = nothing
>>>>
>>>>
>>>>
>>>> Regards,
>>>> Saravanan M
>>>>
>>>>
>>>>
>>>>
>>>> --
>>>> 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]>
>>>> [email protected]
>>>> To unsubscribe from this group, send email to
>>>> <[email protected]>
>>>> [email protected]
>>>> For more options, visit this group at
>>>> <http://groups.google.com/group/MercuryQTP?hl=en>
>>>> http://groups.google.com/group/MercuryQTP?hl=en
>>>>
>>>> --
>>>> 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
>> "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
> "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
"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

Reply via email to