For i = 2 To TotalRows oItemCode(i - 1) = oXLSheet.Cells(i, 4).value
oItemName(i - 1) = oXLSheet.Cells(i, 5).value
oItemSpec(i - 1) = oXLSheet.Cells(i, 6).value
oForm.DataSources.DataTables.Add("oBOM")
oForm.DataSources.DataTables.Item(0).ExecuteQuery("insert into BOM values ('" & oItemCode(i - 1) & "','" & oItemName(i - 1) & "' , '" & oItemSpec(i - 1) & "' ) ")
Next i
大家知道为什么上面这个语句导入到SQL server的表格里面只导入了一个数据(即i=2的情况)啊??为什么不能导入全部数据啊
oItemName(i - 1) = oXLSheet.Cells(i, 5).value
oItemSpec(i - 1) = oXLSheet.Cells(i, 6).value
oForm.DataSources.DataTables.Add("oBOM")
oForm.DataSources.DataTables.Item(0).ExecuteQuery("insert into BOM values ('" & oItemCode(i - 1) & "','" & oItemName(i - 1) & "' , '" & oItemSpec(i - 1) & "' ) ")
Next i
大家知道为什么上面这个语句导入到SQL server的表格里面只导入了一个数据(即i=2的情况)啊??为什么不能导入全部数据啊
解决方案 »
- vb systreeview 怎么历遍节点并读取 文本名称呢
- combobox和datacombo区别于选择
- 怎么看这个函数GetKeys(k,1,20)??
- 怎样在程序只运行一次的情况下接收后面打开该程序的参数?
- 两个程序互相发消息。用delphi写好了,但是接收端用vb怎么写?
- 关于COM+
- 请教高手VB能播放 MIDI么?
- 我用vb编了一个控件放到网页上为什么总是有一个框认证安全性,怎么能像falsh插件那样只验证一次安全性
- sos 帮帮忙
- 哪儿可下载最新的microsoft multimedia control 控件?
- Microsoft VBScript 编译器错误 错误 '800a0408'
- 请问哪里有VB控件大全的电子书下载
同一个表对象可以加入多次吗?肯定出错了。