Envoi mail automatique
Résolu
tropare
Messages postés
85
Statut
Membre
-
firehc -
firehc -
Bonjour,
je souhaiteraie grace a un programme envoyé un email automatiquemen a l'adminstrateur pour signalé un pb d'alimentation ceci devra etre fait automatiquemen des que l'onduleur arrive a 10% de sa capacité je c comment lancé un programme automatiquement a 10% de la capacité mé je c pa faire en sorte que lemail soit envoyé automatiquemen a ladministrateur merci de votre aide
je souhaiteraie grace a un programme envoyé un email automatiquemen a l'adminstrateur pour signalé un pb d'alimentation ceci devra etre fait automatiquemen des que l'onduleur arrive a 10% de sa capacité je c comment lancé un programme automatiquement a 10% de la capacité mé je c pa faire en sorte que lemail soit envoyé automatiquemen a ladministrateur merci de votre aide
Configuration: Windows XP Internet Explorer 7.0
2 réponses
-
g trouvé pr ceux que sa intereseré je mé le code
Set objEmail = CreateObject("CDO.Message")
objEmail.From = "votre adresse mail ou nom"
objEmail.To = "adresse mail de destination"
objEmail.Subject = "le sujet du message"
objEmail.Textbody = "le message"
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
'Name or IP of Remote SMTP Server
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "votre serveur smtp"
'Server port (typically 25)
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objEmail.Configuration.Fields.Update
objEmail.Send -
Salut,
Ton code source c'est une macro excell ou un bout de code VB ou un batch, parce que la perso on peut se demander ou le mettre et comment le lancer.
pense aux novices MERCI
