[VB.NET][2.0][smtp]envoi de mail
bonjour à tous
voilà je teste une tout petite application qui envoi un mail tout simplement mais ca ne marche pas
voilà mon code qui s'effectue juste en cliquant sur un bouton , c'est très simple comme code mais c ' est juste un test; j'ai regardé les tuto et rien ne marche
je pense que le problème se situe au niveau du smtp mais je n'en suis pas sûre
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
|
Dim mail As New MailMessage
mail.Subject = "salut"
mail.Body = "test"
mail.To.Add(New MailAddress("xxx@hotmail.com"))
mail.From = New MailAddress("xxx@gmail.com")
mail.BodyEncoding = System.Text.Encoding.GetEncoding("iso-8859-1")
mail.SubjectEncoding = System.Text.Encoding.GetEncoding("iso-8859-1")
Dim smtp As New SmtpClient
smtp.Host = "smtp.gmail.com"
smtp.Port = 465
smtp.Credentials = New Net.NetworkCredential(user, password)
smtp.EnableSsl = True
Try
smtp.Send(mail)
MsgBox("ok")
Catch ex As SmtpException
MsgBox(ex.Message & 1)
Catch ex As Exception
MsgBox(ex.Message)
End Try |
Merci d'avance
Marc