problemas com aspemail (iniciante)

Biano · Setembro 1, 2009

Ola pessoal, sou iniciante em programaçao asp na verdade sei muito pouco mesmo.

Mas com esforço chego la, gostaria de saber o que tem de errado com esse script:

<%
 de_nome = Request.form("nome")
 de_email = Request.form("email")
 para_nome = Request.form("nome_amigo")
 para_email = Request.form("email_amigo")
strHTML = strHTML & "<html><head><title>Visite a Teste.com.br</title></head>" &chr(13) & chr(10)
strHTML = strHTML & "<style><!-- a {text-decoration:none} a:hover{text-decoration:underline; color:black} --></style>" & chr(13) & chr(10)
strHTML = strHTML & "<body bgcolor=""#FFFFFF"" text=""#0066CC""link=""#0066CC"" vlink=""#0066CC"" alink=""#0066CC"">" & chr(13) & chr(10)
strHTML = strHTML & "<table width=""90%"" border=""0"" cellspacing=""2""cellpadding=""0"" align=""center"">" & chr(13) & chr(10)
strHTML = strHTML & "<tr><td><img src=""http://www.teste.com.br/imagens/teste.gif"" width=""56""height=""51""></td></tr>" & chr(13) & chr(10)
strHTML = strHTML & "</table>" & chr(13) & chr(10) 
strHTML = strHTML & "<p><br></p>" & chr(13) & chr(10)
strHTML = strHTML & "<table width=""90%"" border=""0"" cellspacing=""2""cellpadding=""0"" align=""center"">" & chr(13) & chr(10)
strHTML = strHTML & "<tr><td height=""132""><p align=""center""><font size=""2"" face=""Arial, Helvetica, sans-serif""color=""#0066CC""><b>Coloque o título da mensagem_ aqui</b></font></p>" &chr(13) & chr(10)
strHTML = strHTML & "<p align=""justify""><font size=""2"" face=""Arial,Helvetica, sans-serif"" color=""#0066CC"">Coloque o conteúdo da mensagem aqui."_
 & chr(13) & chr(10)
strHTML = strHTML & "<br><br><a href=""http://www.teste.com.br""target=""_blank"">http://www.teste.com.br</a></font></p></td></tr>" &chr(13) & chr(10)
strHTML = strHTML & "</table>" & chr(13) & chr(10)
strHTML = strHTML & "</body></html>" & chr(13) & chr(10) 
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "smtp.cmax.com.br" 'especificar um servidor de smtp válido
Mail.From = "contato@cmax.com.br" 'de_email 'Vindo do form - email do remetente
Mail.FromName = de_nome 'Vindo do form - nome do remetente
Mail.AddAddress para_email, para_nome 'Destinatario - Nome é opcional
Mail.AddReplyTo de_email 'Email para resposta
Mail.Subject = "Visite a Teste.com.br"
Mail.IsHTML = True
Mail.Body = strHTML
On Error Resume Next
Mail.Send
If Err <> 0 Then
   Response.Write "Erro encontrado: " & Err.Description
else%>
<style>
<!--
a {text-decoration:none}
a:hover {text-decoration:underline; color:black}
-->
</style>
<body bgcolor="#FFFFFF" text="#0066CC" link="#0066CC" vlink="#0066CC"
alink="#0066CC">
<br>
<br>
<br>
<br>
<br>
<br>
<table width="80%" border="0" cellspacing="2" cellpadding="0"
align="center">
  <tr>
     <td>
       <div align="center"> <font face="Arial, Helvetica, sans-serif" size="1">
         <font color="#0066CC"><font color="#0066CC" size="2"><b><%= de_nome%>, sua mensagem foi enviada com sucesso!<br>
        <br>
        Obrigado pela indicação. <br>
        <br>
        <br>
        <a href="home.htm"><font size="1">Home</font></a></b></font></font></font>
       </div>
     </td>
     </tr>
   </table>
<%end if%>

Segue o link pra ver o formulario funcionando:

http://www.cmax.com.br/email/aspemail.asp

E outra coisa, importante como faço a leitura de documentaçao de um componente? acessei o site mas nao encontrei esta informaçao.

Fico muito grato.

Obrigado desde ja.

Dee · Setembro 1, 2009

Mas está dando algum erro ? Se sim, posta ae!

Biano · Setembro 1, 2009

Mas está dando algum erro ? Se sim, posta ae!

Ele me retorna essa mensagem!

Erro encontrado: 550 5.7.1 ... we do not relay

Biano · Setembro 1, 2009

Ola pessoal, sou iniciante em programaçao asp na verdade sei muito pouco mesmo.

Mas com esforço chego la, gostaria de saber o que tem de errado com esse script:

