Hier ist mein Quelltext bei drücken des buttons 1 sollen die Textboxen 1 und 2 versendet werden
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Timer1.Start()
Dim Msg As New Net.Mail.MailMessage
Dim myCredentials As New System.Net.NetworkCredential
myCredentials.UserName = „meine e-mail“
myCredentials.Password = „mein Passwort“
Msg.IsBodyHtml = False
Dim mySmtpsvr As New Net.Mail.SmtpClient()
mySmtpsvr.Host = „smtp.strato.de“
mySmtpsvr.Port = 25
mySmtpsvr.UseDefaultCredentials = False
mySmtpsvr.Credentials = myCredentials
Try
Msg.From = New Net.Mail.MailAddress(„[email protected]“)
Msg.To.Add(„nichts“)
Msg.Subject = „betreff“
Msg.Body = TextBox1.Text & TextBox2.Text
mySmtpsvr.Send(Msg)
MsgBox(„Email versendet!“)
Catch ex As Exception
MsgBox(„Fehler aufgetreten“)
End Try
End Sub
Ich bin verhältnismäßig noch ein Anfänger
ich möchte als e-mail meine mail von einem Strato server nutzen (smtp: smtp.strato.de) also strato webmailer
Vielen dank im Vor raus
nicki.