谁可以将自己在winrunner上写的脚本程序拿上来参考一下吗?
现在很想看看大家是怎么样写自己的脚本的,谁可以贡献一下,谢谢了。 手里没有winrunner写的脚本程序!传上来一个robot的登陆脚本!
'##############################################
'#
'# 脚本名称 :登陆
'# 日期 :2004-7-15
'# 最后修改日期 :2004-7-15
'# 开发者姓名 :xxxx
'# 被测试软件名称 :xxxxx系统
'# 开发语言 :c#
'# 目的 :自动登陆
'#
'##############################################
Sub Main
Dim Result As Integer
Dim Status as long
Dim varUserName as String
Dim varPassWord as String
Dim iLen as integer
'Initially Recorded: 2004-7-1510:52:33 上午
'Script Name: StartOA
StartApplication "C:\Program Files\Uncnet\OAClient\StartClient.exe"
Window SetContext, "Class=WindowsForms.Window.8;Level=2", ""
EditBox Click, "ObjectIndex=2", "Coords=4,10"
Status = SQAGetProperty ("Type=EditBox;ObjectIndex=2", "Text", varUserName)
if Status = 0 then
for iLen = 0 toLen(varUserName)
InputKeys "{DELETE}"
Next iLen
Status = SQAGetProperty ("ObjectIndex=2", "Text", varUserName)
if Status = 0 and len(varUserName) = 0 then
InputKeys "pcl"
Window SetContext, "Class=WindowsForms.Window.8;Level=2", ""
EditBox Click, "ObjectIndex=1", "Coords=9,15"
InputKeys "123"
end if
else
SQALogMessage sqaFail, "无法得到当前用户名", varUserName
Exit sub
end if
GenericObject Click, "Class=WindowsForms.Window.8;ClassIndex=2", "Coords=26,8"
'验证点
End Sub
winrunner提供的脚本例子很有参考价值!可以自己研究一下!
[ Last edited by pcl2004_27 on 2004-7-20 at 11:30 ] 你用robot测试c#编的程序,用winrunner行吗?我现在正准备用winrunner测试c#编的程序。 用winrunner测试的是程序的功能,基本上和程序是用什么语言写的无关。难点只在于不同的语言写出来的程序可能会有些控件使它无法识别。 对于winrunner解决.net的问题,据我所知没有好的办法!mercury for .net只提供了 td,qtp,lr等对net的支持,而且winrunner的最新版本为7.6
页:
[1]