Hola Gamberos.
Estoy hace un tiempo desarrollando mi facturación en gambas (para terminar definitivamente con Windows - Access).
Pase los datos con MdbTools (estructura y datos). Todo funciona bien al hacer los mantenimientos de ficheros, no obstante
cuando voy y en las tablas grandes, creo índices para los campos de ordenación sobre los que más va a trabajar la
aplicación me encuentro que al intentar modificar un registro me da un error de "bad SQL no se que or missing Database"
Cuando entro en depuración veo que hay un error número 1 en Db.Error (no se que significará).
Para saber que era por los índices di 100 vueltas y modificaciones a los programas, pensando que actualizaba incorrrecta-
mente los campos db.Float o algún string de mas longitud. Nada de todo esto fallaba.
Entre con el Database-Manager para que me creara el código necesario para volver a empezar (indices incluidos) desde el
principio. Nada, sigue saliendo el error en la actualización de registros.
Por tanto, cuando creo un registro con
rstadm = hCon.Create("admin")
rstadm!empadm = "NO TIENE ADMINISTRADOR"
rstadm.Update
funciona todo a la perfección. Pero este mismo registro, cuando lo quiero modificar con una rutina como esta:
IF EditMode = TRUE THEN ' Si no es nuevo
sCriteria = hkey & " = &1"
rst = hCon.Edit(htbl, sCriteria, lastrec) ' Editamos result
ENDIF
save_Fields(frm) 'Actualizar los campos en la Base de Datos
rst.Update 'Hacer los cambios efectivos
rst = hCon.Exec("SELECT * FROM " & htbl & " ORDER BY " & hkey) 'Recargamos result
al llegar a rst.Update CRACK
Alguien le ha pasado ......? Quizás deba hacer algo al editar, o refrescar la colección Indexes o no se pueda simplemente
Gracias de antemano amigos.
Antonio