knowmeifyou
Active member
- Joined
- Jun 16, 2013
- Messages
- 26
- Programming Experience
- Beginner
i dont have any codes. can someone share you're codes.
i dont have any codes. can someone share you're codes.
Unable to connect to the remote server
Imports System.Net.Mail
Dim smtpServer As New SmtpClient()
Dim mail As New MailMessage
smtpServer.Credentials = New Net.NetworkCredential(TextBox1.Text & "@gmail.com", TextBox2.Text)
smtpServer.Port = 587
smtpServer.Host = "smtp.gmail.com"
smtpServer.EnableSsl = True
mail.From = New MailAddress(TextBox1.Text & "@gmail.com")
If RadioButton1.Checked = True Then
mail.To.Add("+63" & TextBox3.Text & "@globe.com.ph")
ElseIf RadioButton2.Checked = True Then
mail.To.Add(TextBox3.Text)
End If
mail.Subject = TextBox4.Text
mail.Body = TextBox5.Text()
smtpServer.Send(mail)
MsgBox("mail is sent", MsgBoxStyle.OkOnly, "Report")