Bonjour,
j'ai un probleme pour l'envoi d'email automatique a partir d'une age .aspx ( asp.net )
Mon code
Dans Webconfig
<appSettings>
<add key="SmtpServeur" value="smtp.domaine.com" />
<add key="SmtpUtilisateur" value=utilisateur@domaine.com />
<add key="SmtpPassword" value="password" />
Le serveur, login et mot de passe correct, je le met pas ici pour confidentialité
</appSettings>Dans ma page
Dim emaile As New MailMessage
Dim utilisateur, password, serveur As String
utilisateur = ConfigurationSettings.AppSettings("SmtpUtilisateur")
password = ConfigurationSettings.AppSettings("SmtpPassword")
serveur = ConfigurationSettings.AppSettings("SmtpServeur")
emaile.From = "test@test"
emaile.To = email.Text ---- ici c'est l'email que saisie l'internaute
emaile.Subject = "Sujet du mail"
emaile.BodyFormat = MailFormat.Html
emaile.Body = "<html>" & _
"<head>" & _
"<meta http-equiv=""Content-Language"" content=""fr"">" & _
"<meta http-equiv=""Content-Type"" content=""text/html; charset=windows-1252"">" & _
"</head>" & _
"<body>" & _
"<div align='center'>" & _
"<img src='http://www.monbebedamour.com/images/logo.jpg' border='0'>" & _
"</div> <br>" & _
"<table width='100%' border='0' cellpadding='0' cellspacing='0' summary=''><tr><td width='100%' height='10'></td></tr></table>" & _
"<font face='Arial' size='2'><b>Bonjour, vous recevez ce message suite à l'ouverture de votre compte client sur </b><br>Nous vous remercions de la confiance que vous nous apporté. Pour mémoire nous vous rappellons ci-dessous votre identifiant et votre mot de passe pour vous connecter à votre espace client réservé :" & _
"<table width='100%' border='0' cellpadding='0' cellspacing='0' summary=''><tr><td width='100%' height='5'></td></tr></table><br>" & _
"<table width='100%' border='0' cellpadding='0' cellspacing='0' summary=''><tr><td width='100%' height='1' background='http://www.monbebedamour.com/images/lh.gif'></td></tr></table>" & _
"<table border='0' cellpadding='5' cellspacing='5' bgcolor='LightYellow' width='100%'>" & _
"<tr>" & _
"<td><font face='Arial' size='2'>Login :</font></td>" & _
"<td><font face='Arial' size='2'><b>" & email.Text & "</b></font></td>" & _
"</tr>" & _
"<tr>" & _
"<td><font face='Arial' size='2'>Mot de passe : </font></td>" & _
"<td><font face='Arial' size='2'><b>" & password2.Text & "</b></font></td>" & _
"</tr>" & _
"</table>" & _
"<table width='100%' border='0' cellpadding='0' cellspacing='0' summary=''>" & _
"<tr>" & _
"<td width='100%' height='1' background=images/lh.gif'></td>" & _
"</tr>" & _
"</table>" & _
"<br>Nous vous recommandons de conserver ce message. En cas d'oubli de votre code d'accès ou de votre mot de passe, une aide vous sera néanmoins proposée sur le site pour vous aider à les retrouver.<br><br>ATTENTION : cet e-mail vous est envoyé automatiquement, merci de ne pas utiliser la fonction répondre à l'expéditeur." & _
"<br><br>A bientôt sur & _
"</font>" & _
"</body>" & _
"</html>"
emaile.Priority = MailPriority.High
SmtpMail.SmtpServer = serveur
emaile.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate", "1")
emaile.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusername", utilisateur)
emaile.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendpassword", password)
Try
SmtpMail.Send(emaile)
Catch ex As Exception
L_erreur.Text = ex.Message
End Tryvoila pour le code.. maintenant mon probleme :
Le probleme que j'ai est que ce code ne fonctionne pas tout le temps.
Des fois il envoie le mail sans probleme, et des fois il me met l'erreur :
Could not access 'CDO.Message' object.
et je ne sais pas pourquoi !!! Cela me pose probleme car tout le monde doit recevoir ce mail..;
Si quelqu'un peut me donner un coup de main, c'est pas de refus...la c la galere
Joh59