<%
 de_nome = Request.form("nome")
 de_email = Request.form("email")
 para_nome = Request.form("nome_amigo")
 para_email = Request.form("email_amigo")
strHTML = strHTML & "<html><head><title>Visite a Teste.com.br</title></head>" &chr(13) & chr(10)
strHTML = strHTML & "<style><!-- a {text-decoration:none} a:hover{text-decoration:underline; color:black} --></style>" & chr(13) & chr(10)
strHTML = strHTML & "<body bgcolor=""#FFFFFF"" text=""#0066CC""link=""#0066CC"" vlink=""#0066CC"" alink=""#0066CC"">" & chr(13) & chr(10)
strHTML = strHTML & "<table width=""90%"" border=""0"" cellspacing=""2""cellpadding=""0"" align=""center"">" & chr(13) & chr(10)
strHTML = strHTML & "<tr><td><img src=""http://www.teste.com.br/imagens/teste.gif"" width=""56""height=""51""></td></tr>" & chr(13) & chr(10)
strHTML = strHTML & "</table>" & chr(13) & chr(10) 
strHTML = strHTML & "<p><br></p>" & chr(13) & chr(10)
strHTML = strHTML & "<table width=""90%"" border=""0"" cellspacing=""2""cellpadding=""0"" align=""center"">" & chr(13) & chr(10)
strHTML = strHTML & "<tr><td height=""132""><p align=""center""><font size=""2"" face=""Arial, Helvetica, sans-serif""color=""#0066CC""><b>Coloque o título da mensagem_ aqui</b></font></p>" &chr(13) & chr(10)
strHTML = strHTML & "<p align=""justify""><font size=""2"" face=""Arial,Helvetica, sans-serif"" color=""#0066CC"">Coloque o conteúdo da mensagem aqui."_
 & chr(13) & chr(10)
strHTML = strHTML & "<br><br><a href=""http://www.teste.com.br""target=""_blank"">http://www.teste.com.br</a></font></p></td></tr>" &chr(13) & chr(10)
strHTML = strHTML & "</table>" & chr(13) & chr(10)
strHTML = strHTML & "</body></html>" & chr(13) & chr(10) 
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "smtp.cmax.com.br" 'especificar um servidor de smtp válido
Mail.From = "contato@cmax.com.br" 'de_email 'Vindo do form - email do remetente
Mail.FromName = de_nome 'Vindo do form - nome do remetente
Mail.AddAddress para_email, para_nome 'Destinatario - Nome é opcional
Mail.AddReplyTo de_email 'Email para resposta
Mail.Subject = "Visite a Teste.com.br"
Mail.IsHTML = True
Mail.Body = strHTML
On Error Resume Next
Mail.Send
If Err <> 0 Then
   Response.Write "Erro encontrado: " & Err.Description
else%>
<style>
<!--
a {text-decoration:none}
a:hover {text-decoration:underline; color:black}
-->
</style>
<body bgcolor="#FFFFFF" text="#0066CC" link="#0066CC" vlink="#0066CC"
alink="#0066CC">
<br>
<br>
<br>
<br>
<br>
<br>
<table width="80%" border="0" cellspacing="2" cellpadding="0"
align="center">
  <tr>
     <td>
       <div align="center"> <font face="Arial, Helvetica, sans-serif" size="1">
         <font color="#0066CC"><font color="#0066CC" size="2"><b><%= de_nome%>, sua mensagem foi enviada com sucesso!<br>
        <br>
        Obrigado pela indicação. <br>
        <br>
        <br>
        <a href="home.htm"><font size="1">Home</font></a></b></font></font></font>
       </div>
     </td>
     </tr>
   </table>
<%end if%>

Segue o link pra ver o formulario funcionando:

http://www.cmax.com.br/email/aspemail.asp

E outra coisa, importante como faço a leitura de documentaçao de um componente? acessei o site mas nao encontrei esta informaçao.

Fico muito grato.

Obrigado desde ja.

O que eu fiz de errado pro meu post ser removido?

Biano · Setembro 1, 2009

Ola pessoal, sou iniciante em programaçao asp na verdade sei muito pouco mesmo.

Mas com esforço chego la, gostaria de saber o que tem de errado com esse script:

<%
 de_nome = Request.form("nome")
 de_email = Request.form("email")
 para_nome = Request.form("nome_amigo")
 para_email = Request.form("email_amigo")
