Einzelnen Beitrag anzeigen

Nathan

Registriert seit: 6. Nov 2003
Ort: Birmensdorf / Zürich
29 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#2

AW: eigene Firebird-Installation

  Alt 6. Nov 2017, 07:15
Wir prüfen ganz veraltet im Inno Setup Script, ob die fb_inet_server.exe unserer Version entspricht. Falls nicht verweisen wir auf eine Batchdatei in der wir folgendes Aufrufen:

Code:
@ECHO OFF

SETLOCAL ENABLEDELAYEDEXPANSION

ECHO Die Firebird-Installation wird gestartet...
Firebird-2.5.2.26539_0_Win32.exe /nocpl /silent /norestart /components="servercomponent,servercomponent\classicservercomponent,devadmincomponent,clientcomponent" /tasks="useservicetask,autostarttask,superclassictask" /log="Install.log" /saveinf="Install.inf"
IF !ERRORLEVEL! NEQ 0 GOTO :ErrorServerInst


SET UdfDir="%programfiles(x86)%\Firebird\Firebird_2_5\UDF\"
IF NOT EXIST %UdfDir% SET UdfDir="%programfiles%\Firebird\Firebird_2_5\UDF\"
IF NOT EXIST %UdfDir% GOTO NoUdfDir
ECHO UDF-Dateien werden in das folgende Verzeichnis kopiert:
ECHO %UdfDir%


xcopy acUDFLib.dll %UdfDir% /V /F
IF !ERRORLEVEL! NEQ 0 GOTO :ErrorUdfCopy
xcopy FreeUDFLib.dll %UdfDir% /V /F
IF !ERRORLEVEL! NEQ 0 GOTO :ErrorUdfCopy


GOTO EOF

:ErrorServerInst
ECHO Bei der Installation des Firebird-Servers scheint es Probleme gegeben zu haben.
GOTO EOF

:NoUdfDir
ECHO Das Firebird-UDF-Verzeichnis konnte nicht gefunden werden. Die UDF-Dateien wurden nicht kopiert.
GOTO EOF

:ErrorUdfCopy
ECHO Beim Kopieren einer UDF-Datei scheint es Probleme gegeben zu haben.
GOTO EOF

:EOF
Ich weis nicht schön funktioniert aber seit Ewigkeiten. Vielleicht hilft dir dies.
Nathan Chanan Thurnreiter
  Mit Zitat antworten Zitat