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

Envio de Email

thicomp

Perguntado por thicomp,

 Share

Pergunta

thicomp

thicomp

Postado
Postado

Ola pessoal, td bem??

Bem , estou com problemas no envio de email

Estou utilizando o CDonts, ele faz o envio e as mensagens ficam armazenadas na pasta Queue e, após um tempo, elas são transferidas para a pasta Badmail.

Clicando sobre o "Event Viewer" do servidor, ele me mostra a seguinte mensagem

"Message delivery to the remote domain 'hotmail.com' failed. The error message is 'An SMTP protocol error occurred.

'. The SMTP verb which caused the error is 'RCPT'. The response from the remote server is '550 5.7.1 Unable to relay for thiago@hotmail.com"

Alguém teria alguma sugestão de como fazer para resolver esse problema??

Abçs

Link para o comentário
Compartilhar em outros sites

10 respostass a esta questão

Posts Recomendados

  • 0
thicomp

thicomp

Postado
  • Autor
Postado

O HTML está assim?

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Contatos - Via CDONTS</title></head>

<body bgcolor="#FFFFFF">
<div align="center"> 
<form name="form1" action="Enviar_email.asp" method="post">
<p>Nome: <br>
<input type="text" name="txtnome">
</p>
<p>Email: <br>
<input type="text" name="txtemail">
</p>
<p>Coment&aacute;rio: <br>
<textarea name="txtcomentario" cols="50" rows="10"></textarea>
</p>
<p>
<input type="submit" name="Submit" value="Enviar">
</p>
</form>
</div>
</body>
</html>
Esse é o código do "envio" 
Option Explicit

Dim var_nome, var_mail, var_comentario, var_to, EnviarMail, MsgBody

var_nome = Request.Form("txtnome")
var_mail = Request.Form("txtemail")
var_comentario = Request.Form("txtcomentario")
var_to = "thiago@hotmail.com.br"

Set EnviarMail = Server.CreateObject("CDONTS.NewMail")
EnviarMail.To = var_to
EnviarMail.From = var_mail
EnviarMail.Subject = "Teste - Thiago"
MsgBody = "<html>" _
& "<head>" _
& "</head>" _
& "<body bgcolor=""#FFFFFF"">" _
& "<p align=""center""><font face=""Verdana, Arial, Helvetica, sans-serif"" size=""2"">Voc&ecirc; recebeu uma mensagem de <b>" & var_nome & "</b>, email <b>" & var_mail & "</b> e fez o seguinte coment&aacute;rio:</font></p><p align=""center""><font face=""Verdana, Arial, Helvetica, sans-serif"" size=""2""><b>" & var_comentario & "</b></font></p>" _
& "</body>" _
& "</html>"
EnviarMail.Body = MsgBody
EnviarMail.Importance = 1
EnviarMail.BodyFormat = 0
EnviarMail.MailFormat = 0
EnviarMail.Send

Set EnviarMail = Nothing

Response.write "E-mail Enviado."

Link para o comentário
Compartilhar em outros sites
  • 0
thicomp

thicomp

Postado
  • Autor
Postado
não precisa, é nativo do IIS, agora verifique se está corretamente ativo o envio de e-mail pelo IIS!

E aí cara, beleza??

Valeu de verdade pela ajuda que você está me dando...

Me diz uma coisa, como eu posso fazer essa verificação do cdo??

Abçs

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.

×
 Share
Ir para lista de Perguntas


  • Estatísticas dos Fóruns

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