Envoyer un e-mail

Version imprimable

28/12/2009, 17h16
sokai

Envoyer un e-mail

Bonjour,

Peut-on envoyer un e-mail grâce à un script .bat sans utiliser de programme externe ?

Si oui quelque aurait un petit exemple ?

Merci !

PS: J'ai trouvé un exemple avec mailto: mais ça ne fait qu'ouvrir outlook sans envoyé l'e-mail directement. (Ce que je cherche à faire).
29/12/2009, 13h43
BeN0o8
Bonjour !

C'est possible a partir de telnet :

Code:

telnet mail.domain.ext port

Je n'en sais pas plus ne l'ayant jamais utilisé, mais si tu peux je pense que cela serait plus simple d'utiliser VBS ou PHP par exemple mais si tu n'as vraiment pas le choix alors explore la solution telnet.

EDIT:
En revanche je ne suis pas sur que tu puisse piloter telnet depuis un batch utilise VBS avec les sendkeys ca sera plus simple!

J'ai fait des test avec free et ca fonctionne uniquement pour le pop car j'ai eu un acces refusé pour le smtp :
Code:

1 2 3 telnet pop.free.fr 110 user identifiant_mail_free pass mot_de_pass_mail_free
Avec ca la connection est etablie.

Ensuite quelques commandes :

STAT renvoie le nombre de courriels et le nombre d'octets qu'ils occupent sur le serveur.
LIST renvoie les numéros de courriels et leur taille en octets.
RETR n affiche le courriel numéro "n" à l'écran (RETR 7 par exemple).
DELE n marque le message pour l'effacement (DELE 3 par exemple, il ne sera en fait réellement effacé qu'à la clôture de la session avec la commande QUIT).
TOP n x affiche les entêtes du courriel numéro n et les x premières lignes du courriel en question (exemple : TOP 2 0 pour avoir l'entête du courriel n°2 ou TOP 27 10 pour avoir les 10 premières lignes du courriel n°27).
QUIT sert à se déconnecter proprement du pop.
29/12/2009, 14h33
sokai

ouai telnet me semblait aussi la seul solution sans utiliser de programme externe le problème c'est que les serveurs smtp foirent souvent ou sont lents et moi j'aurais besoin de qqch de rapide et sur qui marche à 99% tout le temps quoi ^^. Mais merci pour l'aide. ;)

Avec ton .BAT appelle un VBS. Le taux est de 100%.:ccool:

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
26
27
28
29
30
31
32
33
34
Dim wshShell, objEnv, strEmail, strrpt
Set wshShell = Wscript.CreateObject("Wscript.Shell")
Set objEnv = wshShell.Environment("PROCESS")
 strrpt=objEnv("RPT")
'msgbox strrpt


'strEmail = objEnv("EMAIL")
Set objMessage = CreateObject("CDO.Message") 
objMessage.Subject = "OBJET" 
objMessage.From = objEnv("EMAIL") 
objMessage.To = "DESTINATAIRE@DE.choix" 
objMessage.TextBody = "MESSAGE DU MAIL" 
'Ajout de la PJ
'msgbox "C:\temp\"&strrpt
objMessage.AddAttachment "C:\temp\"&strrpt

'==configuration pour le serveur de SMTP distant .  
objMessage.Configuration.Fields.Item _ 
("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 

'Nom du serveur SMTP
objMessage.Configuration.Fields.Item _ 
("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtpserver" 

'Port serveur 
objMessage.Configuration.Fields.Item _ 
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 

objMessage.Configuration.Fields.Update 

'==Envoi du message== 

objMessage.Send

Je ne sais pas si je reponds a ta question mais c'est le plus simple.

++
Le Mok