Primero debemos utilizar el Namespace:
Imports System.Net.Mail
Ahora en nuestro método para enviar el correo escribimos lo siguiente:
Dim smtp As New SmtpClient
Dim mail As MailMessage = New MailMessage
mail.From = New MailAddress("remitente@midominio.com")
mail.To.Add("destinatario@midominio.com")
'mail.CC.Add(vRemitente) 'Esta linea es para agregar una copia
mail.Subject = "Asunto del correo"
mail.Priority = MailPriority.High
mail.Body = "Cuerpo del correo" 'Se pueden utilizar Tags de HTML para darle formato al texto.
'mail.Attachments.Add(New Attachment("Aqui va el path del archivo")) 'Por si se desea aduntar un documento
smtp.Host = "dirección del SMTP que se utilizará para enviar el correo"
smtp.Port = Puerto del SMTP para enviar el correo
smtp.EnableSsl = True
smtp.DeliveryMethod = SmtpDeliveryMethod.Network
smtp.Credentials = New System.Net.NetworkCredential("remitente@midominio.com", "password")
smtp.Send(mail)
Con esto ya podremos enviar correos desde nuestra apliacación de Visual Basic.
Tenemos que tomar en cuenta que la configuración del SMTP corresponde al servidor que utilizaremos para enviar mail.
Salu2.
No hay comentarios:
Publicar un comentario