vb.net - email

nalinsen

Member
Nov 6, 2016
716
90
0
vb.net වලින් email(gmail) genarate වෙලා send වෙන Sample code එකක් තියෙ නම් පොස්ට් කරන්න.


නැත්නම් බම්ප් එකක් හරි දාල යන්න රෙප් දෙනවා. :yes::yes::yes::yes:
 

hasithayad

Well-known member
  • Sep 28, 2011
    30,793
    1
    44,991
    113
    Code:
    Imports System.Net.Mail
    Public Class Form1
       
       Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
          Try
              Dim Smtp_Server As New SmtpClient
              Dim e_mail As New MailMessage()
              Smtp_Server.UseDefaultCredentials = False
              Smtp_Server.Credentials = New Net.NetworkCredential("[email protected]", "password")
              Smtp_Server.Port = 587
              Smtp_Server.EnableSsl = True
              Smtp_Server.Host = "smtp.gmail.com"
    
              e_mail = New MailMessage()
              e_mail.From = New MailAddress(txtFrom.Text)
              e_mail.To.Add(txtTo.Text)
              e_mail.Subject = "Email Sending"
              e_mail.IsBodyHtml = False
              e_mail.Body = txtMessage.Text
              Smtp_Server.Send(e_mail)
              MsgBox("Mail Sent")
    
          Catch error_t As Exception
              MsgBox(error_t.ToString)
          End Try
    
       End Sub
    
    End Class