Error ayuda por favor!!!

[kokain]

De antemano un agradecimiento a quien me ayude, acabo de crear un formulario ASP, el HTML contiene el formulario, y un archivo Asp la progra.

El problema es q me da este error :

Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

/contact.asp, line 42

800401f3

SI me dirijo a la linea 42 esto es lo q esta escrito:

' send email
Dim mail
42 . Set mail = Server.CreateObject("CDONTS.NewMail")
mail.To = EmailTo
mail.From = EmailFrom
mail.Subject = Subject
mail.Body = Body
mail.Send

Ayudenme porfavor!!!

[Shiryu_Libra]

justamente acababa de terminar de leer el post de CDonts en XP, donde acaban de revivir ese mismo problema que tienes.

espero la lectura te sirva, todo indica que no tienes instalado el componente, de cualquier manera, pudieras utilizar este otro procedimiento

<% Option Explicit
Dim ObjetoMail
Set ObjetoMail=CreateObject("CDO.Message")
ObjetoMail.To = "[email protected]" <<<--------------A quien
ObjetoMail.From = "[email protected]" <<<<-----------De quien
ObjetoMail.Subject = "prueba de envio por asp" <<<------tu tema
ObjetoMail.HTMLBody = cuerpo <<<--------------------contenido
ObjetoMail.Send
Set ObjetoMail=Nothing
%>

suerte

[kokain]

gracias por la ayuda lo probare.Luego te cuento si me funciono grcias.