Yo utilizo este codigo, aunque si tuve que instalar una dll, espero te sirva
Dim objetoMail
Set objetoMail = Server.CreateObject ( "CDONTS.NewMail" )
' Configuramos el email
objetoMail.From = "
[email protected]"
objetoMail.To = "
[email protected]"
objetoMail.Subject = "Hola"
objetoMail.Body = "Esta es una prueba"
' Enviamos el email
objetoMail.Send
response.Write("enviado")
' Destruimos el objeto email
Set objetoMail = Nothing
Esto lo encontre en un foro, la verdad no recuerdo cual, pero venian estas instrucciones, las segui y funciono:
"Por alguna razon que desconozco la gente de Miscrosoft decidio no Incluir la libreria CDonts en el IIS 5.1 que viene con el Windows XP Professional. Yo tuve 2 dias luchando con este problemilla y di con la solucion, ahora quiero comentarsela para que se eviten esto...
La manera de trabajar con CDonts con el IIS 5.1 que trae el XP, es...
1.- Buscas de Otra makina el cdonts.dll o la bajas de
http://www.geocities.com/g_susdaniel/cdonts.zip
2.- La extraes y/o colocas en el directorio C:\WINDOWS\system32
3.- La Registras, arrastrando (Drag & drop) el archivo cdonts.dll hasta colocarlo sobre el archivo: regsvr32.exe y te saldra un Mensaje diciendo que fue registrada la libreria con exito...
Te vas por "Inicio" -> "Ejecutar" y tecleas regsvr32 cdonts.dll | igualmente se registra.
"