Page 2 sur 2

Re: Envoyer un texte par e-mail

Posté : 15 juil. 2011 23:05
par edgarjacobs
Pour win32-GC
Merci pour l'info, mais tout est résolu. Mais je conserve l'url donnnée, ça peu encore servir si d'autres questions dans le genre débarquent :P

Bonne soirée,
Edgar.

Re: Envoyer un texte par e-mail

Posté : 16 juil. 2011 11:35
par WIN32-[GG]
no problem :mrgreen:

Donc: Sujet résolu.
HA! Pas tout à fait: Il faut voir si erfan y arrive...

Re: Envoyer un texte par e-mail

Posté : 19 juil. 2011 15:44
par Cmanix
Salut, voici un batch pour envoyer des mail avec pièce jointe:

Code : Tout sélectionner

@echo off

:::::::::::::::::::::::CONFIGURATION:::::::::::::::::::::::
set serveur_smtp=smtp.domaine.com
set port_smtp=25
set identifiant=
set mot_de_passe=
                   ::SSL activé=True ;SSL désactivé=False
set SSL=False

::::::::::::::::::::::::::MESSAGE::::::::::::::::::::::::::
set email_source=test@test.fr
set email_cible=email@domaine.com
set sujet=test
                   ::texte sur une ligne="texte" ;texte sur plusieur ligne="ligne 1" ^& VbCrLf ^& "ligne 2"
set texte="ligne 1" ^& VbCrLf ^& "ligne 2"

:::::::::::::::::::::::PIECE JOINTE::::::::::::::::::::::::
                   ::Atention aux extention de fichiers refusé qui peuvent empecher l'envoi du message. Indiquer le chemin complet.
set piece_jointe=



echo Set objEmail = CreateObject("CDO.Message") >ms.vbs
echo On Error Resume Next >>ms.vbs
echo objEmail.From = "%email_source%" >>ms.vbs
echo objEmail.To = "%email_cible%" >>ms.vbs
echo objEmail.Subject = "%sujet%" >>ms.vbs
echo objEmail.Textbody = %texte% >>ms.vbs
if not "%piece_jointe%"=="" echo objEmail.AddAttachment("%piece_jointe%") >>ms.vbs
echo objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2  >>ms.vbs
echo objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 >>ms.vbs
echo objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "%serveur_smtp%" >>ms.vbs
echo objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = %port_smtp% >>ms.vbs
echo objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = "%identifiant%" >>ms.vbs
echo objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "%mot_de_passe%" >>ms.vbs
echo objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = %SSL% >>ms.vbs
echo objEmail.Configuration.Fields.Update >>ms.vbs
echo objEmail.Send >>ms.vbs
ms.vbs
del ms.vbs
 

Re: Envoyer un texte par e-mail

Posté : 21 mars 2012 14:36
par arrkhan
WIN32-[GG] a écrit :Pour savoir si votre routeur fait aussi serveur smtp allez voir ici: http://arrkhan.free.fr/fai.php
Si il ya rien de marquer, c'est que ce n'est pas le cas.
Humm...., je suis le arrkhan en question et ce script ne sert pas du tout à ça.

FYI ce script permet de connaitre le smtp de l'appareil qui se connecte (ordi, smartphone, frigo) en identifiant le réseau sur lequel il est, car beaucoup de box internet empêche le lancement de mail si issu d'un fai différent d'eux.

Ce script me permettais, à une époque d'avoir dans mes softs, une partie "contacter l'auteur" et me permettais de récupérer le smtp du poste pour que le message s’envoie dans tous les cas.

fai.php comprend une soixante de fournisseurs d'accès français, belge et canadien, quand il n'y a rien de marqué, c'est que je ne l'ai pas parsé (ne le connaissant pas), mais plus d'info sont alors disponible en faisant http://arrkhan.free.fr/debugfai.php

@ plus

Re: Envoyer un texte par e-mail

Posté : 08 oct. 2013 21:04
par Jasmine
Grave erreur! Je dois employer le serveur smtp de la messagerie de mon FAI. Je ne sais pas pourquoi, ce n'est pas mon rayon, mais c'est comme ça.