1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26
|
:INIT
rem ** Constantes
set Emetteur=xxxx@xxxx.com
set FichierDestinataire=e:\xxxx\TO.txt
set FichierCopie=e:\xxx\CC.txt
set CorpsDuMail=e:\xxx\BODY.txt
set SujetDuMail=ATTENTION, verifiez que le poste xxxx est allume - %DateDuJour%
set ServeurSMTP=xxxx
set Executable=\\xxxx\logiciel\blat\blat.exe
:ping
PING -n 1 xxxx | FIND "TTL" > NUL
IF not %ERRORLEVEL% ==1 goto envoi
else goto end
:ENVOI
%Executable% %CorpsDuMail% -u xxx\xxx -pw xxx -tf %FichierDestinataire% -cf %FichierCopie% -subject "%SujetDuMail%" -server %ServeurSMTP% -debug -f %Emetteur%
:end
goto eof |