Actualizacion en BD Access 2000 desde un MSHFlexgrid
Hola a todos. Estoy realizando una insercion de unos registros desde un mshflexgrid a un bd de access 2000. Antes que nada para almacenar una fecha en el msh lo hice con una variable declarada como DATE en vb 6.0.
Mi problemas es que cuando quiero actualizar los registros que estan en el msh a la bd de access me da error.. La sentencia del update es esta..
consulta = "UPDATE historico SET inversion =" & grid.TextArray(celda(fila, 7)) & ", segundos = " & grid.TextArray(celda(fila, 8)) _
& ", avisos = " & grid.TextArray(celda(fila, 9)) & ", grp = " & grid.TextArray(celda(fila, 10)) _
& ", real = " & grid.TextArray(celda(fila, 11)) & " WHERE fecha = " & grid.TextArray(celda(fila, 1)) & ", marca = " _
& grid.TextArray(celda(fila, 2)) & ", categoria =" & grid.TextArray(celda(fila, 3)) & ", version = " & grid.TextArray(celda(fila, 4)) & ", canal = " & grid.TextArray(celda(fila, 5)) _
& ", bloque = " & grid.TextArray(celda(fila, 6))
cnn.Execute consulta
Les agradeceria mucho que me respondieran, please!
Mi problemas es que cuando quiero actualizar los registros que estan en el msh a la bd de access me da error.. La sentencia del update es esta..
consulta = "UPDATE historico SET inversion =" & grid.TextArray(celda(fila, 7)) & ", segundos = " & grid.TextArray(celda(fila, 8)) _
& ", avisos = " & grid.TextArray(celda(fila, 9)) & ", grp = " & grid.TextArray(celda(fila, 10)) _
& ", real = " & grid.TextArray(celda(fila, 11)) & " WHERE fecha = " & grid.TextArray(celda(fila, 1)) & ", marca = " _
& grid.TextArray(celda(fila, 2)) & ", categoria =" & grid.TextArray(celda(fila, 3)) & ", version = " & grid.TextArray(celda(fila, 4)) & ", canal = " & grid.TextArray(celda(fila, 5)) _
& ", bloque = " & grid.TextArray(celda(fila, 6))
cnn.Execute consulta
Les agradeceria mucho que me respondieran, please!
