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的情况)啊??为什么不能导入全部数据啊