51Testing软件测试论坛

标题: 自动启动QTP执行测试的vbs脚本! [打印本页]

作者: skysolf    时间: 2007-10-27 10:48
标题: 自动启动QTP执行测试的vbs脚本!
  1. Dim qtApp 'As QuickTest.Application ' Declare the Application object variable
  2. Dim pDefColl 'As QuickTest.ParameterDefinitions ' Declare a Parameter Definitions collection
  3. Dim pDef ' As QuickTest.ParameterDefinition ' Declare a ParameterDefinition object
  4. Dim rtParams 'As QuickTest.Parameters ' Declare a Parameters collection
  5. Dim rtParam ' As QuickTest.Parameter ' Declare a Parameter object
  6. 'Dim cnt, Indx As Integer

  7. Set qtApp = CreateObject("QuickTest.Application") ' Create the Application object
  8. qtApp.Launch ' Start QuickTest
  9. qtApp.Visible = True ' Make the QuickTest application visible
  10. qtApp.Open "D:\Test1"  //该目录为用例的QTP文件保存文件夹
  11. qtApp.Test.Run , True' Run the test with changed parameters.
复制代码

作者: hsjzfling    时间: 2007-10-27 21:07
补充一下,这个是QTP中的automation object model中的一点点内容,楼主贴的只是帮助中的一小部分代码,更多详情尽在帮助中~~
当然QTP中有几处Generate script的,点了之后也能生成这样的代码,都是对QTP中相关设置的保存~
作者: xiaoyaoke    时间: 2007-10-28 13:23
//该目录为用例的QTP文件保存文件夹
这句前面加“‘”标为注释...
作者: three116    时间: 2007-10-29 20:07
我将在我的 地址中增加完整的 东西
我已经写好了 改天 加进来  呵呵
作者: hsjzfling    时间: 2007-10-29 20:44
每个人的习惯不同,并且针对不同的被测对象和不同的需求,对QTP都会有不同的设置,所以只要知道这个东西是怎么回事就好了,真的弄个完整的过来也没多大意义——知道方法的人都会弄
在我正在设计、开发的框架中其实就有一点内容关于automation object model,用来载入框架默认的和user指定的各种设置,动态加载对象库也会用到这个~




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2