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)