strHTML = strHTML & "<html><head><title>Visite a Teste.com.br</title></head>" &chr(13) & chr(10)
strHTML = strHTML & "<style><!-- a {text-decoration:none} a:hover{text-decoration:underline; color:black} --></style>" & chr(13) & chr(10)
strHTML = strHTML & "<body bgcolor=""#FFFFFF"" text=""#0066CC""link=""#0066CC"" vlink=""#0066CC"" alink=""#0066CC"">" & chr(13) & chr(10)
strHTML = strHTML & "<table width=""90%"" border=""0"" cellspacing=""2""cellpadding=""0"" align=""center"">" & chr(13) & chr(10)
strHTML = strHTML & "<tr><td><img src=""http://www.teste.com.br/imagens/teste.gif"" width=""56""height=""51""></td></tr>" & chr(13) & chr(10)
strHTML = strHTML & "</table>" & chr(13) & chr(10) 
strHTML = strHTML & "<p><br></p>" & chr(13) & chr(10)
strHTML = strHTML & "<table width=""90%"" border=""0"" cellspacing=""2""cellpadding=""0"" align=""center"">" & chr(13) & chr(10)
strHTML = strHTML & "<tr><td height=""132""><p align=""center""><font size=""2"" face=""Arial, Helvetica, sans-serif""color=""#0066CC""><b>Coloque o título da mensagem_ aqui</b></font></p>" &chr(13) & chr(10)
strHTML = strHTML & "<p align=""justify""><font size=""2"" face=""Arial,Helvetica, sans-serif"" color=""#0066CC"">Coloque o conteúdo da mensagem aqui."_
 & chr(13) & chr(10)
strHTML = strHTML & "<br><br><a href=""http://www.teste.com.br""target=""_blank"">http://www.teste.com.br</a></font></p></td></tr>" &chr(13) & chr(10)
strHTML = strHTML & "</table>" & chr(13) & chr(10)
strHTML = strHTML & "</body></html>" & chr(13) & chr(10) 
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "smtp.cmax.com.br" 'especificar um servidor de smtp válido
Mail.From = "contato@cmax.com.br" 'de_email 'Vindo do form - email do remetente
Mail.FromName = de_nome 'Vindo do form - nome do remetente
Mail.AddAddress para_email, para_nome 'Destinatario - Nome é opcional
Mail.AddReplyTo de_email 'Email para resposta
Mail.Subject = "Visite a Teste.com.br"
Mail.IsHTML = True
Mail.Body = strHTML
On Error Resume Next
Mail.Send
If Err <> 0 Then
   Response.Write "Erro encontrado: " & Err.Description
else%>
<style>
<!--
a {text-decoration:none}
a:hover {text-decoration:underline; color:black}
-->
</style>
<body bgcolor="#FFFFFF" text="#0066CC" link="#0066CC" vlink="#0066CC"
alink="#0066CC">
<br>
<br>
<br>
<br>
<br>
<br>
<table width="80%" border="0" cellspacing="2" cellpadding="0"
align="center">
  <tr>
     <td>
       <div align="center"> <font face="Arial, Helvetica, sans-serif" size="1">
         <font color="#0066CC"><font color="#0066CC" size="2"><b><%= de_nome%>, sua mensagem foi enviada com sucesso!<br>
        <br>
        Obrigado pela indicação. <br>
        <br>
        <br>
        <a href="home.htm"><font size="1">Home</font></a></b></font></font></font>
       </div>
     </td>
     </tr>
   </table>
<%end if%>

Segue o link pra ver o formulario funcionando:

http://www.cmax.com.br/email/aspemail.asp

E outra coisa, importante como faço a leitura de documentaçao de um componente? acessei o site mas nao encontrei esta informaçao.

Fico muito grato.

Obrigado desde ja.

O que eu fiz de errado pro meu post ser removido?

Patrique · Setembro 1, 2009

Velho, ele não foi removivo ele foi apenas editado ao primeiro, o hargon uniu os posts.

Leia as regras que verá que não é permitido a postagem de posts em seguida.

http://forum.imasters.com.br/index.php?app=core&module=help

Biano · Setembro 1, 2009

Velho, ele não foi removivo ele foi apenas editado ao primeiro, o hargon uniu os posts.

Leia as regras que verá que não é permitido a postagem de posts em seguida.

http://forum.imasters.com.br/index.php?app=core&module=help

Ok perdao pelo equivoco, eu usei a palavra "DUVIDA" na criaçao do post e por isso meu post foi reeditado.

Agora compreendi.

Deveria ter ligo as regras antes de formular minha duvida.

xanburzum · Setembro 2, 2009

veja se seu componente está instalado corretamente

e tente usar um nome de usuário e senha no componente de e-mail. Tem que ser um nome de usuário e passsword em que o servidor SMTP que está usando. Os parâmetros são username e password.

o smtp é válido

Biano · Setembro 2, 2009

veja se seu componente está instalado corretamente

