Falla Update
Publicado por alvarito (2 intervenciones) el 07/09/2007 08:35:05
Hola a todos
Tengo un problema y agradeceria mucho alguna ayuda .
Simplemente intento añadir un nuevo registro a una mdb y no funciona,no da error pero no se agrega nada.
Os pongo el codigo en VB6:
MDBDESTINO.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & sRuta & sFichero & ".mdb" & ";Persist Security Info=False"
REC.Open "CFGVCL", MDBDESTINO, adOpenKeyset, adLockBatchOptimistic, adCmdTable
msgbox(rec(0))' esto si funciona, lee bien
'pero esto no...
REC.AddNew:
REC(0) = "SSS":
REC.Update
Saludos y gracias
Tengo un problema y agradeceria mucho alguna ayuda .
Simplemente intento añadir un nuevo registro a una mdb y no funciona,no da error pero no se agrega nada.
Os pongo el codigo en VB6:
MDBDESTINO.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & sRuta & sFichero & ".mdb" & ";Persist Security Info=False"
REC.Open "CFGVCL", MDBDESTINO, adOpenKeyset, adLockBatchOptimistic, adCmdTable
msgbox(rec(0))' esto si funciona, lee bien
'pero esto no...
REC.AddNew:
REC(0) = "SSS":
REC.Update
Saludos y gracias
Valora esta pregunta


0