51Testing软件测试论坛

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

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 1379|回复: 2
打印 上一主题 下一主题

[原创] Schedule的方法创建脚本运行的问题

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2008-7-8 09:27:33 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
创建脚本自动运行,我用Schedule的方法创建一个vbs文件可以成功。
现在是脚本每次运行后得到的一个结果按照生成的这个vbs文件中的目录存放时,会把之前产生的结果文件给清掉,可以不可以用追加的方法把所有的文件都保存下来?
  这段代码是通用的,但是用过的人有没有因为这个问题很郁闷呢     我就一不小心把之前很多脚本给清掉了啊!!!

这是代码:
Dim qtApp 'As QuickTest.Application ' Declare the Application object variable
Dim qtTest 'As QuickTest.Test ' Declare a Test object variable
Dim qtResultsOpt 'As QuickTest.RunResultsOptions ' Declare a Run Results Options object variable
Set qtApp = CreateObject("QuickTest.Application") ' Create the Application object
qtApp.Launch ' Start QuickTest
qtApp.Visible = True ' Make the QuickTest application visible
' Set QuickTest run options
qtApp.Options.Run.ImageCaptureForTestResults = "OnError"
qtApp.Options.Run.RunMode = "Fast"
qtApp.Open "E:\test\001", True ' Open the test in read-only mode
' set run settings for the test
Set qtTest = qtApp.Test
qtTest.Settings.Run.OnError = "NextStep" ' Instruct QuickTest to perform next step when error occurs
Set qtResultsOpt = CreateObject("QuickTest.RunResultsOptions") ' Create the Run Results Options object
qtResultsOpt.ResultsLocation = "E:\test\002" ' Set the results location
qtTest.Run ' Run the test
'qtTest.Close ' Close the test
Set qtResultsOpt = Nothing ' Release the Run Results Options object
Set qtTest = Nothing ' Release the Test object
Set qtApp = Nothing ' Release the Application object

本来002中有很多的东西,但是在运行过001脚本后全没了!!!
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

3#
 楼主| 发表于 2008-7-9 17:15:10 | 只看该作者
谢谢~~~!!可用
回复 支持 反对

使用道具 举报

该用户从未签到

2#
发表于 2008-7-8 14:36:00 | 只看该作者
ResultsLocation 用于指定测试结果的输出目录。

可以用日期时间作为目录名,或者以递增的数字作为目录名,这样就不会每次都往相同的目录写测试结果了。


推荐新书《QTP自动化测试实践》
回复 支持 反对

使用道具 举报

本版积分规则

关闭

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

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

GMT+8, 2024-11-25 01:51 , Processed in 0.070116 second(s), 28 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

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