Ir para conteúdo
Fórum Script Brasil
  • 0

Sistema De Indicação Do Site


amarante

Pergunta

Quando tento indicar meu site a um amigo, ele dá o seguinte erro: Permission denied

Microsoft VBScript runtime error '800a0046'

Permission denied

/ocrack/indique.asp, line 15

Veja o código abaixo:

<%

str_nome = trim(request.form("nome"))

str_remetente = trim(request.form("remetente"))

str_destinatario = trim(request.form("destinatario"))

str_assunto = "www.scriptbrasil.com.br"

endereco = request.form("pagina")

str_mensagem = "Acessei este site e achei interessante : < a href = " & endereco & ">" & endereco & "</a>"

set mensagem = server.createobject("CDONTS.NewMail")

mensagem.from = str_nome & "(" & str_remetente & ")"

mensagem.to = str_destinatario

mensagem.Subject = str_assunto

mensagem.bodyformat = 0

mensagem.mailformat = 0

mensagem.Body = str_mensagem

mensagem.Send

response.write "<b> Dados da mensagem </b>"

response.write "<br><i> Remetente: </i> " & str_nome & " - " & str_remetente

response.write " <br><i> Destinatário: </i> " & str_destinatario

response.write "<br><i> Assunto: </i> " & str_assunto

response.write "<br><i> Mensagem: </i> " & str_mensagem

response.write "<br><h2> Mensagem enviada com sucesso</h2>"

response.write "<br><strong><a href=" & endereco & "> Clique aqui para voltar! </a></strong>"

%>

POR FAVOR, Me ajudem... espero respostas :(

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.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,5k
×
×
  • Criar Novo...