QTP Automate

[eroshan]

[quote='eroshan' pid='7365' dateline='1252481459']
[quote='Saket' pid='7364' dateline='1252480395']

Hi Saket

There is a small question about vbs. i want to close the QTP tool window after run the the test. What is the line should i add to the script??

This is the script =>

Code:

Dim qtpApp
                                   Dim qtpTest
                                     Set qtpApp = CreateObject("QuickTest.Application")
                                     qtpApp.Visible = true
                                     qtpApp.Open "C:\QA Tools\eroshan\Test1", True
                                     Set qtpTest = qtpApp.Test
                                     qtpTest.Run

                                    Set qtTest = Nothing
                                    Set qtApp = Nothing

Thanks