如何通过计划任务调用QuickTest测试脚本
来源：本站原创|时间：2022-11-25|栏目：vb|
我们可以编写一个Vbs脚本，直接在Windows平台下直接运行调用qtp的测试脚本，也可以将这个脚本添加到计划任务中，可以定时执行。
脚本如下：
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
复制代码 代码如下:
Dim qtApp
Dim qtTest
Dim qtResultsOpt
Set qtApp = CreateObject("QuickTest.Application")
qtApp.Launch
qtApp.Visible = True
qtApp.Open "C:\QuickTest Professional\tests\test1\test1.usr", True
Set qtTest = qtApp.Test
qtTest.Settings.Run.OnError = "NextStep"
Set qtResultsOpt = CreateObject("QuickTest.RunResultsOptions")
qtResultsOpt.ResultsLocation = "C:\QuickTest Professional\tests\test1\"
qtTest.Run
Set qtResultsOpt = Nothing
Set qtTest = Nothing
Set qtApp = Nothing
您可能感兴趣的文章
- 01-10如何使用脚本锁定任务栏？
- 01-10如何产生真正的随机函数？
- 01-10运行脚本之前，如何确定计算机上的默认脚本宿主的代码
- 01-10如何调试JScript/VBScript的方法
- 01-10vbs下通过日期查找文件夹的代码
- 01-10VBS如何察看或获得剪切板内容的脚本
- 01-10教你如何解密js/vbs/vbscript加密的编码异处理小结
- 01-10用vbs通过135端口执行命令的脚本
- 01-10利用计划任务和VBS脚本实现自动WEB共享文件夹里的文件
- 01-10VBS 数字转英文代码