e tente usar um nome de usuário e senha no componente de e-mail. Tem que ser um nome de usuário e passsword em que o servidor SMTP que está usando. Os parâmetros são username e password.

o smtp é válido

Obrigado parceiro, seguindo sua dica resolvi meu problema.

Vou postar o script da forma correta pra que outras pessoas nao passem pelo perreng que passei!!

<%
 de_nome = Request.form("nome")
 de_email = Request.form("email")
 para_nome = Request.form("nome_amigo")
 para_email = Request.form("email_amigo")
strHTML = strHTML & "<html><head><title>Visite a Teste.com.br</title></head>" &chr(13) & chr(10)
strHTML = strHTML & "<style><!-- a {text-decoration:none} a:hover{text-decoration:underline; color:black} --></style>" & chr(13) & chr(10)
strHTML = strHTML & "<body bgcolor=""#FFFFFF"" text=""#0066CC""link=""#0066CC"" vlink=""#0066CC"" alink=""#0066CC"">" & chr(13) & chr(10)
strHTML = strHTML & "<table width=""90%"" border=""0"" cellspacing=""2""cellpadding=""0"" align=""center"">" & chr(13) & chr(10)
strHTML = strHTML & "<tr><td><img src=""http://www.teste.com.br/imagens/teste.gif"" width=""56""height=""51""></td></tr>" & chr(13) & chr(10)
strHTML = strHTML & "</table>" & chr(13) & chr(10) 
strHTML = strHTML & "<p><br></p>" & chr(13) & chr(10)
strHTML = strHTML & "<table width=""90%"" border=""0"" cellspacing=""2""cellpadding=""0"" align=""center"">" & chr(13) & chr(10)
strHTML = strHTML & "<tr><td height=""132""><p align=""center""><font size=""2"" face=""Arial, Helvetica, sans-serif""color=""#0066CC""><b>Coloque o título da mensagem_ aqui</b></font></p>" &chr(13) & chr(10)
strHTML = strHTML & "<p align=""justify""><font size=""2"" face=""Arial,Helvetica, sans-serif"" color=""#0066CC"">Coloque o conteúdo da mensagem aqui."_
 & chr(13) & chr(10)
strHTML = strHTML & "<br><br><a href=""http://www.teste.com.br""target=""_blank"">http://www.teste.com.br</a></font></p></td></tr>" &chr(13) & chr(10)
strHTML = strHTML & "</table>" & chr(13) & chr(10)
strHTML = strHTML & "</body></html>" & chr(13) & chr(10) 
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "smtp.seusite.com.br" 'especificar um servidor de smtp válido
Mail.From = "contato@seusite.com.br" 'de_email 'Vindo do form - email do remetente
Mail.FromName = de_nome 'Vindo do form - nome do remetente
Mail.AddAddress para_email, para_nome 'Destinatario - Nome é opcional
Mail.AddReplyTo de_email 'Email para resposta
Mail.Subject = "Visite a Teste.com.br"
Mail.IsHTML = True
'informe seu usuario
Mail.Username = "contato@seusite.com.br"
'informe a senha do email
Mail.Password = "senha do email"
Mail.Body = strHTML
On Error Resume Next
Mail.Send
If Err <> 0 Then
   Response.Write "Erro encontrado: " & Err.Description
else%>
<style>
<!--
a {text-decoration:none}
a:hover {text-decoration:underline; color:black}
-->
</style>
<body bgcolor="#FFFFFF" text="#0066CC" link="#0066CC" vlink="#0066CC"
alink="#0066CC">
<br>
<br>
<br>
<br>
<br>
<br>
<table width="80%" border="0" cellspacing="2" cellpadding="0"
align="center">
  <tr>
     <td>
       <div align="center"> <font face="Arial, Helvetica, sans-serif" size="1">
         <font color="#0066CC"><font color="#0066CC" size="2"><b><%= de_nome%>, sua mensagem foi enviada com sucesso!<br>
        <br>
        Obrigado pela indicação. <br>
        <br>
        <br>
        <a href="home.htm"><font size="1">Home</font></a></b></font></font></font>
       </div>
     </td>
     </tr>
   </table>
<%end if%>

xanburzum · Setembro 3, 2009

maravilha ASPmano, kker coisa tamu ae...

Arquivado

problemas com aspemail (iniciante)

Recommended Posts

Biano 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Dee 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Biano 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Biano 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Biano 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Patrique 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Biano 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

Biano 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

PHP+Codeigniter - Dúvida em Relação a Teclas

Conexão mysql com outro domínio

[Resolvido] JavaScript - Exibir logo dentro da Tabela html

Fóruns

Tempo Real

Informação importante