51Testing软件测试论坛

标题: 怎样录制这样的脚本？ [打印本页]

作者: zhengpeipei 时间: 2009-7-2 15:14
标题: 怎样录制这样的脚本？
最近在录制一个页面的脚本时遇到麻烦，见下图，我对第一个提示信息插入标准检查点，选择的是webtable对象，然后对表格中提示信息的那一列做了参数化。问题是：怎样获取列表中的值呢，因为其值为多个，我想把它们赋给一个数组，但怎么赋呢，请高手给出答复，最好将脚本写一下，谢谢了！！！
很想知道这类问题的解决方法：提示信息是在文本框后给出的，而不是跳出对话框给出的，是否需要插入检查点，插入检查点后怎么进行判断呢？希望各位大侠们指点一下，最好能给出判断的脚本，多谢了！！！

[ 本帖最后由 zhengpeipei 于 2009-7-7 11:46 编辑 ]

作者: zhengpeipei 时间: 2009-7-2 15:25
我用下面的语句来试了一下，QTP报错：类型不匹配，应该怎样写呢？
For j=2 to 10
status(j,2)=Browser("xxx").Page("xxx").Frame("xxx").WebTable("广告类型：").GetCellData(j,2)
j=j+1
Next

作者: 我是别人的马甲 时间: 2009-7-2 15:41
每一个标准检查点对应table中的一个值，我记得只能是这样~所以，一个标准点你就对应表格中的一个值吧

作者: zhou840401 时间: 2009-7-2 15:46

原帖由 zhengpeipei 于 2009-7-2 15:25 发表
我用下面的语句来试了一下，QTP报错：类型不匹配，应该怎样写呢？
For j=2 to 10
status(j,2)=Browser("xxx").Page("xxx").Frame("xxx").WebTable("广告类型：").GetCellData(j,2)
j=j+1
Next

for循环了,还j=j+1??有点不明白了,这个地方,for本身增加的步长默认的就是自动+1的了,不知道你的原意是不是步长为2的,如果是的话,最好就这样写了for j=2 to 10 setp 2
类型不匹配,是不是你原来定义了一个一维数组 status,但是使用的时候当成二维的来用

作者: lvguobin 时间: 2009-7-2 16:05
N=Browser("xxx").Page("xxx").Frame("xxx").WebComboBox("xxx").getItemsCount
For i=0 to N-1
myarray=Browser("xxx").Page("xxx").Frame("xxx").WebComboBox("xxx").getItem(i)
Next

作者: zhengpeipei 时间: 2009-7-2 16:27
标题: 回复5#的帖子
webtable对象没有getItemsCount方法啊，只有GetCellData（行，列）

作者: lvguobin 时间: 2009-7-2 17:08
那你变通一下撒！
N=Browser("xxx").Page("xxx").Frame("xxx").WebList("xxx").GetRoProperty("items count")
For i=0 to N-1
myarray=Browser("xxx").Page("xxx").Frame("xxx").WebList("xxx").getItem(i)
Next

作者: zhengpeipei 时间: 2009-7-3 09:12
那位高手可以给一个类似的页面的脚本来参考学习一下，因为刚涉及QTP，想对这块学习一下。
谢谢！！！

作者: lijinshui 时间: 2009-7-3 14:34
我觉得你可以参考一下Dictionary这个类似于数据字典的一个数据结构，它是动态的可以自己判断下标值，你只管赋值具体用法你可以参考HELP里面的列子

作者: zhengpeipei 时间: 2009-7-6 10:21
像这样类型的脚本，我怎么判断这些提示信息的存在呢，并且这些提示信息一个文本框后不止一种提示信息？

作者: zhengpeipei 时间: 2009-7-6 10:29
标题: 回复7#的帖子
我试了一下，回放时报错：The statement contains one or more invalid function arguments.

作者: zhengpeipei 时间: 2009-7-6 14:24

作者: zhengpeipei 时间: 2009-7-7 11:42
各位高手指点一下啊

作者: zhengpeipei 时间: 2009-7-7 18:00

作者: ziva 时间: 2009-7-9 14:01
“很想知道这类问题的解决方法：提示信息是在文本框后给出的，而不是跳出对话框给出的，是否需要插入检查点，插入检查点后怎么进行判断呢？希望各位大侠们指点一下，最好能给出判断的脚本，多谢了！！！”
这个在之前有看到一个类似的帖子，这个是innerhtml，它的解决方法如下：
dim desc
set desc=description.create
desc("classname").value="webelement"
desc("innerhtml").value="请选择..."
if browser("xxx").page("xxx").frame("xxx").webelement(desc).exist then
reporter.xxx
else
reporter.xxx
end if

作者: ziva 时间: 2009-7-9 14:06
“问题是：怎样获取列表中的值呢，因为其值为多个，我想把它们赋给一个数组，但怎么赋呢，请高手给出答复，最好将脚本写一下，谢谢了！！！”
至于这个的话，是否可以把下拉列表里的各个选项值写在datatable里面作为一列，然后用语句去逐条取值。不知道是否是你想要的结果？

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