Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If RadioButton1.Checked Then
Dim email As New MailMessage()
email.From = New MailAddress(username.Text)
email.To.Add(tobox.Text)
email.Subject = (subject.Text)
email.Body = content.Text
Dim SMTPServer As New SmtpClient("smtp.live.fr")
SMTPServer.Port = 25
SMTPServer.Credentials = New System.Net.NetworkCredential(username.Text, password.Text)
SMTPServer.EnableSsl = True
SMTPServer.Send(email)
Mais quand je clique sur le Button1, le programme freeze et le débugger m'indique "Echec d'envoi du mail"...
Je ne comprend pas pourquoi, j'ai essayer avec une autre adresse, avec un autre RadioButton qui lui est configuré pour Orange, et ca fonctionne à merveil, pareil avec un 3eme RadioButton configuré pour Gmail.