hchtot
Messages postés12Date d'inscriptionlundi 30 juin 2003StatutMembreDernière intervention 2 octobre 2013
-
20 janv. 2004 à 00:32
hchtot
Messages postés12Date d'inscriptionlundi 30 juin 2003StatutMembreDernière intervention 2 octobre 2013
-
22 janv. 2004 à 15:33
Bonjour,
J'essaye desesperement d'envoyer un mail automatique avec le composant jmail, en utilisant le code suivant:
<%
Dim Destinataire, Origine, Message_Mail, Sujet_Mail
Destinataire = "toto@toto.fr"
Origine = "toto@toto.fr"
Message_Mail = "Bonjour "& vbCrLf &" Ceci est un test d envoie de Mail en ASP"
Message_Mail = Message_Mail & vbCrLf &"Bon Coding"& vbCrLf &"F___"
Sujet_Mail = "Test d envoi de Mail par ASP"
Function SendJMail (LeDest, Expediteur, MonSujet, MonMsg)
Dim MonSendMail
Set MonSendMail = Server.CreateObject("JMail.SMTPMail")
MonSendMail.ServerAddress = "localhost:25"
MonSendMail.Sender = Expediteur
MonSendMail.AddRecipient = LeDest
MonSendMail Subject = MonSujet
MonSendMail.Body = MonMsg
MonSendMail.Execute
Set MonSendMail = Nothing
End Function
hchtot
Messages postés12Date d'inscriptionlundi 30 juin 2003StatutMembreDernière intervention 2 octobre 2013 22 janv. 2004 à 00:23
Merci pour ta réponse, mais je pense avoir également une erreur dans l'adresse de mon serveur smtp:
JMail.ServerAddress = "mail.monserveursmtp:25"
J'ai essayé plusieurs trucs, rien ne marche...
Comment connaitre l'adresse de mon serveur smtp ?