Error Asp y Codigo Asociado Gracias

12/10/2003 - 19:24 por CreativNet Pro Design | Informe spam
Este es el Error
Error de Microsoft VBScript en tiempo de ejecución error '800a0046'

Permiso denegado

/asp/clasificados/inc_detail.asp, line 36

-

Este el Codigo

-

<%
If Request.QueryString("action") = "sent" Then
Dim objCDO
Set objCDO = Server.CreateObject("CDONTS.NewMail")
objCDO.From = Request.Form("EMAIL")
objCDO.To = Request.Form("ad_email")
objCDO.cc = Request.Form("EMAIL")
objCDO.Subject = Request.Form("SUBJECT")
objCDO.Body = Request.Form("MESSAGE")
objCDO.Send() Linea 36 del error
Set objCDO = Nothing
End If
%>

gracias por la Help

Linux user: 58887 Red Hat - www.CreativNet.info

****************************** AVISO LEGAL
***********************************************
Este mensaje es solamente para la persona a la que va dirigido. Puede
contener
información confidencial o legalmente protegida. No hay renuncia a
la
confidencialidad o privilegio por cualquier transmisión mala/errónea. Si
usted
ha recibido este mensaje por error, le rogamos que borre de su sistema
inmediatamente el mensaje asi como todas sus copias, destruya todas las
copias
del mismo de su disco duro y notifique al remitente.
****************************** AVISO LEGAL
***********************************************
Anti-Spam@Anti-Spam.com

Preguntas similare

Leer las respuestas

#1 Sashka
13/10/2003 - 02:39 | Informe spam
Es clarísimo... no tienes permisos para enviar emails con cdo el
componente está instalado (si no te daría el error en en la línea de
createObject)

Sashka

"CreativNet Pro Design" escribió en el mensaje
news:bmc2j3$avm$
Este es el Error
Error de Microsoft VBScript en tiempo de ejecución error '800a0046'

Permiso denegado

/asp/clasificados/inc_detail.asp, line 36

-

Este el Codigo

-

<%
If Request.QueryString("action") = "sent" Then
Dim objCDO
Set objCDO = Server.CreateObject("CDONTS.NewMail")
objCDO.From = Request.Form("EMAIL")
objCDO.To = Request.Form("ad_email")
objCDO.cc = Request.Form("EMAIL")
objCDO.Subject = Request.Form("SUBJECT")
objCDO.Body = Request.Form("MESSAGE")
objCDO.Send() Linea 36 del


error
Set objCDO = Nothing
End If
%>

gracias por la Help

Linux user: 58887 Red Hat - www.CreativNet.info

****************************** AVISO LEGAL
***********************************************
Este mensaje es solamente para la persona a la que va dirigido. Puede
contener
información confidencial o legalmente protegida. No hay renuncia a
la
confidencialidad o privilegio por cualquier transmisión mala/errónea. Si
usted
ha recibido este mensaje por error, le rogamos que borre de su sistema
inmediatamente el mensaje asi como todas sus copias, destruya todas las
copias
del mismo de su disco duro y notifique al remitente.
****************************** AVISO LEGAL
***********************************************



Respuesta Responder a este mensaje
#2 CreativNet Pro Design
13/10/2003 - 12:02 | Informe spam
Que otra forma seria correcta para el mail
Aspmail Aspemail alguien me adacta el codigo gracias

Es clarísimo... no tienes permisos para enviar emails con cdo el
componente está instalado (si no te daría el error en en la línea de
createObject)

Sashka

"CreativNet Pro Design" escribió en el mensaje
news:bmc2j3$avm$
> Este es el Error
> Error de Microsoft VBScript en tiempo de ejecución error '800a0046'
>
> Permiso denegado
>
> /asp/clasificados/inc_detail.asp, line 36
>
> -
>
> Este el Codigo
>
> -
>
> <%
> If Request.QueryString("action") = "sent" Then
> Dim objCDO
> Set objCDO = Server.CreateObject("CDONTS.NewMail")
> objCDO.From = Request.Form("EMAIL")
> objCDO.To = Request.Form("ad_email")
> objCDO.cc = Request.Form("EMAIL")
> objCDO.Subject = Request.Form("SUBJECT")
> objCDO.Body = Request.Form("MESSAGE")
> objCDO.Send() Linea 36 del
error
> Set objCDO = Nothing
> End If
> %>
>
> gracias por la Help
>
> Linux user: 58887 Red Hat - www.CreativNet.info
>
> ****************************** AVISO LEGAL
> ***********************************************
> Este mensaje es solamente para la persona a la que va dirigido. Puede
> contener
> información confidencial o legalmente protegida. No hay renuncia


a
> la
> confidencialidad o privilegio por cualquier transmisión mala/errónea. Si
> usted
> ha recibido este mensaje por error, le rogamos que borre de su sistema
> inmediatamente el mensaje asi como todas sus copias, destruya todas las
> copias
> del mismo de su disco duro y notifique al remitente.
> ****************************** AVISO LEGAL
> ***********************************************
>
>
>


email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida