Foros del Web » Programando para Internet » ASP Clásico »

Internet Information Services 7.0 - CDONTS - CDOSYS

Estas en el tema de Internet Information Services 7.0 - CDONTS - CDOSYS en el foro de ASP Clásico en Foros del Web. Hola! Quería preguntar haber si sabiais algo acerca de como mandar un mail con asp en el Internet Information Services 7.0, en Windows Vista. He ...
  #1 (permalink)  
Antiguo 26/04/2007, 10:37
 
Fecha de Ingreso: febrero-2006
Mensajes: 20
Antigüedad: 19 años, 2 meses
Puntos: 0
Internet Information Services 7.0 - CDONTS - CDOSYS

Hola!
Quería preguntar haber si sabiais algo acerca de como mandar un mail con asp en el Internet Information Services 7.0, en Windows Vista.
He estado probando con CDONTS y CDOSYS y por mucho que registro DLL´s y pruebo y pruebo me da siempre error 500 y pone esto:

Este error (HTTP 500 Error interno del servidor) significa que el sitio web al que está conectado tiene un problema con el servidor que impide que se muestre la página web.

Este es el codigo que tengo en ASP:

set mail=Server.CreateObject("CDONTS.NewMail")
mail.From=mio@mio.com
mail.To=[email protected]
mail.Subject="Acceso WEB"
mail.Body="Hola" 'Cuerpo
mail.BodyFormat = 0
mail.MailFormat = 1
mail.Importance = 1
mail.Send
set mail=nothing

En fin que si alguien puede echarme un cable lo agradeceria muchooo!

Un saludo
  #2 (permalink)  
Antiguo 26/04/2007, 13:56
Avatar de Shiryu_Libra
Colaborador
 
Fecha de Ingreso: febrero-2007
Ubicación: Cantando "Screenager" en "Kirafa Kaput"
Mensajes: 3.614
Antigüedad: 18 años, 1 mes
Puntos: 88
Re: Internet Information Services 7.0 - CDONTS - CDOSYS

intenta utilizando este codigo.... pudiera funcionarte

Cita:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%'response.Buffer=TRUE%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Prueba de Envios de Mails</title>
</head>
<body>
response.Write "preparando para enviar...<br/>"
dim obj
Set obj=Server.CreateObject("CDO.Message")
obj.From="TU CORREO"
obj.To="A QUIEN SE LO ENVIARAS"
obj.Subject="Mas pruebas de correos mediante CDO del IIS"
obj.HtmlBody="prueba de envio"
obj.Send
set obj=nothing
response.Write "enviado..."
%>
</body>
</html>
<%'response.End()%>
suerte
__________________
"Eres parte del problema, parte de la solucion o parte del paisaje"
Un Saludo desde Desierto de Altar, Sonora, MX.
Shiryu_libra
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 14:05.