Erro Do Servdor

[Guest Guest]

eu criei um formulario para o envio de email em asp atraves de cdonts e ele retorna o seguinte erro "acess denied"

<%

Option Explicit

dim nome

dim email

dim titulo

dim comentario

dim envia

dim corpo

dim destinario

dim ip

dim data

destinario = "meu email"

ip = request.servervariables("remote_addr")

data = date

nome=request.form("nome")

email=request.form("email")

titulo=request.form("titulo")

comentario=request.form("comentario")

corpo= "nome: " & nome & "<br>"

corpo= corpo & "email: " & email & "<br>"

corpo= corpo & "titulo: " & titulo & "<br>"

corpo= corpo & "comentário: " & comentario & "<br>"

corpo= corpo & "IP: " & ip & "<br>"

corpo= corpo & "Data: " & data & "<br>"

set envia = server.createobject("cdonts.newmail")

envia.from = email

envia.to = destinario

envia.Subject = titulo

envia.importance = 1

envia.MailFormat = 0

envia.BodyFormat = 0

envia.body = corpo

on error resume next

envia.send

if err <> 0 then

Response.Write ("Foi encontrado o seguinte erro: " & Err.Description)

End If

set envia = nothing

%>

[jissa]

Urso.. apaga este post que já tem outro igual