Bonjour à tous,
Une petite question:
Voila j'ai un script vb, qui permet d'envoyer des mails dont voici le code:
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
| Set objMessage = CreateObject("CDO.Message")
objMessage.Subject = "test"
objMessage.From = "ToTo@TaTa.com"
objMessage.To = "TaTa@ToTo.com"
objMessage.TextBody = "Couou"
objMessage.AddAttachment "C:\Documents and Settings\bureau\test.txt"
'==This section provides the configuration information for the remote SMTP server.
'==Normally you will only change the server name or IP.
objMessage.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
'Name or IP of Remote SMTP Server
objMessage.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "SMTP.fai.fr"
'Server port (typically 25)
objMessage.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objMessage.Configuration.Fields.Update
'==End remote SMTP server configuration section==
objMessage.Send |
Je voudrais maintenant savoir si il est possible de laisser les champs du sujet, du from, du to, du smtp, du port et de la piece jointe vides
et qu'il aille rechercher les informations dans un fichier text ou autre format, comme :
En sachant que le script une fois terminé est converti en ".exe"
Comptant sur vos lumieres ;-)
Cordialement
Partager