Debemos incluir al principio de nuestro código lo siguiente:
Imports System.Net.Mail
La idea principal es que vamos a contar con dos objetos, uno nos va a permitir construir el mensaje de correo electrónico y el otro nos va a permitir hacer el envío de dicho correo.
Clase para construir el objeto que representará el correo electrónico: MailMessage
Clase para realizar el envío del objeto de la clase MailMessage: SmtpClient
Código de ejemplo para enviar un correo:
Dim mensaje As MailMessage = New MailMessage(“remitente del correo”, “destinatario”)
mensaje.IsBodyHtml = True ‘Para permitir el uso de código html en el cuerpo del correo
mensaje.Subject = “Asunto del correo electronico”
mensaje.Body = “Aquí ya podemos especificar el contenido del correo electronico”
mensaje.BodyEncoding = System.Text.Encoding.GetEncoding(1252)
Dim cliente As SmtpClient
cliente = New SmtpClient(“direccion_del_servidor_smtp_para_enviar_el_correo”)
‘enviamos el mensaje
cliente.send(mensaje)
mensaje.IsBodyHtml = True ‘Para permitir el uso de código html en el cuerpo del correo
mensaje.Subject = “Asunto del correo electronico”
mensaje.Body = “Aquí ya podemos especificar el contenido del correo electronico”
mensaje.BodyEncoding = System.Text.Encoding.GetEncoding(1252)
Dim cliente As SmtpClient
cliente = New SmtpClient(“direccion_del_servidor_smtp_para_enviar_el_correo”)
‘enviamos el mensaje
cliente.send(mensaje)
