meu servidor retorna a seguinte mensagem de erro "acess denied" alguém pode me ajudar
<%
Option Explicit
dim nome
dim email
dim titulo
dim comentario
dim envia
dim corpo
dim destinario
dim ip
dim data
destinario = "thiagovalim@hotmail.com"
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
%>
Pergunta
Guest Bebeto
meu servidor retorna a seguinte mensagem de erro "acess denied" alguém pode me ajudar
Link para o comentário
Compartilhar em outros sites
5 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.