addparameter方法的使用

hryxm88

我现在想把数据库的值读到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

addparameter这个方法只能在一行上添加数据吗？
哪位在一列上添加数据的方法啊？

feiyunkai

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 编辑 ]