空间管理您的位置: 51Testing软件测试网 » 子木清风 » 日志

不要追求绝对的公平，红尘之中没有公平而言，人活一世，难得糊涂。　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　it is no use doing what you like, you have got to like what you do.

Robot的命令行启动/如何让脚本定时运行

上一篇 / 下一篇 2007-01-26 15:47:48 / 个人分类：Robot技术

查看( 2361 ) / 评论( 1 ) / 评分( 0 / 0 )

这篇文章是基于论坛上一个问题 “ 如何让脚本定时运行 ” ，提供的一个解决方案。我们都听说过自动化测试应用于每日构建，每天在下班之后编译版本，定时启动自动化测试脚本进行功能测试，第二天相关人员收到相应的报告。但是如何启动自动化测试工具呢，这里主要针对于 Rational Robot 的提供一种实现方法。

因为 Rational Robot 支持从命令行启动脚本，所以我们很容易在命令行中启动它。具体参考 Rational Robot User's Guide 。基本的命令行语法结构如下：

Rtrobo.exe [scrīptname] [/user userid] [/password PassWrod] [/project Full - path- and – full - projectname] [/play] [/purify] [/quantify] [/coverage] [/build build] [/logfolder foldername] [/log logname] [/nolog] [/close]

元素
描述

Rtrobo.exe
Rational robot 执行文件

scrīptname
要运行的脚本名称

/user userid
登陆用户名

/password password
登陆用户名密码，如果用户名没有密码，不用该参数

/Project full path and full projectname
包含脚本的工程名字和工程路径

/play
如果指定了关键字，运行 scrīptname 指定的脚本，如果没有指定，只是在编辑器中打开脚本

/purify
和 /play 参数一起使用，在 rational Purify 下回放 scrīptname 参数指定的脚本

/quantify
和 /play 参数一起使用，在 rational quantify 下回放 scrīptname 参数指定的脚本

/coverage
和 /play 参数一起使用，在 rational purecoverage 下回放 scrīptname 参数指定的脚本

/build build
脚本编译名字

/logfolder foldername
存放测试日志文件的文件夹名称，日志文件夹和 build 参数相关联

/log logname
日志文件名称

/nolog
当脚本回放时不输出任何日志文件

/close
回放脚本后关闭 robot

例：用户 admin 启动 testProject 工程脚本 test ，命令行语法如下：

rtrobo.exe test /user admin /project c:\Program\robot\testDelphi\testProject.rsp /play

那如何定时启动呢，在 Windows 系统中有 “ 任务计划 ” 提供了定时启动功能，通过它可以预定一些软件在规定的时间运行。利用 “ 任务计划 ” ，可以将任何脚本、程序或文档安排在某个最方便的时间运行。 “ 任务计划 ” 在每次启动 Windows 的时候开始启动并在后台运行。那么我们完全可以利用它来完成 “ 不可能的任务 ” 。

在计划任务中添加任务那么就可以定时启动 Rational robot 运行脚本。操作如下：

1 ．开始 - 〉设置 - 〉控制面板

2 ．打开计划任务向导

3 ．添加启动任务，设置启动时间

4 ．修改计划任务运行中参数如下：

"c:\Program Files\Rational\Rational Test\rtrobo.exe" test /user admin /project c:\Program\robot\testDelphi\testProject.rsp /play

Rational Robot 在预定时间定时启动了。问题得到解决。

备注：运行过程中仍需要设置相关参数，否则阻止运行。比如默认情况下，脚本运行都会启动编译窗口。这里除了命令行设置参数外还可以设置 Robot 中 GUI Playback Option 窗体的 log 页面 use default log information 项。这样在无人职守的情况下，启动测试工具不会由于测试工具自身设置中止运行。

但是实际工作需要更加灵活的功能，比如曾经笔者所在公司开发软件为组态监控软件，利用组态软件开发的一个项目是控制大厦的空调系统在夜里定时重新启动。进行功能测试时候，我们不可能真的等到夜里才进行测试（估计夜里上班公司也不会批准给加班费 ^_^ ），按照计划任务的实现方法有一定局限性不能随心所欲启动机器进行功能测试。

熟悉 Windows 编程的人都知道 API 函数 ExitWindowsEx 可以实现重新启动系统的功能 ( 具体的用法参看 MSDN) 。这样只要调用 ExitWindowEx 函数重新启动系统后启动 Rational Robot 运行需要的脚本就可以达到任何时候启动系统继续进行功能测试的目的。

