@ECHO OFF
SET DIRTI= %CD%
@ECHO.
@ECHO.
:LOOP
IF EXIST %DIRTI%\TIENVIOEMAIL.EXE (

GOTO SAI

) ELSE (
 SET /P DIRTI=DIGITE O CAMINHO PASTA DO SISTEMA DA TI SEM A ULTIMA BARRA :


)
GOTO LOOP

:SAI

@ECHO.
@ECHO.
SC CREATE TIEnvioEmail binpath= %DIRTI%\TIEnvioEmail.exe start= auto displayname= "Envio de E-mails (EXCIA)"

IF %ERRORLEVEL% == 0  (
 GOTO PROXIMO
) ELSE (
 GOTO ERROCMD
)
:PROXIMO
SC START TIEnvioEmail
IF %ERRORLEVEL% == 0  (
 GOTO CERTO
) ELSE (
 GOTO ERROCMD
)
:ERROCMD
@ECHO.
@ECHO.
@ECHO ERRO NA INSTALACAO DO SERVICO, VERIFIQUE AS MENSAGEM DE ERRO, TALVEZ FALTEM PERMISSOES DE EXECUCAO
GOTO FIM

:CERTO
@ECHO.
@ECHO.
@ECHO INSTALACAO EFETUADA COM SUCESSO, FAVOR VERIFICAR NOS SERVICOS SE ESTA REALMENTE INSTALADO E EXECUTANDO
:FIM
@ECHO.
@ECHO.

PAUSE