Delphi firebird veritabanı yedekleme
Forum kuralları
Bu forum sadece yapacağınız işle alakalı doğru bileşeni bulmak içindir. Şöyle bir şey yapmam lazım, hangi bileşeni kullanıyım diyorsanız, doğru yerdesiniz.
Bu forum sadece yapacağınız işle alakalı doğru bileşeni bulmak içindir. Şöyle bir şey yapmam lazım, hangi bileşeni kullanıyım diyorsanız, doğru yerdesiniz.
Delphi firebird veritabanı yedekleme
Merhaba arkadaşlar ben delphi ile firebird veri tabanı yedeğini almak istiyorum delphi ile bunu nasıl yapabilirim şimdiden teşekkür ederim.
Re: Delphi firebird veritabanı yedekleme
Forma 1 adet
TIBBackupService ekle yedekleme için
TIBBackupService ekle yedekleme için
Kod: Tümünü seç
procedure Tyedekfrm.bt_yedekleClick(Sender: TObject);
begin
with IBBackupService1 do
begin
LoginPrompt := False;
Params.Add('user_name=sysdba');
Params.Add('password=masterkey');
Active := True;
Screen.Cursor := crHourGlass;
try
// CloseAllTables;
DatabaseName := 'yedeklenecek database yolu ve adi';
BackupFile.Clear;
BackupFile.Add('Yedek yeri ve adi');
ServiceStart;
While not Eof do
showmessage('Yedekleme başarıyla tamamlandı!');
finally
Active := False;
// OpenAllTables;
Screen.Cursor := crDefault;
end;
end;
end;
"…De ki: "Hiç bilenlerle bilmeyenler bir olur mu? Şüphesiz, temiz akıl sahipleri öğüt alıp-düşünürler" (Zümer Suresi, 9)