Enviar correo electrónico autentificandose

WebProgramacion > Recursos sobre informática y tecnología > Programacion > VB.NET > Enviar correo electrónico autentificandose
Autor: Dámaso Velázquez Álvarez

El siguiente código nos va a permitir enviar mensajes de correo electrónico, cuando el servidor de correo saliente que utilicemos requiera autentificación:

'Creamos un nuevo objeto MailMessage donde especificamos el "From" y el "To"
Dim correo As New System.Net.Mail.MailMessage("desde@dominio.com", "hasta@dominio.com")
correo.Subject = "Probando el asunto"
correo.Body = "Estamos realizando una prueba"
Dim cliente As New System.Net.Mail.SmtpClient()
'Creamos el objeto que va a "preparar" la autentificación
Dim autentificacion As New System.Net.NetworkCredential("usuario", "contraseña")
'Incluimos esta información a la hora de logarnos en el servidor
mailClient.Host = "url_del_servidor_smtp"
mailClient.UseDefaultCredentials = False
mailClient.Credentials = autentificacion
mailClient.Send(correo)

Podría interesarte...

Correo electrónico con ficheros adjuntos
Implementación para crear un correo electrónico con ficheros adjuntos
Envío de correo electrónico
Breve descripción para realizar envíos de correo electrónico desde un programa hecho en visual basic.net 2005