Ver Mensaje Individual
  #12  
Antiguo 05-02-2016
aromigaret aromigaret is offline
Miembro
 
Registrado: jun 2011
Posts: 68
Reputación: 13
aromigaret Va por buen camino
Perdón, tratare de ser mas claro.
Tengo una tabla llamada Pedidos en ella se cargan todos los ítems que va pidiendo un cliente, una vez finalizada la carga se imprime el pedido y se guarda en otra tabla lo cargado. Debo reiniciar la tabla 'Pedidos' para una nueva carga. Para ello yo hacia lo mismo que vos mencionaste:

Código Delphi [-]
PEDIDOS.close;
LIMPIAR.SQL.text:='delete from pedidos';
LIMPIAR.execsql;
PEDIDOS.open;

Pero al iniciar una nueva carga, veo que el campo auntoincrementable y clave primaria 'Renglon' de la tabla pedidos continua con el siguiente numero dejado por la anterior carga en vez de iniciar desde 1.

Acabo de probar lo siguiente:

Código Delphi [-]
    PEDIDO.Close;
    LIMPIAR.SQL.Text:='DROP TABLE PEDIDOS';
    LIMPIAR.ExecSQL;

    LIMPIAR.SQL.Text:='SELECT * INTO PEDIDOS FROM ORIGINAL';
    LIMPIAR.ExecSQL;

    PEDIDO.Open;

Intentando copiar la estructura de ORIGINAL (Una tabla igual a Pedidos, pero vacia) y me da el siguiente error cuando lo ejecuto sin el debugger:

"El motor de bases de datos Microsoft Jet no pudo encontrar el objeto 'PEDIDOS' ....."

Ahora cuando lo ejecuto con el debugger, no aparece el error, hace todo perfecto, así que no sé en que línea se produce dicho error.
Responder Con Cita