Er zijn 2 reacties in dit onderwerp

[rob luttge]

Goedemiddag allemaal,

Ik heb een probleem met het versturen van e-mail. Ik heb me suf gegoogled maar kom er toch niet uit. De respons is "the smtp server requires a secure connection or the client was not authenticated. (waarden adres en wachtwoord heb ik hier geanonimiseerd, maar staan well goed in de code). Alle input welkom.

Dank

Rob


Code:

	 Dim SmtpServer As New SmtpClient()
		 SmtpServer.DeliveryMethod = SmtpDeliveryMethod.Network
		 SmtpServer.EnableSsl = True
		 Dim mail As New MailMessage()
		 SmtpServer.Credentials = New Net.NetworkCredential("user@gmail.com", "pass")
		 SmtpServer.Port = 587
		 SmtpServer.Host = "smtp.gmail.com"
		 mail = New MailMessage()
		 mail.From = New MailAddress("otheruser@gmail.com")
		 mail.To.Add("otheruser@gmail.com")
		 mail.Subject = "Waarschuwing"
		 mail.Body = "testbericht."
		 SmtpServer.Send(mail)
		 MsgBox("mail send")

[Benno]

Visual Basic Code:

 Public Class GMail
	Private Const smtpGmail As String = "smtp.gmail.com"

	Public Shared Sub SmtpMail(fromAdres As String, toAdres As String,
									subject As String, body As String, naam As String, paswoord As String)
		Dim mail As New MailMessage()
		Dim SmtpServer As New SmtpClient(smtpGmail)
		mail.From = New MailAddress(fromAdres)
		mail.To.Add(toAdres)
		mail.Subject = subject
		mail.Body = body
		SmtpServer.Port = 587
		SmtpServer.Credentials = New System.Net.NetworkCredential(naam, paswoord)
		SmtpServer.EnableSsl = True
		SmtpServer.Send(mail)
	End Sub

' ...
End Class

[Benno]

Aanroep
Visual Basic Code:

Private Sub SturenClick(sender As Object, e As EventArgs) Handles Button1.Click
GMail.SmtpMail("benno@gmail.com", "rob@gmail.com", Titel.Text, Body.Text, "benno", "motdepasse")
End Sub

Werkt gewoon (wel met andere gegevens voor alle parameters, maar soit).