How to send a gmail email in vb.net?

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22

Imports System.Net.Mail

Module Module1

    Sub Main()
        Dim smtpServer As New SmtpClient("smtp.gmail.com")
        smtpServer.Port = 587
        smtpServer.Credentials = New System.Net.NetworkCredential("your_email@gmail.com", "your_password")
        smtpServer.EnableSsl = True

        Dim mail As New MailMessage()
        mail.From = New MailAddress("your_email@gmail.com")
        mail.To.Add("recipient@example.com")
        mail.Subject = "Test Email"
        mail.Body = "This is a test email sent from VB.Net"

        smtpServer.Send(mail)

        Console.WriteLine("Email Sent!")
    End Sub

End Module