|
For i1=3 to nRow1
DataTable.GetSheet("Global").SetCurrentRow(i1-2)
For j1=1 to nColumn1
text=Browser("登录服务器").Page( "BI@Report在线演示系统").Frame("Frame").WebTable("妇保院等级亏损次数").GetCellData(i1,j1)
DataTable.Value(chr(j1+64),"Global")=text
Next
Next
-------------------------------------------------
For i2=2 to nRow2
DataTable.GetSheet("Action1").SetCurrentRow(i2-1)
text=Browser("登录服务器").Page("BI@Report在线演示系统").Frame("Frame_2").WebTable("妇保院等级医院指标").GetCellData(i2,3)
DataTable.Value(chr(65),"Action1")=text
Next
为什么代码段一可以,不会报错,
但是代码段2却提示"The set DataTable.Value operation failed. The <A> column does not exist." |
|