一般情况下登陆系统时需要输入登陆名和密码，如果不能自动登陆，那么就成为运行脚本进行测试的障碍。在注册表 HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon 位置添加 DefaultDomainName,DefaultUserName,DefaultPassword 三项，赋予相应的值。重新启动系统后自动登陆。

那么最后面对的一个问题就是怎样让 robot 随着系统而启动。这个相对来说比较简单，在系统开始启动菜单中建立一个快捷方式就可以实现随着系统启动的功能，其实就是在注册表 HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run 中添加键值。附录提供笔者实现的 robot 脚本代码供大家参考。

Brian Bryson 提供组件 – RobotHelperComponent 帮助我们实现利用 Robot 重新启动系统并启动 Rational Robot 运行脚本的功能。该组件下载地址为：

http://www-106.ibm.com/developer ... HelperComponent.zip

关于该组件的介绍请看 Brian Bryson 的 Rebooting Your System 一文。该文地址：

http://www-106.ibm.com/developerworks/rational/library/959.html

本文到此告以结束，希望大家对于 Rational Robot 的启动问题有了一个满意的答案。

参考：

•  Microsoft MSDN2003

•  Rational Robot User Guide

•  Rational Robot Tips and Techniques: Rebooting Your System – 作者 Brian Bryson

附录：

Const REG_SZ=1

Global Const HKEY_LOCAL_MACHINE = ＆ H80000002

Declare Function RegOpenKey Lib“advapi 32” Alias “RegOpenKeyA”(ByVal hkey As Long, ByVal lpszSubKey As String,phkResult As Long) As Long

Declare Function RegSetValueEx Lib “advapi 32” Alias “RegSetValueExA” (ByVal hkey As Long,ByVal lpszValueName As String,ByVal dwReserved As Long,ByVal fdwType As Long, lpbData As Any,ByVal cbData As Long) As Long

Declare Function RegQueryValueEx Lib "advapi32.dll" Alias "RegQueryValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, lpType As Long, lpData As Any, lpcbData As Long) As Long

Declare Function RegCloseKey Lib “advapi 32” Alias “RegCloseKey” (ByVal hkey As Long) As Long

编写功能函数

Function oRegOpenKey (ByVal hkey As Long, ByVal lpszSubKey As String,phkResult As Long) As Boolean

Dim lResult As Long

On Error GoTo 0 ' 错误跳转

lResult=RegOpenKey(hkey,lpszSubKey,phkResult)

If lResult=0 Then

ōRegOpenKey=True

Else ōRegOpenKey=False

End If

End Function

Function RegSetStringValue(ByVal hKey As Long, ByVal strValueName As String, ByVal strData As String, Optional ByVal fLog) As Boolean

Dim lResult As Long

On Error GoTo 0

lResult = RegSetValueEx(hKey, strValueName, 0&, REG_SZ, ByVal strData, LenB(StrConv(strData, vbFromUnicode)) + 1)

If lResult = 0 Then

RegSetStringValue = True

Else

RegSetStringValue = False

End If

End Function

调用函数测试代码

Sub Main

Dim hkey As Long

Dim MyReturn As Long

MyReturn=oRegOpenkey(HKEY_LOCAL_MACHINE,

“SOFTWARE\Microsoft\Windows\CurrentVersion\Run”,hkey)

If hkey=0 Then

MsgBox “ 主键未创建或者输入有误，请仔细核对后再次运行本程序！ ”

Exit Sub

End If

MyReturn=RegSetStringValue(hkey, “robot”,“”” 路径 / rtrobo.exe”” test /user admin /project c:\Program\robot\testDelphi\testProject.rsp /play ”,False)

If MyReturn Then

MsgBox “ 您的程序已成功添加到系统启动中，再次启动 Windows 时系统将自动运行您的程序！ ”

Else

MsgBox “ 代码中存在错误 ”

End If

RegCloseKey(hkey)

End Sub

以上代码在 Rational Robot 2002 上测试通过。

用户菜单

我的栏目

标题搜索

日历

数据统计

访问量: 305101
日志数: 261
图片数: 5
文件数: 20
书签数: 5
建立时间: 2006-12-06
更新时间: 2011-08-31

Robot的命令行启动/如何让脚本定时运行

相关阅读:

用户菜单

我的栏目

标题搜索

日历

我的存档

数据统计

RSS订阅