QTP如何启动应用程序(转)

qtp提供了很多自动启动应用程序的办法，方法如下：
        1)SystemUtil.Run 允许启动新的进程
        格式：SystemUtil.Run file, [params], [dir], [op], [mode]
        下面代码利用SystemUtil对象如何启动进程。

        '启动IE

SystemUtil.Run "iexplore.exe"          SystemUtil.Run "iexplore.exe", "http://www.51testing.com/?72" '打开pcl blog          SystemUtil.Run "iexplore.exe", "http://www.knowledgeinbox.com", , , 3

        '打开电影播放器
         SystemUtil.Run "mplayerc.exe  E:\movie\[2007.12.16]尖峰时刻3[2007成龙动作]（帝国出品）\影视帝国(bbs.cnxp.com).尖峰时刻3.Rush.Hour.3.2007.DVDRip.cd1.rmvb  /play"

        2)InvokeApplication 启动应用程序
        格式：InvokeApplication(Command [,StartIn])

        例子：
        '启动ie
           InvokeApplication "IEXPLORE.EXE"
        '启动计算器
           InvokeApplication "calc.exe"

        3) COM - Wsh
           利用Wsh对象进行启动
        例子：

Dim oShell            set ōShell= CreateObject ("Wscrīpt.shell")            oShell.Run "IEXPLORE.EXE"            Set ōShell = Nothing

        4)Qtp自动启动应用程序
          Qtp打开 Automation-〉Record and Run Settings 下进行设置

        5)录制启动过程

Dialog("运行").WinEdit("打开(O):").Set "calc"          Dialog("运行").WinButton("确定").Click