Procedimiento para hacer un backup...
Código:
USE master
IF ( EXISTS (SELECT NAME FROM master.dbo.sysdevices WHERE (NAME = 'BACKUP')))
EXEC sp_dropdevice 'BACKUP'
EXEC sp_addumpdevice 'DISK', 'BACKUP', 'C:\BACKUP\BACKUP.BKP'
BACKUP DATABASE MIBASE TO BACKUP WITH INIT
Cambia lo que este de color...
Para poner todo junto en delphi, deberias separarlo por punto y coma... algo asi:
Código:
USE master; IF ( EXISTS (SELECT NAME FROM master.dbo.sysdevices WHERE (NAME = 'BACKUP'))) EXEC sp_dropdevice 'BACKUP' ; EXEC sp_addumpdevice 'DISK', 'BACKUP', 'C:\BACKUP\BACKUP.BKP'; BACKUP DATABASE MIBASE TO BACKUP WITH INIT
Espero te sea útil, saludetes !