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

Erro Ao Enviar E-mail


marcos_804

Pergunta

Por que dá erro quando envia o email?

AQUI VAI O CODIGO

<html>

<head>

<title>Enviar E-mail</title>

<style>

a{color:#235689;text-decoration:none}

a:hover{color:#ff0000;background-color:#ffff00;padding:2}

.1{font-family:verdana;font-size:11;color:#000000;border:1px solid #000000;width:180}

</style>

</head>

<body bgcolor="#e3e3e3" onselectstart="return false; " oncontextmenu="return false; ">

<%

smtp = request.queryString("smtp")

if IsEmpty(smtp) or smtp = "" then

%>

<form action="email_smtp.asp?smtp=envia" method="post">

<table width="500" align="center" border="0" style="font-weight: bold; font-family: verdana; font-size: 11; color: #000000" colspan="2" height="215">

 <tr>

   <td colspan="2" align="center" style="font-size: 15; background-color: #ffffff; border: 3px outset #ff0000" height="24">Enviar E-mail</td>

 </tr>

 <tr>

   <td width="100" valign="middle" align="right" height="25">Seu Nome:</td>

   <td width="400" valign="middle" height="25">

     <input type="text" name="SeuNome" value="Digite Seu Nome" onfocus="this.value='';" class="1">

   </td>

 </tr>

 <tr>

   <td width="100" valign="middle" align="right" height="25">Seu Email:</td>

   <td width="400" valign="middle" height="25">

     <input type="text" name="SeuEmail" value="voce@provedor.com.br" onfocus="this.value='';" class="1">

   </td>

 </tr>

 <tr>

   <td width="100" valign="middle" align="right" height="25">Assunto:</td>

   <td width="400" valign="middle" height="25">

     <input type="text" name="Assunto" value="" class="1">

   </td>

 </tr>

 <tr>

   <td width="100" valign="top" align="right" height="65">Mensagem:</td>

   <td width="400" valign="top" height="65">

     <textarea class="1" name="mensagem" rows="1" oncontextmenu="return false; " cols="20" style="width: 180; height: 63"></textarea>

   </td>

 </tr>

 <tr>

   <td colspan="2" align="center" height="27">

     <input type="submit" value="Enviar E-mail" style="background-color:#ff0000;font-family:verdana;font-size:11;font-weight:bold;border:1px solid #000000;color:#ffffff">

   </td>

 </tr>

</table>

</form>

<%

 End If

 if smtp = "envia" then

a = request.form("SeuNome")  

b = request.form("SeuEmail")

c = request.form("Assunto")  

mensagem = request.form("mensagem")

Set Mailer = CreateObject(CDONTS.NewMail)

Mailer.From = a

Mailer.To = "marcos_804@yahoo.com.br"

Mailer.BodyFormat = 1

Mailer.BodyFormat = cdoMailFormatText

Mailer.Subject = "c"

Mailer.Body = "mensagem"

Mailer.Send

Set Mailer = nothing

response.redirect "email_smtp.asp?smtp=enviadoComSucesso"

%>

<%

end if

 if smtp = "enviadoComSucesso" then

%>

<table width="500" align="center" border="0" style="font-weight: bold; font-family: verdana; font-size: 11; color: #000000" colspan="2">

 <tr>

   <td width="100" valign="top" align="right">Seu Nome:</td>

   <td width="400" valign="top" style="color:#ff0000"><%=a%></td>

 </tr>

 <tr>

   <td width="100" valign="top" align="right">Seu E-mail:</td>

   <td width="400" valign="top" style="color:#ff0000"><a href="mailto:<%=b%>"><%=b%></a></td>

 </tr>

 <tr>

   <td width="100" valign="top" align="right">Assunto:</td>

   <td width="400" valign="top" style="color:#ff0000"><%=c%></td>

 </tr>

 <tr>

   <td width="100" valign="top" align="right">Mensagem:</td>

   <td width="400" valign="top" style="color:#ff0000;text-align:justify;background-color:#f1f1f1;border:1px solid #000000;padding:2"><%=mensagem%></td>

 </tr>

 <tr>

   <td width="100" valign="top" align="right"></td>

   <td width="400" valign="top"></td>

 </tr>

</table>

<%end if%>

</body>

</html>

O ERRO QUE DÁ É NESTA LINHA

Editado: Use a tag QUOTE para usar COLORAÇÃO nos codigos!

Editado por dark0
Link para o comentário
Compartilhar em outros sites

5 respostass a esta questão

Posts Recomendados

  • 0

provavelmente o componente CDONTS não esta instalado..

Link para o comentário
Compartilhar em outros sites

  • 0
corrigindo a pergunta de cima, CDONTS

Amigo, porque não usou o botao EDITAR?

não precisa postar 2 vezes, se não for necessário.

Pois, postar somente por postar é considerado FLOOD.

É só um aviso, ok?

Como instalar o CDONTS?

Eu coloquei isso no Tópico de Tutoriais:

http://scriptbrasil.com.br/forum/index.php...ndpost&p=108877

Link para o comentário
Compartilhar em outros sites

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,3k
×
×
  • Criar Novo...