Problème serveur, envoi de mail en VB.NET
Bonjour,
j'ai créer ce code dans une SUB sur ma page .VB:
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
| Dim email As New MailMessage()
Dim utilisateur, password, serveur As String
utilisateur = ConfigurationSettings.AppSettings("SmtpUtilisateur")
password = ConfigurationSettings.AppSettings("SmtpPassword")
serveur = ConfigurationSettings.AppSettings("SmtpServeur")
email.From = "mail@free.fr"
email.To = "mail@free.fr"
email.Subject = "TEST ENVOY DE MAIL"
email.Body = "Bonjour" & Convert.ToChar(10) & "" + "Ceci est le contenu du mail" & Convert.ToChar(10) & "" + "A bientôt"
SmtpMail.SmtpServer = serveur
email.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate", "1")
email.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusername", utilisateur)
email.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendpassword", password)
Try
SmtpMail.Send(email)
Catch ex As Exception
MsgBox(ex.Message)
End Try |
dans mon "web.config" :
Code:
1
2
3
4
5
| <appSettings>
<add key="SmtpServeur" value="smtp.free.fr" />
<add key="SmtpUtilisateur" value="name" />
<add key="SmtpPassword" value="serial" />
</appSettings> |
le probleme c'est que j'ai un message d'erreur:
Citation:
Le transport a échoué dans sa connexion au serveur.
le code en lui meme fonctionne car je l'utilise deja dans une aplication windows...
voici mon site, heberger chez SOMEE
