Esta es mi grilla:
Código:
fgDatos.Clear fgDatos.Cols = 4 fgDatos.Rows = 2 fgDatos.TextMatrix(0, 0) = "ID" fgDatos.ColWidth(0) = 0 fgDatos.TextMatrix(0, 1) = "Articulo" fgDatos.ColWidth(1) = 1000 fgDatos.TextMatrix(0, 2) = "Marca" fgDatos.ColWidth(2) = 1000 fgDatos.TextMatrix(0, 3) = "Pais" fgDatos.ColWidth(3) = 1000
Esta es mi código para cargar los datos de la grilla a mi base de datos en acces:
Código:
El error que me salta es "Error de sintaxis en la instrucción INSERT INTO"Dim i As Integer, sql As String Dim cons As String Dim rss As New ADODB.Recordset cons = "select Articulos.* from articulos" rss.Open cons, Conexion, adOpenDynamic, adLockPessimistic, adCmdText For i = 1 To fgDatos.Rows - 1 sql = "INSERT INTO ARTICULOS VALUES(" & fgDatos.TextMatrix(i, 0) & "," & fgDatos.TextMatrix(i, 1) & "," & fgDatos.TextMatrix(i, 2) & "," & fgDatos.TextMatrix(i, 3) & ")" Conexion.Execute sql Next i
Muchisimas gracias de antemano al que me ayude