1WGd4wTX

1@echo off
2rem Autor: Gladiston (hamacker) Santana sirhamacker em gmail.com
3rem Arquivo: tb_test_conn.cmd
4rem Objetivo: Testar conectividade com servidores firebird
5rem Se o resultdo da execucao do script nao exibir informacoes da conexao, entao
6rem   o script falhou.
7rem PS: O formato deste arquivo deve ser ANSI Windows (CR/LF) caso contrario nao funcionará
8rem   no ambiente de terminal do Windows.
9set fb3_connect="localhost:c:\caminho\para\o\database.fdb"
10set ISC_USER=SYSDBA
11set ISC_PASSWORD=masterkey
12set fb3_isql="isql.exe"
13set fb3_script=%temp%\temp_script_isql.$$$
14if exist "%ProgramFiles%\Firebird\Firebird_3_0" set fb3_isql=%ProgramFiles%\Firebird\Firebird_3_0\isql.exe
15if exist "%ProgramFiles(x86)%\Firebird\Firebird_3_0" set fb3_isql=%ProgramFiles(x86)%\Firebird\Firebird_3_0\isql.exe
16if not exist "%fb3_isql%" goto notfound
17rem ===
18rem === Nao altere mais nada daqui para baixo
19rem ===
20rem === criando o script ====
21echo -- %fb3_script% ; >"%fb3_script%"
22echo CONNECT %fb3_connect%;>>"%fb3_script%" 
23echo set list on; >>"%fb3_script%" 
24echo select * from mon$attachments where mon$attachment_id = current_connection; >>"%fb3_script%"
25echo show database; >>"%fb3_script%"
26echo quit; >>"%fb3_script%"
27rem === executando o script ====
28cls
29echo TESTE DE CONEXAO COM BASE DE DADOS
30echo ISQL: %fb3_isql%
31echo Temporary script: %fb3_script%
32echo Connect: %fb3_connect%
33echo UserName: %ISC_USER%
34echo Password: *****
35echo Cmd: "%fb3_isql%" -z -q -i "%fb3_script%" 
36"%fb3_isql%" -z -q -i "%fb3_script%"
37set os_result=%ERRORLEVEL%
38set os_info=Successful execution
39if %os_result% LSS 0   set os_info=statement did not execute
40if %os_result% GTR 1   set os_info=System warning or information message
41if %os_result% GEQ 100 set os_info=No qualifying rows found, or end of current active set of rows reached
42echo ISQL Result: %os_info% (%os_result%)
43goto fim
44:notfound
45echo ajuste neste .cmd a variavel isql para que seja possivel encontrar o utilitario isql.exe do firebird.
46goto fim
47:fim
48pause