Socorro!! no envia mail con cdo

[Jat_ibo]

Hola amig@s, aun soy un principiante en esto...
Estoy intentando mandar un mail con asp, pero no hay forma... Introduzco el codigo siguiente y aunque me carga la paguina no hay forma de que lo mande...

dim dir
set dir = createobject("CDO.Addressee")

dir.emailaddress = "[email protected]"

dim mensaje
set mensaje = createobject("CDO.Message")

with mensaje
.To = "[email protected]"
.From = "[email protected]"
.Subject = "Probando envio de mensajes"
.TextBody = "Este es un mensaje enviado desde una pagina asp"
.Send
end with

He leido que este es el codigo correcto ,pero a mi no me funciona , alguien sabe porque??

A ver si me podeis decir algo....

Gracias,
Un saludo

[trasgukabi]

prueba a poner ésto antes del with

Código:

mensaje.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
 mensaje.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "servidor smtp"
 mensaje.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
 mensaje.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
 mensaje.Configuration.Fields.Update

cambia el nombre del servidor smtp al tuyo

[razcoll]

Estas seguro que el componente de envio de mails es el CDONts???.. porqeu si no es asi nunca te va a enviar los mails

[trasgukabi]

set mensaje = createobject("CDO.Message")<
no es cdonts, es cdosys

[Jat_ibo]

Ahora no me da ningun tipo de error pero no hace nada. He visto por ahi que es posible que lo que falle sea la configuración del servidor...¿sabeis si esto es cierto?.

De todos modos mi intención es trabajar con asp contra un servidor Exchange 2003, para poder introducir citas en las carpetas publicas... lo del mail, es solo por cojerle el truco a ASP.

¿Me podeis ayudar algo en este tema? Aun estoy bastante verde ....

Agradezco cualquier información.....
Salu2

[trasgukabi]

mira el enlace que hay en mi firma....

[Jat_ibo]

trasgukabi eres un fenomeno!!
Esto ya me funciona, parece que no haga nada pero en un rato lo manda Muchas gracias.
Ahora.. una cosa mas... me podeis ayudar en el otro tema... en lo de las citas frente al servidor Exchange 2003......?

Salu2