Bonjour à tous, et désolé si la question a déjà été soulevée !
Je souhaiterais créer un .vbs permettant d'envoyer par mail et toujours à la même adresse le contenu d'un fichier.txt
J'ai déjà trouvé comme base :
Code Visual Basic :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 With CreateObject("CDO.Message") .From="mail@mail.com" .To="mail@mail.com" .Subject="SUJET" .TextBody=MON FICHIER TXT A IMPORTER ! .Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 .Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "192.168.0.1" .Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 .Configuration.Fields.Update On Error Resume Next .Send If Err Then MsgBox "Le message n'a pas pu être expédié." On Error GoTo 0 End With
Merci par avance !![]()
Partager