ppguo 发表于 2016-9-29 11:48:32

求助UFT12怎么用vbs脚本启动并执行测试过程

求助UFT12怎么用vbs脚本启动并执行测试过程

歪歪只是嗨皮 发表于 2016-9-29 17:30:02

本帖最后由 歪歪只是嗨皮 于 2016-9-29 17:40 编辑

Dim qtApp'创建UFT实例
Set qtApp = CreateObject("QuickTest.Application")
'启动UFT实例
qtApp.Launch
qtApp.Visible = true
'打开相应的UFT脚本(如脚本为保存在D盘的Test1)
qtApp.Open "D:\Test1"
Set qtTest= qtApp.Test
Set objTestRecovery = qtApp.Test.Settings.Recovery
'设置UFT存储报告的目录
Set qtResultsOpt = CreateObject("QuickTest.RunResultsOptions")
'运行UFTqtTest.Run qtResultsOpt
'运行完毕,退出脚本
qtTest.Close
'测试任务结束后,退出UFT实例
qtApp.quit
Set qtApp = Nothing
页: [1]
查看完整版本: 求助UFT12怎么用vbs脚本启动并执行测试过程