[mrfenix93]

كود :

Imports System.Net.Mail

كود :

Dim SmtpServer As New SmtpClient()
Dim mail As New MailMessage()
SmtpServer.EnableSsl = True
SmtpServer.Credentials = New Net.NetworkCredential("YourMail In gmail", "Your App Password No Mail Password")
SmtpServer.Port = "587"
SmtpServer.Host = "smtp.gmail.com"
mail = New MailMessage()
mail.From = New MailAddress("Your Mail")
mail.To.Add("Mail Need To Send")
mail.Subject = "Subject"
mail.Body = "Body"
SmtpServer.Send(mail)