Hallo zusammen,
ich habe ein kleines Programm programmiert womit freunde mir Mails schicken können der Quellcode:
Imports System.Net.Mail
Public Class Form1
Private Sub button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button.Click
Dim smtpserver As New SmtpClient()
Dim mail As New MailMessage()
smtpserver.Credentials = New Net.NetworkCredential("...", "...")
smtpserver.Port = 587
smtpserver.Host = "smtp.gmail.com"
smtpserver.EnableSsl = True
mail.From = New MailAddress("...")
mail.Subject = textbox2.Text
mail.To.Add("till.müller@gmail.com")
mail.Body = testbox3.Text
smtpserver.Send(mail)
MsgBox("Erfolgreich Versand")
End Sub
End Class
Nur bei vielen meiner Freunde kommt folgender Fehler:
Warum funktioniert es nicht?
Gruß,
VBSkills
ich habe ein kleines Programm programmiert womit freunde mir Mails schicken können der Quellcode:
Imports System.Net.Mail
Public Class Form1
Private Sub button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button.Click
Dim smtpserver As New SmtpClient()
Dim mail As New MailMessage()
smtpserver.Credentials = New Net.NetworkCredential("...", "...")
smtpserver.Port = 587
smtpserver.Host = "smtp.gmail.com"
smtpserver.EnableSsl = True
mail.From = New MailAddress("...")
mail.Subject = textbox2.Text
mail.To.Add("till.müller@gmail.com")
mail.Body = testbox3.Text
smtpserver.Send(mail)
MsgBox("Erfolgreich Versand")
End Sub
End Class
Nur bei vielen meiner Freunde kommt folgender Fehler:
Warum funktioniert es nicht?
Gruß,
VBSkills