Salut,
Un technicien aimerait obtenir quotidiennement par mail un rapport généré par un logiciel sur un windows server. Comme solution, je pensais écrire un script VBS, qui s’exécuterait automatiquement chaque jour et enverrais ce fichier. J'ai pu trouver le code ci-dessous qui me semble convenir mais j'ai encore quelques question :
-Si j'ai bien compris ce code, notamment les dernières lignes, cela nécessite d'avoir sur ce serveur d'où s’exécute le script un serveur smtp ou est-ce que je peux mettre le smtp d'orange, qui est le FAI de l'entreprise ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 Set objEmail = CreateObject("CDO.Message") objEmail.From = "Expediteur@toto.com" objEmail.To = "Destinataire@bravo.com" objEmail.Subject = "Sujet: Toto a la plage" objEmail.Textbody = "Texte: Il fait beau, le soleil brille" objEmail.AddAttachment(nrep+Fichier.Name) objEmail.Configuration.Fields.Item _ ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 objEmail.Configuration.Fields.Item _ ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = _ "serveur-smtp-exchange" objEmail.Configuration.Fields.Item _ ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 objEmail.Configuration.Fields.Update objEmail.Send
-Si oui, n'ayant pas encore mis le smtp en place et donc ne pouvant tester le code, semble-t'il correct ?
-Quel est le mieux pour que ce script s’exécute quotidiennement, un fichier batch, peut-on créer une tache dans Windows ?
Partager