Por medio de codigo en una pagina de ASP se pueden enviar correos desde su servidor servidordecorreo 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

Dim ObjSendMail

Set ObjSendMail = CreateObject("CDO.Message")

 

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

 

'Envio de mensaje usando red.

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2

'Nombre del servidor (Puede ser tambien su IP).

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "servidordecorreo"

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25

'Se define si se usa SSL para la conexion

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = False

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60

'El server requiere autenticacion.

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1

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

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = "sucorreo@sudominio.com"

 

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "La contraseña de su cuenta"

 

ObjSendMail.Configuration.Fields.Update

 

 

ObjSendMail.To = "emaildestinatario@dominio.com"

ObjSendMail.CC = "email@dominio.com" 'Si se deseara enviar a otra direccion en ConCopia para (opcional)

 

'El asunto del mail

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

 

'El remitente del mail

ObjSendMail.From = "La contraseña de su cuenta"

 

 

 

'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.

ObjSendMail.HTMLBody = "Codigo de ejemplo para envio de mensajes en ASP" 'para enviar en formato HTML.

ObjSendMail.TextBody = "Codigo de ejemplo para envio de mensajes en ASP" 'para enviar en texto.

 

'Se envia el mail...

ObjSendMail.Send

'Se destruye el objeto CDO

Set ObjSendMail = Nothing

%>


Con este codigo es posible enviar email en un servidor con IIS, puede copiar y pegar el texto de este codigo en su pagina asp.