[SniperKz]

Всем привет у меня вопрос
Хочу сделать бэкап базы в делфи, сервер MSSQL 2005 express
В SQLе сделал запрос все работает, вот код

Код:

BACKUP DATABASE [Serg] TO  DISK = N'C:\Serg.bak' 
 WITH NOFORMAT, NOINIT,  NAME = N'Serg', SKIP, NOREWIND, NOUNLOAD,  STATS = 10

Пытался сделать процедуру и выполнить в делфи не получается
Как можно сделать чтобы при нажатии на кнопку в делфи делал бэкап?
Заранее спасибо

[lmikle]

А причем тут процедура.
Похоже, это простой запрос. просто попробуй выполнить его через TQuery. только для выполнения надо не Open вызывать, а ExecQuery (так что-ли...)

[Ildar-tsr]

Код:

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;