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

Reply via email to