Вниз
Скачать: CL | DM;

Backup базы MSSQL Server 2000 в Делфях   Найти похожие ветки 

 
mefisto   (2005-05-31 22:44) [0]

Как зделать Backup базы MSSQL Server 2000 с помощю средств Delphi ADOQuery?
Заранее спасибо !!!


 
Anatoly Podgoretsky ©   (2005-05-31 23:02) [1]

Настольная книга администратора BOL
Архивировать модно как программно, так и автоматически средствами самого сервера, данный вариант предпочтительнее.
Если почему то не доверяешь серверу, то смотри в BOL синтаксис команды BACKUP


 
just_me   (2005-06-01 13:46) [2]

С помощью ADOQuery нельзя, но можно заюзать SQLDMO и сделать backup, примерно так:

const
 SQLNSRootType_DefaultRoot = $00000000;
 SQLNSRootType_ServerGroup = $00000001;
 SQLNSRootType_Server = $00000002;
 SQLNSRootType_Database = $00000003;

 SQLNSOBJECTTYPE_DATABASES = $00000004;
 SQLNSOBJECTTYPE_DATABASE = $00000005;
 SQLNS_CmdID_DATABASE_BACKUP = $00000050;
 SQLNS_CmdID_DATABASE_RESTORE = $00000051;
procedure TMyForm.btnBackupClick(Sender: TObject);
var
 objSQLNS,
 objSQLNSBackup   : Variant;
 strConnectString : string;
 hRootItem        : integer;
begin
 try
   try
     Screen.Cursor := crSQLWait;
     objSQLNS       := CreateOleObject("SQLNS.SQLNamespace");
     strConnectString := Format("Server=%s;uid=%s;pwd=%s;Database=MyDB", [ServerName, LoginID, Password]);
     objSQLNS.Initialize("App name", SQLNSRootType_Database, OleVariant(strConnectString), Handle);
     hRootItem := objSQLNS.GetRootItem;
     objSQLNSBackup := objSQLNS.GetSQLNamespaceObject(hRootItem);
     // закрыть базу MyDB
     objSQLNSBackup.ExecuteCommandByID(SQLNS_CmdID_DATABASE_BACKUP);
     // открыть базу MyDB
   except
   end;
 finally
   objSQLNS := Unassigned;
   objSQLNSBackup := Unassigned;
   Screen.Cursor := crDefault;
 end;
end;


 
sniknik ©   (2005-06-01 14:29) [3]

> С помощью ADOQuery нельзя
да ну?

BACKUP
Backs up an entire database, transaction log, or one or more files or filegroups. For more information about database backup and restore operations, see Backing Up and Restoring Databases.

Syntax
Backing up an entire database:

BACKUP DATABASE { database_name | @database_name_var }
TO < backup_device > [ ,...n ]
[ WITH
   [ BLOCKSIZE = { blocksize | @blocksize_variable } ]
   [ [ , ] DESCRIPTION = { "text" | @text_variable } ]
   [ [ , ] DIFFERENTIAL ]
...

и тд. не будем сюда BOL переписывать. а в конце параграфа есть и примеры... не буду говорить что пробовал это на "рабочесть", не приходилось както (нет надобности), но доверять мелкософту/хелпу както привык. уверяете что это не работает?



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.025 c
1-1119483831
paule
2005-06-23 03:43
2005.07.11
Прогресс бар


11-1100453600
Slay
2004-11-14 20:33
2005.07.11
Вопрос про Drag&amp;Drop в TreeView


14-1118355696
Квест
2005-06-10 02:21
2005.07.11
Какие файлы и ключи реестра нужно сохранить при переустановке Вин


3-1117694188
andrey123
2005-06-02 10:36
2005.07.11
Копирование БД


3-1115726745
DSKalugin
2005-05-10 16:05
2005.07.11
компоненты для доступа к PostgreSQL и степень защиты БД




   Наверх