---
Upravená verze skriptu, prosím upravte si cesty, toto vše vložit do nějakého cmd souboru:
editují se pouze následující sekce:
rem  /zalozeni slozek do kterych se ma zalohovat kdyz neexistuji/
rem /nastaveni serveru a portu a cest k db/
rem /zaloha/ - v případě že je soubor gbak umístěn jinde, je jiná cesta k Firebirdu
rem/odkud kam kopirovat/
@echo off
rem /nacteni aktualniho datumu a casu/
For /f "tokens=1-3 delims=/." %%a in ("%DATE%") do (set mydate=%%c-%%b-%%a)
For /f "tokens=1-2 delims=/:" %%a in ("%TIME%") do (set mytime=%%a-%%b)
@echo on
rem /zalozeni slozek do kterych se ma zalohovat kdyz neexistuji/
if not exist "C:\zalohy\MEDICUS" mkdir "C:\zalohy\MEDICUS"
if not exist "C:\backup\MEDICUS" mkdir "C:\backup\MEDICUS"
rem /nastaveni serveru a portu a cest k db/
set ufdb="localhost/3050:c:\Medicus\Medicus Komfort\data\sestavy.fdb"
rem /nastaveni cesty pro umisteni zalohy/
set ufbk="C:\zalohy\MEDICUS\MEDICUS3_%mydate%%mytime%.FBK" -y "C:\zalohy\MEDICUS\log%mydate%_%mytime%.txt"
rem /zaloha/
"C:\Program Files (x86)\Firebird\Firebird_2_5\bin\gbak" -b -user  SYSDBA -pas masterke %ufdb% %ufbk% -v
rem/odkud kam kopirovat/
set odkud="C:\zalohy\MEDICUS*.*"
set kam="C:\backup\MEDICUS"
SET drv1=%odkud:~1,1%
SET drv2=%kam:~1,1%
if  %drv1%==%drv2% goto :move
if  not %drv1%==%drv2% goto :copy
:move
rem /presunuti do jineho umisteni/
move /Y %odkud% %kam%
goto :exit
:copy
rem /kopiruj a smaz/
copy /Y %odkud% %kam%
del /Q %odkud%
goto :exit
:exit
timeout /T 5
exit
Zajímavé odkazy rovněž zde:
https://docplayer.cz/665150-Databaze-firebird-zalohovani-obnoveni-roman-fic-1-29-14-databaze.html
http://www.epos.cz/obis4wiki/firebird:zalohovani_databazi_-_gbak
Pohodový den přeje
Mgr. Josef Kauc
KONZULTANT MEDICUS
