51Testing软件测试论坛

标题: addparameter方法的使用 [打印本页]

作者: hryxm88 时间: 2010-3-17 11:35
标题: addparameter方法的使用
我现在想把数据库的值读到datatable的Mysheet的root列中：
Do until Rst.Eof
j=Rst("RANK")
msgbox j
variable=datatable.AddSheet ("Mysheet").addparameter("root",j)
Rst.MoveNext
Loop
执行上面这行代码后，结果是在一行上插入数据
如：root root1 root2
而我期望的结果是：
root
  1
  2
  3
有哪位知道addparameter这个方法怎么用啊，期待回复

作者: hryxm88 时间: 2010-3-17 13:34
addparameter这个方法只能在一行上添加数据吗？
哪位在一列上添加数据的方法啊？

作者: feiyunkai 时间: 2010-3-18 14:49
addparameter的作用是添加列，所以每添加一列就会多出root1,root2。。。等列
下面是添加行的方法：
datatable.AddSheet ("Mysheet").addparameter"root",""  '添加列名为root的工作表Mysheet
For i=1 to 3    '
datatable.GetSheet("Mysheet").SetCurrentRow(i)
DataTable.value("root","Mysheet")=i    '将i的值循环赋给工作表Mysheet的root列的1到3行，把这里的i修改为你存放数据的变量就可以了
Next
'所以将你脚本中的代码修改为：（你可以自己试下）
i=1
datatable.AddSheet ("Mysheet").addparameter"root",""  '添加列名为root的工作表Mysheet
Do until Rst.Eof
j=Rst("RANK")
datatable.GetSheet("Mysheet").SetCurrentRow(i)
DataTable.value("root","Mysheet")=j    '将j的值循环赋给工作表Mysheet的root列
i=i+1
Rst.MoveNext
Loop

[ 本帖最后由 feiyunkai 于 2010-3-19 15:53 编辑 ]

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