Introducción:

Muchas veces nos vemos en la necesidad de que nuestro proyecto tenga la manera de cómo enviar mensajes de correo electrónico desde ASP.NET.
En este artículo, vamos a ver como enviar mensajes de correo electrónico desde ASP.NET de manera básica, es decir, enviando mensajes con texto sin archivos anexados.
 

Para tal efecto debemos agregaremos una página ASP.NET con el nombre EnviarCorreo.aspx.

Nuestra página necesitará utilizar el objeto encargado de enviar mensajes de correos electrónicos, es decir, deberá hacer uso del nombre de espacio System.Web.Mail.

 

El nombre de espacio se declara mediante la instrucción:

 

Imports System.Web.Mail

 

Ahora bien agregaremos unos controles en nuestra página Web, de forma tal que quede de esta manera:

 

 

 

 

Básicamente se están agregando 4 controles del tipo TextBox y uno del tipo Button

Llamados en su  orden:

 

TxtDe       à System.Web.UI.WebControls.TextBox

TxtPara     à System.Web.UI.WebControls.TextBox

TxtAsunto   à System.Web.UI.WebControls.TextBox

TxtMensaje  à System.Web.UI.WebControls.TextBox

BtnEnviar   à System.Web.UI.WebControls.Button

 

 

El Código

Colocaremos este Código  en el evento clic del Buton y deberá quedar de la siguiente manera:

 

 

    Private Sub btnEnviar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEnviar.Click

        Dim MiPrimerCorreo As New MailMessage

 

        'Se Indica la Dirección de correo que envia

        MiPrimerCorreo.From = txtDe.Text

 

        'Se Indica la Dirección de correo que recibira

        MiPrimerCorreo.To = txtPara.Text

 

        'Se Indica el Asunto del correo a enviar

        MiPrimerCorreo.Subject = txtAsunto.Text

 

        'El Mensaje del Correo

        MiPrimerCorreo.Body = txtMensaje.Text

 

'establece el tipo de contenido del texto del mensaje de correo electrónico.

        'MailFormat.Html o MailFormat.Text

        MiPrimerCorreo.BodyFormat = MailFormat.Text

 

        'Establece la prioridad del mensaje de correo electrónico

        'MailPriority.High, MailPriority.Normal o MailPriority.Low

        MiPrimerCorreo.Priority = MailPriority.Normal

 

 

'Establece el nombre del servidor de transmisión de correo SMTP

'que se va a utilizar para enviar los mensajes de correo electrónico.

        SmtpMail.SmtpServer = ""

 

        'Envía un mensaje de correo electrónico utilizando argumentos

        'suministrados en las propiedades de la clase MailMessage.

        SmtpMail.Send(MiPrimerCorreo)

    End Sub

Analizando este conjunto de instrucciones, vemos que al principio, declaramos el objeto MailMessage que pertenece al Espacio de nombres System.Web.Mail.

De esta manera, asignamos una dirección de correo electrónico origen y otra destino (propiedades From y To del objeto) y un asunto determinado (propiedad Subject).

Luego asignaremos el mensaje en el que podemos incluir etiquetas HTML (propiedad Body) si queremos y posteriormente, indicaremos si el cuerpo será de texto enriquecido o no (propiedad BodyFormat).

Incluiremos la propiedad Priority para indicar la prioridad del mensaje.

Indicamos SmtpServer por el cual saldrán los correos.

Para enviar el mensaje, bastará con hacer uso del objeto SmtpMail, encargado de lanzar el mensaje correspondiente.
La aplicación se ejecutará y se enviará el mensaje de correo electrónico.