Como enviar Correo Eléctronico con ASP.Net Fecha: 03/Dic/2004 (03/12/04)
|
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 ButtonLlamados 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.