51Testing软件测试论坛

标题: 循环+参数化， [打印本页]

作者: hedy7432 时间: 2011-8-30 02:42
标题: 循环+参数化，
Dim i

For i=1 to 3

Browser("****").Page("**").Frame("ViewAction").ViewLink("treeview").Link("蛇").SetTOProperty "text", DataTable("_1", dtLocalSheet)

Browser("****").Page("****").Frame("ViewAction1").WebButton("练习").Click
Browser("**").Page("**”)Sync
Browser("****").Page("****").Sync

DataTable.GetSheet("Action1").SetNextRow
Next

为何
DataTable.GetSheet("Action1").SetNextRow
报常规运行错误

如果我想在循环中，按照参数化运行（每循环一次读下一行），怎么操作呢？

作者: davy_chen 时间: 2011-8-30 10:08
估计你删除了循环，删除了DataTable.GetSheet("Action1").SetNextRow就可以了。
因为QTP中参数化后，直接默认就是一次一条的执行下去。

作者: hedy7432 时间: 2011-8-30 11:08
删除了那句话，那每次循环只读取参数化的第一条记录
不会循环一次的向下选择

作者: hedy7432 时间: 2011-8-30 11:08
紧急求救

作者: hsjzfling 时间: 2011-8-30 11:15
用QTP安装程序修复下QTP，然后再检查

作者: yidao8808 时间: 2011-8-30 14:51
本帖最后由 yidao8808 于 2011-8-30 14:53 编辑

Set oaction=DataTable.GetSheet("Action1")
icount=oaction.GetRowCount
For i=1 to icount
Browser("百度一下，你就知道").Page("百度一下，你就知道").WebEdit("wd").Set DataTable("searchtext","Action1")
Browser("百度一下，你就知道").Page("百度一下，你就知道").WebButton("百度一下").Click
Browser("百度一下，你就知道").Back
oaction.SetNextRow
Next 我用百度搜索循环读取表Action1的值可以的

作者: yidao8808 时间: 2011-8-30 14:53
本帖最后由 yidao8808 于 2011-8-30 14:56 编辑

Set oaction=DataTable.GetSheet("Action1")
icount=oaction.GetRowCount
For i=1 to icount
oaction.SetCurrentRow(i)
Browser("百度一下，你就知道").Page("百度一下，你就知道").WebEdit("wd").Set DataTable("searchtext","Action1")
Browser("百度一下，你就知道").Page("百度一下，你就知道").WebButton("百度一下").Click
Browser("百度一下，你就知道").Back
Next 这样也可以的

作者: hedy7432 时间: 2011-8-31 16:35
我使用了楼上的方法但是走到这里

icount=oaction.GetRowCount
报错：常规运行错误郁闷

作者: yidao8808 时间: 2011-9-1 09:16
回复 8# hedy7432

我的是qtp11，

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