[AngelicaMadeira]

Olá,
Estou estreando na profissão de web designer. Fiz meu primeiro site, mas estou tendo o seguinte problema:

Fiz o formulario de cadastro de clientes em HTML e o "enviar" programado em ASP (não sei programar essa linguagem).

Quando tento enviar o formulario, dá um erro HTTP 500

Estou postando os códigos para faciliatar a ajuda. O que posso modificar para o e-mail seguir corretamente?
Obrigada
Angelica Madeira

CÓDIGO

<%
  Dim Mensagem
  Dim MeuEmail
  
  Set MeuEmail = Server.CreateObject("CDONTS.NewMail")
  Mensagem="Nome="& Request.form("nome")&vbNewLine
  Mensagem= Mensagem & "Endereço =" & Request.form("endereco") & vbNewLine
  Mensagem= Mensagem & "Bairro =" & Request.form("bairro") & vbNewLine
  Mensagem= Mensagem & "Cep =" & Request.form("cep") & vbNewLine
  Mensagem= Mensagem & "Cidade =" & Request.form("cidade") & vbNewLine
  Mensagem= Mensagem & "Estado =" & Request.form("estado") & vbNewLine
  Mensagem= Mensagem & "Telefone =" & Request.form("telefone") & vbNewLine
  Mensagem= Mensagem & "Email =" & Request.form("email") & vbNewLine
  Mensagem= Mensagem & "ComprarCD =" & Request.form("comprarcd") & vbNewLine
  Mensagem= Mensagem & "Consulta o Terapeuta =" & Request.form("resposta") & vbNewLine
  Mensagem= Mensagem & "Comentario =" & Request.form("email") & vbNewLine
  MeuEmail.Subject = "Assunto"
  MeuEmail.From = "venda@sonergia.com.br"
  MeuEmail.To = "venda@sonergia.com.br"
  MeuEmail.Body = Mensagem
  MeuEmail.Send
  Set MeuEmail=Nothing
  %>

This post has been edited by xanburzum: 21 December 2009 - 09:21 AM
Reason for edit: Adicionado BBcode

[xanburzum]

desabilite a opcao de exibir mensagens de erros HTTP amigaveis e poste o numero do erro e linha
e vc pode ao inves de usar o CDONTS use o CDOSYS, k é a atualizacao do componente