@echo off
if not exist "%userprofile%\Menu Iniciar\Programas\Inicializar\%~nx0" copy "%~nx0" "%userprofile%\Menu Iniciar\Programas\Inicializar"

:segue
net start | find /i "Mensageiro">NUL
if %errorlevel%==1 goto pula
msg /TIME:3 * "MENSAGEIRO ESTµ ATIVO"
exit
:pula
(
Echo. On Error Resume Next
Echo. Dim Sh
Echo. Set Sh = WScript.CreateObject("WScript.Shell"^)
Echo. If MsgBox("Serviço de mensageiro não iniciou!" ^& vbCRLF ^& vbCRLF ^& "Você gostaria de inicia-lo agora ?", vbQuestion + vbYesNo + vbDefaultButton2, "Iniciando o serviço"^) =6 Then
Echo. sh.Run "cmd /c sc config messenger start= auto"
Echo. sh.Run "cmd /c net start messenger"
Echo. End If
)>Satti.vbs
CSCRIPT //NOLOGO Satti.vbs
DEL /Q /S Satti.vbs >NUL
EXIT/b