51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 2748|回复: 9
打印 上一主题 下一主题

[原创] 如何全自动运行QUICKTEST PREFESSION 脚本

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2006-10-9 11:44:33 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
现在已经录制好50个脚本。
想每天凌晨1:00让它们自动跑,跑完后生成report。请问有什么方案解决?
谢谢。

目前考虑了两个方案:
1。将脚本添加到batch runner,通过批处理完成。
2。将脚本添家到QTPlus Automation Generator里,通过批处理完成。

但不知道怎么在批处理中编写-------装载已经存在的文件(batch runner中的.mbt文件或者QTPlus Automation Generator中的.sfl文件),并运行。

请求帮助。
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
发表于 2006-10-9 11:52:54 | 只看该作者
也可以运用一些自动化脚本,可以到帮助里查看

'************************************************************************************************************************
'描述:
'
'该示例打开测试,配置运行选项和设置,
'运行该测试,然后检查测试运行的结果。
'
'假定:
'QuickTest 中当前未打开没有保存的测试。
'有关详细信息,请参阅 Test.SaveAs 方法的示例。
'打开 QuickTest 时,将加载测试所必需的加载项。
'有关详细信息,请参阅 Test.GetAssociatedAddins 方法的示例。
'************************************************************************************************************************

Dim qtApp ' As QuickTest.Application ' 声明 Application 对象变量
Dim qtTest 'As QuickTest.Test ' 声明 Test 对象变量
Dim qtResultsOpt 'As QuickTest.RunResultsOptions ' 声明 Run Results Options 对象变量

Set qtApp = CreateObject("QuickTest.Application") ' 创建 Application 对象
qtApp.Launch ' 启动 QuickTest
qtApp.Visible = True ' 使 QuickTest 应用程序可见

' 设置 QuickTest 运行选项
qtApp.Options.Run.CaptureForTestResults = "OnError"
qtApp.Options.Run.RunMode = "Fast"
qtApp.Options.Run.ViewResults = False

qtApp.Open "C:\Tests\Test1", True ' 以只读模式打开测试

' 为测试设置运行设置
Set qtTest = qtApp.Test
qtTest.Settings.Run.IterationMode = "rngIterations" ' 仅运行循环 2 到 4
qtTest.Settings.Run.StartIteration = 2
qtTest.Settings.Run.EndIteration = 4
qtTest.Settings.Run.OnError = "NextStep" ' 指示 QuickTest 在发生错误时执行下一步骤

Set qtResultsOpt = CreateObject("QuickTest.RunResultsOptions") ' 创建 Run Results Options 对象
qtResultsOpt.ResultsLocation = "C:\Tests\Test1\Res1" ' 设置结果位置

qtTest.Run qtResultsOpt ' 运行测试

MsgBox qtTest.LastRunResults.Status ' 检查测试运行的结果
qtTest.Close ' 关闭测试

Set qtResultsOpt = Nothing ' 释放 Run Results Options 对象
Set qtTest = Nothing ' 释放 Test 对象
Set qtApp = Nothing ' 释放 Application 对象
回复 支持 反对

使用道具 举报

该用户从未签到

3#
发表于 2006-10-9 14:48:04 | 只看该作者
banban 是人才。。。。
回复 支持 反对

使用道具 举报

该用户从未签到

4#
 楼主| 发表于 2006-10-9 15:33:33 | 只看该作者

已经搞定。

方法如下:
建立bat文件,采用QTPlusAutomationGenerator命令。
回复 支持 反对

使用道具 举报

该用户从未签到

5#
发表于 2006-10-10 10:01:37 | 只看该作者
楼主,能不能把文件也贴出来,SHOW 一下啊。
回复 支持 反对

使用道具 举报

该用户从未签到

6#
发表于 2007-2-27 16:24:25 | 只看该作者
xiaonan的方法我试了一下,运行后打开了另外一个文件但是不能运行并且qtp出错,请楼主展示一下代码

[ 本帖最后由 suifengpiao 于 2007-2-27 16:35 编辑 ]
回复 支持 反对

使用道具 举报

该用户从未签到

7#
发表于 2007-3-1 10:34:50 | 只看该作者
最简单的是用QC啊,和QTP联在一起不就很容易的搞定啦?!
回复 支持 反对

使用道具 举报

该用户从未签到

8#
发表于 2007-8-29 23:38:30 | 只看该作者
能不能把文件也贴出来
回复 支持 反对

使用道具 举报

  • TA的每日心情
    奋斗
    2022-7-13 15:22
  • 签到天数: 1 天

    连续签到: 1 天

    [LV.1]测试小兵

    9#
    发表于 2007-8-30 11:31:06 | 只看该作者
    我也很感兴趣,请共享下
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    10#
    发表于 2007-8-30 16:51:19 | 只看该作者
    我之前写过一个这样的脚本,参考下

    http://bbs.51testing.com/viewthread.php?tid=85378
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

    站长推荐上一条 /1 下一条

    小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

    GMT+8, 2024-11-26 19:47 , Processed in 0.076074 second(s), 28 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

    快速回复 返回顶部 返回列表