标题: 这条语句出错--datatable(j,"Global")=nValue [打印本页] 作者: FLY000 时间: 2008-5-22 14:14 标题: 这条语句出错--datatable(j,"Global")=nValue For i=3 to nRow
For j=1 to nColumn
nValue=Browser("登录服务器").Page( "BI@Report在线演示系统").Frame( "Frame").WebTable("妇保院等级亏损次数").GetCellData(nRow,nColumn)
datatable.SetCurrentRow(nCurrent)
datatable(j,"Global")=nValue
nCurrent=datatable.SetPrevRow
Next
Next
我想把取出来的值nValue写进DATATABEL的GLOBAL表,
datatable(j,"Global")=nValue
但是程序执行时提示The set DataTable.Value operation failed. The specified parameter index value: "1" does not exist in the data sheet.作者: zte_boy 时间: 2008-5-22 14:51 标题: 写错了，呵呵 写错了，呵呵
[ 本帖最后由 zte_boy 于 2008-5-22 14:55 编辑 ]作者: zte_boy 时间: 2008-5-22 15:08
先在runtime中增加一列
DataTable.GlobalSheet.AddParameter "列名", ""
然后去循环赋值作者: xiaonan 时间: 2008-5-22 15:37
datatable("j","Global")=nValue
列名 j 上少了两个引号作者: FLY000 时间: 2008-5-22 15:49 标题: 回复 4# 的帖子 不对哦作者: FLY000 时间: 2008-5-22 15:50
For i=3 to nRow
For j=1 to nColumn
text=Browser("登录服务器").Page( "BI@Report在线演示系统").Frame("Frame").WebTable("妇保院等级亏损次数").GetCellData(i,j)
DataTable.Value(chr(j+64),"Global")=text
datatable.SetNextRow
Next
Next
我改成这样就可以了,但问题是都写到一行去了,他的行数不能下移.datatable.SetNextRow这个语句没用作者: arthur766 时间: 2008-5-22 15:52
DataTable(j,dtGlobalSheet) = nValue
?作者: zte_boy 时间: 2008-5-22 15:54
你都没告诉语句当前行在哪里。。。。。作者: FLY000 时间: 2008-5-22 16:10
For i=3 to nRow
For j=1 to nColumn
DataTable.GetSheet("Global").SetCurrentRow(i-2)
text=Browser("登录服务器").Page( "BI@Report在线演示系统").Frame("Frame").WebTable("妇保院等级亏损次数").GetCellData(i,j)
DataTable.Value(chr(j+64),"Global")=text
datatable.GetSheet("Global").SetNextRow
Next
Next作者: FLY000 时间: 2008-5-22 16:10
这样写就可以了