|
现在想将一批数据导入到oracle时,可能由于字段过多,提示ora-00913错误,请教如何处理?
主要代码:
Dim r, c As Single
Dim sqlStr As String
For r = 1 To 100
For c = 1 To 11
Set rs = New ADODB.Recordset
Dim CellsValue(11) As String
CellsValue(c - 1) = ThisWorkbook.ActiveSheet.Cells(r, c).Value
Next c
sqlStr = "Insert Into fenghuang3(Id_num,code,name,guba,income,price,up_down_per,up_down,chengjiao,date_id,history) VALUES('" & CellsValue(0) & "','" & CellsValue(1) & "','" & CellsValue(2) & "','" & CellsValue(3) & "','" & CellsValue(4) & "','" & CellsValue(5) & "','" & CellsValue(6) & "','" & CellsValue(7) & "','" & CellsValue(8) & "','" & CellsValue(9) & "','" & CellsValue(10) & "','" & CellsValue(11) & "')"
rs.Open sqlStr, conn
提示错误:
|
|