Cita:
|
Empezado por hook
(1) Tengo que borrar 12 tablas cada una pertenece a un mes del ańo y hepuesto 12 AdoQuery...
...
(2)
tabla_enero.Close;
tabla_enero.Open;
...
|
(1) Puedes usar un único objeto cambiando la sentencia SQL, no hace falta que crees 12.
Código Delphi
[-]
...
Query.SQL.Clear;
Query.SQL.Add('DELETE FROM Tabla1');
Query.Exec;
Query.SQL.Clear;
Query.SQL.Add('DELETE FROM Tabla2');
Query.Exec;
...
(2) Como aparece en el ejemplo, prueba con el método
Exec o
ExecuteSQL (no lo recuerdo ahora) en lugar del
Open;