Zitat:
Dim text As String
text = txtNachricht.Text
Dim myClient As New Net.Mail.SmtpClient("smtp.web.de")
myClient.Credentials = New NetworkCredential(txtAbsender.Text, txtPasswort.Text)
myClient.Send(txtAbsender.Text, txtEmpfänger.Text, txtBetreff.Text, text)
|
Hiermit musst die Absender Adresse ein @web.de Account sein, empfänger ist egal.
Falls nicht gewünscht
Dim myClient As New Net.Mail.SmtpClient("smtp.web.de") "entsprechend abändern"
Lg