Private Sub SendHtmlFormattedEmail(ByVal recepientEmail As String, ByVal subject As String, ByVal body As String)
Dim mailMessage As System.Net.Mail.MailMessage = New System.Net.Mail.MailMessage
mailMessage.From = New MailAddress(ConfigurationManager.AppSettings("UserName"))
mailMessage.Subject = subject
mailMessage.Body = body
mailMessage.IsBodyHtml = True
mailMessage.To.Add(New MailAddress(recepientEmail))
mailMessage.From = New MailAddress("[email protected]")
Dim smtp As SmtpClient = New SmtpClient
smtp.Host = "IP"
smtp.EnableSsl = False
smtp.Credentials = New System.Net.NetworkCredential("[email protected]", "Password")
smtp.Port = PortNumber
smtp.Send(mailMessage)
End Sub
Mark TaborPosted Aug 8, 2016, 3:32 AM
Vinay SinghPosted Aug 8, 2016, 3:24 AM