51Testing软件测试论坛

标题: 新手使用datapool,求助！！！ [打印本页]

作者: final 时间: 2004-7-23 10:11
标题: 新手使用datapool,求助！！！
我在使用robot录制脚本一次时，每次回放只能使用一组数据，我想产生多组
随机数据，然后连续播放，我将 rational robot和 Ratioal TestManage共同使用，首先用 datapools 产生了20组数据（默认的），我录制的是一个用户注册的过程，字段名有：*用户ID，*密码，*确认密码，*管理员类型，*公司名，*名称 *电子邮箱，电话，手机，传真，然后我在脚本中该如何引用这些数据呢，

我的数据池名称是mypool,以下是我参考帮助加以修改写的代码，但是我回放不出来哦，不知道是不是哪里出了问题，望指点一二，谢谢！

'include"sqautil.sbh"

Sub Main
Dim Result As Integer
Dim x As integer

' open a datapool name mypool
dp=SQADatapoolOpen("mypool")

'perform the transaction 20 times,using a new set of data from the datapool each time
for x=1 to 20
'fetch a row from the datapool
call SQADatapoolFetch(dp)
'begin the transaction
'credit card Number
Window SetContext, "Caption=后台管理 - Microsoft Internet Explorer", ""
Browser SetFrame,"Type=HTMLFrame;HTMLId=leftFrame",""
Browser NewPage,"",""
HTMLLink Click, "Type=HTMLLink;HTMLText=Admin Management", ""
HTMLLink Click, "Type=HTMLLink;HTMLText=管理员列表", ""
Browser SetFrame,"Type=HTMLFrame;HTMLId=mainframe",""
Browser NewPage,"",""

EditBox Click, "Type=EditBox;Name=login", "Coords=28,16"

'assign 用户名 a value from datapool column #1
call SQADatapoolvalue(dp,1,*用户ID)
InputKeys "*用户ID"

EditBox Click, "Type=EditBox;Name=login", "Coords=35,17"
EditBox Click, "Type=EditBox;Name=password", "Coords=35,17"
call SQADatapoolvalue(dp,2,*密码)
InputKeys "*密码"

EditBox Click, "Type=EditBox;Name=password1", "Coords=31,10"
call SQADatapoolvalue(dp,3,*确认密码)
InputKeys "*确认密码"

ComboBox Click, "Type=ComboBox;Name=usertype", ""
ComboListBox Click, "Type=ComboListBox;Name=usertype", "Text=Site Admin"
EditBox Click, "Type=EditBox;Name=companyname", "Coords=17,14"
call SQADatapoolvalue(dp,4,*公司名)
InputKeys "*公司名"

EditBox Click, "Type=EditBox;Name=name", "Coords=26,13"
call SQADatapoolvalue(dp,5,*名称)
InputKeys "*名称"

EditBox Click, "Type=EditBox;Name=email", "Coords=25,7"
call SQADatapoolvalue(dp,6,*电子邮箱)
InputKeys "*电子邮箱"

EditBox Click, "Type=EditBox;Name=phone", "Coords=32,9"
call SQADatapoolvalue(dp,7,电话)
InputKeys "电话"

EditBox Click, "Type=EditBox;Name=mobile", "Coords=21,4"
call SQADatapoolvalue(dp,8,手机)
InputKeys "手机"

EditBox Click, "Type=EditBox;Name=fax", "Coords=44,14"
call SQADatapoolvalue(dp,9,传真)
InputKeys "传真"
PushButton Click, "Type=PushButton;Name=Submit6"
Browser NewPage,"",""
PushButton Click, "Type=PushButton;Name=Submit63"

next x

End Sub

作者: pcl2004_27 时间: 2004-7-23 10:51
你的代码是不是到 InputKeys 语句就都不能运行了？
比如：
call SQADatapoolvalue(dp,1,*用户ID) 这里 “*用户ID“是变量
InputKeys "*用户ID"       这里你用括号那么inputkeys 输入的是"*用户ID“，而不是你从datapool获取的值。

   call SQADatapoolvalue(dp,1,*用户ID)
   InputKeys *用户ID

   而且  *用户ID 没有作为变量声明

   看看我写datapool的介绍和实际使用，对你有帮助的

作者: final 时间: 2004-7-24 09:10
谢谢指点啊，我试了一下，目前还只能到数据池中取一次数据，我会继续努力的！

作者: pcl2004_27 时间: 2004-7-26 17:23
你没有加入循环，当然就只能操作一次！

做个大循环就可以了

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)