Por medio de codigo ASP.NET se pueden enviar correos desde su servidor $SEVERMAIL usando el objeto de email CDO. A continuacion se muestra un codigo ejemplo de el uso del objeto, este consiste en crear el objeto, asignar los respectivos valores de configuracion de acuerdo a su cuenta, enviar el email y destruir el objeto. Siempre se debe destruir el objeto para no dejar utilizando ningun recurso de mas en el servidor.


'Se crea el objeto CDO y el objeto oFields para sus caracteristicas.

Dim oMsg As CDO.Message = New CDO.Message()

Dim iConfg As CDO.Configuration = New CDO.Configuration()

Dim oFields As ADODB.Fields

oFields = iConfg.Fields

 

'Se especifican los parametros de envio del servidor remoto SMTP.

 

'Envio de mensaje usando red.

oFields("http://schemas.microsoft.com/cdo/configuration/sendusing").Value = 2

 

'NOmbre del servidor (Puede ser tambien por su IP).

oFields("http://schemas.microsoft.com/cdo/configuration/smtpserver").Value = "mail.internetworks.com"

oFields("http://schemas.microsoft.com/cdo/configuration/smtpserverport").Value = 25

 

'Se define si se us SSL para la conexión.

oFields("http://schemas.microsoft.com/cdo/configuration/smtpusessl").Value = False

oFields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout").Value = 60

 

'El servidor requiere de autenticacion.

oFields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate").Value = 1

 

'Autenticacion basica usuario y clave (los parametros en texto simple)

oFields("http://schemas.microsoft.com/cdo/configuration/sendusername").Value = "sucorreo@sudominio.com"

oFields("http://schemas.microsoft.com/cdo/configuration/sendpassword").Value = "La contraseña de su cuenta"

 

oFields.Update()

oMsg.Configuration = iConfg

 

 

 

'El remitente del mail

oMsg.From = "sucorreo@sudominio.com"

 

'El destinatario del mail

oMsg.To = "direcciondestinatario@dominio.com"

'El asunto del mail

oMsg.Subject = "Codigo de ejemplo para envio de mensajes en ASP.NET"

 

 

'El formato del email puede ser en texto simple o en HTML, use solamente una de las dos siguientes instrucciones segun el formato que se desee.

 

'Para enviar en formato HTML

oMsg.HTMLBody = "Código de ejemplo para envio de mensajes en ASP.NET"

'Para enviar en formato texto

oMsg.TextBody = "Código de ejemplo para envio de mensajes en ASP.NET"

El remitente del mail

 

'Se envia el mail...

oMsg.Send()

 

'Se destruye el objeto CDO...

oMsg = Nothing

oFields = Nothing

Con este codigo es posible enviar email en un servidor con IIS desde un sistema hecho en ASP.NET, puede copiar y pegar el texto de este codigo en la pagina de su proyecto, definirlo como una clase o como un procedimiento.