Firebird25x64.exe /COMPONENTS="ServerComponent\SuperServerComponent,DevAdminComponent,ClientComponent" /TASKS="UseApplicationTask" /force /SYSDBANAME="SYSDBA" /SYSDBAPASSWORD="masterkey" /SP- /SILENT /NORESTART /NOICONS /DIR="C:\Program Files\Firebird\Firebird_2_5\"

set "FIREBIRD=C:\Program Files\Firebird\Firebird_2_5\"

Attempting to connect to:
127.0.0.1:C:\RD\Kunden\TestAnlage\221115\MEDIMAT__.fDB...
Connection failed!
------------------------------------
Unsuccessful execution caused by a system error that precludes successful execution of subsequent statements.
Unable to complete network request to host "127.0.0.1".
Failed to establish a connection.
-------------------------------------------------------------------------------------------------------------
SQLCODE: -902
SQLSTATE: 08006
GDSCODE: 335544721
 
Attempting to connect to services manager:
127.0.0.1:service_mgr... Failed!
------------------------------------
Unsuccessful execution caused by a system error that precludes successful execution of subsequent statements.
Unable to complete network request to host "127.0.0.1".
Failed to establish a connection.
-------------------------------------------------------------------------------------------------------------
SQLCODE: -902
SQLSTATE: 08006
GDSCODE: 335544721

@call :check_Permissions
@if "%ADMIN%"=="Y" (

  @set "RET=%CD%"

  call %~dp0\Firebird25x64.exe
  "C:\Program Files\Firebird\Firebird25\bin\instsvc.exe" i -s -n Firebird25 -i
  sc \\%COMPUTERNAME% config "FirebirdServerFirebird25" start= demand
  sc \\%COMPUTERNAME% stop "FirebirdServerFirebird25" 
pause

  @cd %RET%
)

@exit /b 100

:check_Permissions
    @net session >nul 2>&1
    @if %errorLevel% == 0 @(
        @echo Administrative permissions confirmed.
	@set "ADMIN=Y"
	@exit /B
    ) else @(
        @echo Administrative permissions inadequate.
	@echo You need to start the script with Administrator priveleg!
        @exit /B
    )


:find_firebirsrv
 	@for /F "delims=: " %%H in ('sc query ^|grep Firebird') do @(
		echo "%%H"
  		@if /I "%%H" NEQ "RUNNING" (
   			@set "SERVICESTATE=STOP"
  		)
  		@if /I "%%H" EQU "RUNNING" (
   			@set "SERVICESTATE=RUN"
  		)
  	)
	@exit /B

@call :check_Permissions
@if "%ADMIN%"=="Y" (

  @set "RET=%CD%"

  call %~dp0\Firebird3x64.exe 
  "C:\Program Files\Firebird\Firebird30\instsvc.exe" i -n Firebird30 -i
  sc \\%COMPUTERNAME% config "FirebirdServerFirebird30" start= demand
  sc \\%COMPUTERNAME% stop "FirebirdServerFirebird30" 
pause


  @cd %RET%
)

@exit /b 100

:check_Permissions
    @net session >nul 2>&1
    @if %errorLevel% == 0 @(
        @echo Administrative permissions confirmed.
	@set "ADMIN=Y"
	@exit /B
    ) else @(
        @echo Administrative permissions inadequate.
	@echo You need to start the script with Administrator priveleg!
        @exit /B
    )


:find_firebirsrv
 	@for /F "delims=: " %%H in ('sc query ^|grep Firebird') do @(
		echo "%%H"
  		@if /I "%%H" NEQ "RUNNING" (
   			@set "SERVICESTATE=STOP"
  		)
  		@if /I "%%H" EQU "RUNNING" (
   			@set "SERVICESTATE=RUN"
  		)
  	)
	@exit /B

@call :check_Permissions
@if "%ADMIN%"=="Y" (

  @set "RET=%CD%"

  del /q C:\RD\Run_Firebird25.cmd
  copy Run_Firebird25.cmd C:\RD\Run_Firebird25.cmd
  @mshta vbscript:Execute("Set x=CreateObject(""WScript.Shell"").CreateShortcut(""%USERPROFILE%\Desktop\Firebird25.lnk""):x.TargetPath=""C:\RD\Run_Firebird25.cmd"":x.HotKey=""CTRL+ALT+2"":x.WindowStyle=1:x.Arguments=""-"":x.Save():Close()")

pause

  del /q C:\RD\Run_Firebird30.cmd
  copy Run_Firebird30.cmd C:\RD\Run_Firebird30.cmd
  @mshta vbscript:Execute("Set x=CreateObject(""WScript.Shell"").CreateShortcut(""%USERPROFILE%\Desktop\Firebird30.lnk""):x.TargetPath=""C:\RD\Run_Firebird30.cmd"":x.HotKey=""CTRL+ALT+3"":x.WindowStyle=1:x.Arguments=""-"":x.Save():Close()")

pause

  ie4uinit -show
 

  @cd %RET%
)

@exit /b 100

:check_Permissions
    @net session >nul 2>&1
    @if %errorLevel% == 0 @(
        @echo Administrative permissions confirmed.
	@set "ADMIN=Y"
	@exit /B
    ) else @(
        @echo Administrative permissions inadequate.
	@echo You need to start the script with Administrator priveleg!
        @exit /B
    )


:find_firebirsrv
 	@for /F "delims=: " %%H in ('sc query ^|grep Firebird') do @(
		echo "%%H"
  		@if /I "%%H" NEQ "RUNNING" (
   			@set "SERVICESTATE=STOP"
  		)
  		@if /I "%%H" EQU "RUNNING" (
   			@set "SERVICESTATE=RUN"
  		)
  	)
	@exit /B