|
#1
|
|||
|
|||
Backup БД в Делфи
Всем привет у меня вопрос
Хочу сделать бэкап базы в делфи, сервер MSSQL 2005 express В SQLе сделал запрос все работает, вот код Код:
BACKUP DATABASE [Serg] TO DISK = N'C:\Serg.bak' WITH NOFORMAT, NOINIT, NAME = N'Serg', SKIP, NOREWIND, NOUNLOAD, STATS = 10 Как можно сделать чтобы при нажатии на кнопку в делфи делал бэкап? Заранее спасибо |
#2
|
|||
|
|||
А причем тут процедура.
Похоже, это простой запрос. просто попробуй выполнить его через TQuery. только для выполнения надо не Open вызывать, а ExecQuery (так что-ли...) |
#3
|
||||
|
||||
Код:
procedure button1Click(Sebder: TObject); var q: TADOQuery; begin q:= TADOQuery.Create(nil); q.Connection:= ADOConnection1; q.SQL.Text:= 'BACKUP DATABASE [Serg] TO DISK = N''C:\Serg.bak'' WITH NOFORMAT, NOINIT, NAME = N''Serg'', SKIP, NOREWIND, NOUNLOAD, STATS = 10'; q.ExecSQL; q.Free; end; Google в помощь |