[TUTO] Test modem via port RS232
Publié : mar. 6 déc. 2011 17:15

L'un de mes clients utilise le service Fax de Windows Serveur 2003, le tout partagé sur les postes. Faisait un moment que je cherchais une façon de surveiller l'état du modem.
Ai enfin trouvé un logiciel qui permet de tester en ligne de commande!

Disponible ici
Ai modifié le script par défaut.
Code : Tout sélectionner
@echo off
net stop fax
comset 9600 1
if errorlevel == 99 goto 99
if errorlevel == 0 goto 0
:99
echo error level was 99 >faxlog.txt
c:\comst13\script.vbs
goto stop
:0
echo error level was 0 >faxlog.txt
:stop:
net start fax
Code : Tout sélectionner
Set objEmail = CreateObject("CDO.Message")
objEmail.From = "client@domaine.fr"
objEmail.To = "presta@domaine.fr"
objEmail.Subject = "** LOG FAX CLIENT **"
objEmail.Textbody = "Rapport d'état du Modem/Fax"
objEmail.AddAttachment("C:\comst13\faxlog.txt")
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp de votre FAI"
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objEmail.Configuration.Fields.Update
objEmail.Send
Le temps passe trop vite! Me semblait avoir posé la question en début d'année alors que c'était en 2010!

archive ici