Error 800401f3
Estoy haciendo pruebas para enviar emails con ASP. El caso es que me da un error y no puedo corregirlo: Objeto Server error 'ASP 0177 : 800401f3' Código:
<%
Dim sDestinatario, sAsunto, sCuerpo
Dim oMail 'EL OBJETO CDO
sAsunto= "E-mail de prueba desde ASP"
'CREAMOS EL CUERPO DEL MENSAJE
sCuerpo= "Este es mi primer mensaje enviado desde ASP"
sDestinatario="[email protected]"
'ENVIAMOS EL EMAIL --> Aqui es donde da el error
set oMail=Server.CreateObject("CDONTS.NewMail")
'ESTABLECEMOS LAS PROPIEDADES DEL OBJETO
oMAil.From= "Yo [email protected]"
oMail.To = sDestinatario
oMail.Subject = sAsunto
oMail.Body = sCuerpo
'ENVIAMOS EL EMAIL
oMail.Send
set oMail = nothing
Response.Write ("Mensaje enviado.")
%>
Agradeceria que alguien me ayudara lo antes posible. Muchas gracias de antemano. | 