Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Копирование таблиц [D7, IB5.x]

samone © (2006-08-17 11:26:00)
Будте добры, подскажите пожалуйста, каким образом можно осуществить копирование локальной бд Interbase. Я нашел множество способов для BDE, но адаптировать их под I-base не получается. Если не трудно, помогите разобраться.

Sergey13 (2006-08-17 13:14:00) [1]
> [10] Val © (17.08.06 13:11)

Можно, но надо сервер останавливать. Неудобно.

Val (2006-08-17 13:11:00) [2]
>[9] Sergey13 © (17.08.06 13:08)
в полноценном сервере разве уже нельзя?

Sergey13 (2006-08-17 13:08:00) [3]
Для локальной бд Interbase лучше (целесообразнее) использовать FireBird Embedded. В этом случае можно и просто файл скопировать, отключившись от БД, разумеется.

samone (2006-08-17 12:11:00) [4]
Спасибо огромное, за исчерпывающий ответ. Благодарю всех за участие. Очень помогли.

PEAKTOP (2006-08-17 11:48:00) [5]
Delphi Help Cut:

This example shows a component that backs up a database with the click of a button. The second example shows how to back up a database to multiple files.

procedure TForm1.Button1Click(Sender: TObject);
begin
with IBBackupService1 do
begin
ServerName := 'Poulet';
LoginPrompt := False;
Params.Add('user_name=sysdba');
Params.Add('password=masterkey');
Active := True;
try
Verbose := True;
Options := [NonTransportable, IgnoreLimbo];
DatabaseName := 'c:\interbase\examples\database\employee.gdb';
BackupFile.Add('c:\temp\employee1.gbk');

ServiceStart;
While not Eof do
Memo1.Lines.Add(GetNextLine);
finally
Active := False;
end;
end;

end;

To back up a database to multiple files:

procedure TForm1.Button2Click(Sender: TObject);
begin
with IBBackupService1 do
begin
ServerName := 'Poulet';
LoginPrompt := False;
Params.Add('user_name=sysdba');
Params.Add('password=masterkey');
Active := True;
try
Verbose := True;
Options := [MetadataOnly, NoGarbageCollection];
DatabaseName := 'c:\interbase\examples\database\employee.gdb';
BackupFile.Add('c:\temp\e1.gbk = 2048');

BackupFile.Add('c:\temp\e2.gbk' = 4096);
BackupFile.Add('c:\temp\e3.gbk'); ServiceStart;
While not Eof do
Memo1.Lines.Add(GetNextLine);
finally
Active := False;
end;
end;
end;

Val (2006-08-17 11:47:00) [6]
>[5] samone (17.08.06 11:38)
предполагается отсутствие администратора БД у заказчика?
В компонетах доступа к ИБ, например в IBX, есть соотв.компоненты.

samone (2006-08-17 11:38:00) [7]
>ibase.ru
Оч желат-но это сделать средствами приложения..

Sergey13 (2006-08-17 11:36:00) [8]
ibase.ru

samone (2006-08-17 11:34:00) [9]
Имеется таблица, периодически обновляющаяся. Необходимо автоматизировать ее резервное копирование.

tupoy (2006-08-17 11:32:00) [10]
backup\restore

Val (2006-08-17 11:30:00) [11]
что подразумевается под копированием? раскройте задачу.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »