BackUp

[[enecumene]]

Tomando como ejemplo el codigo del amigo Caral:

Código SQL [-]
var
Ruta, campo: String;

Begin
Ruta := 'C:\TuCarpeta\Backup.Text';
Adoquery1.Close;
Adoquery1.SQL.Clear;
Adoquery1.SQL.Text := 'select * from tabla where campo = 'tal cosa'';
Adoquery1.ExecSQL; -> o tambien puede ser Open
Adoquery1.SAvetoFile(Ruta);

End;

Saludos.