Author: Admin 03/26/2022
Language:
Visual Basic .NET
Tags: send email vb.net
Here's an example of how to send an email in a VB.Net application.
'create the mail message
Dim mail As New Net.Mail.MailMessage()
'set the addresses
mail.From = New Net.Mail.MailAddress(Email_User)
mail.To.Add(Email_User)
'set the content
mail.Subject = tbSubject.Text
mail.IsBodyHtml = True
mail.Body = "Name: " & tbName.Text & "<br />" &
"Email: " & tbEmail.Text & "<br />" &
"Phone: " & tbPhone.Text & "<br />" & "<br />" &
"Category: " & ddlCategory.SelectedValue & "<br />" & "<br />" &
"Message: " & ASPxHtmlEditor1.Html
' Create the file attachment for this e-mail.
'mail.Attachments.Add(New System.Net.Mail.Attachment(Environment.CurrentDirectory & "\Log.txt"))
'send the message
Dim smtp As New Net.Mail.SmtpClient(Email_Server)
'Server Port
smtp.Port = Email_Port
'to authenticate we set the username and password properties on the SmtpClient
smtp.Credentials = New Net.NetworkCredential(Email_User, Email_Password)
'Send email
smtp.Send(mail)
'Clean up
smtp.Dispose()
mail.Dispose()