e-mail - Erro 554 Error: no valid recipients

[little_ghost 0]

Fiz um código ontem e estava funcionando perfeitamente. Fui testá-lo hoje e deu este código de erro. Alguém pode me ajudar?

 

Desde já agradeço

 

<meta http-equiv="content-type" content="text/html; charset=iso-8859-1">

<%
Dim destinatario, assunto, corpo

destinatario = Request.Form("destinatario")
assunto =Request.Form("assunto")
corpo = Request.Form("comentarios")

Set Mailer = Server.CreateObject("SMTPsvg.Mailer") 
Mailer.CharSet = 2
Mailer.AddAttachment "C:\Documents and Settings\Professores\Meus documentos\aulas\java_script\ROLLOVER\BOTDICAS.jpg"
Mailer.FromAddress= "jonas@uol.com.br" 
Mailer.RemoteHost = "smtp.uol.com.br"
Mailer.AddRecipient "joao", destinatario 
Mailer.Subject = assunto 
Mailer.BodyText = corpo
If Mailer.SendMail Then 
Response.Write "Mensagem enviada com sucesso" 
Else 
Response.Write "Erro " & Mailer.Response 
End If
Set Mailer = Nothing
%>

[Ted k' 126]

e esse o caminho da imagem?

 

está testando no servidor ou local?

 

veja se a imagem ainda existe nesse diretório que você colocou ai, que ao meu ver está testando local

[little_ghost 0]

estou testando local mesmo e a imagem ainda existe...se tiver outra dica......

 

 

agradeço pela ajud que tem dado

[Ted k' 126]

se está local troque o smtp para o smtp local e veja esse componente se está corretamente instalado!

 

e retire isso:

If Mailer.SendMail Then 
Response.Write "Mensagem enviada com sucesso" 
Else 
Response.Write "Erro " & Mailer.Response 
End If

deixe só:

Response.Write "Mensagem enviada com sucesso"

pra gente ver o erro

[little_ghost 0]

Primeiro...obrigado por você está me ajudando.....desculpe a ignorância.....mas como faz para colocar o smtp local.? smtp.nomedamaquina.com.br

 

Lá em serviços...tenho o padrão e consigo criar outro dominio e colocar outro alias, mas não consigo torná-lo padrão....nas propriedades não dá para fazer nada

 

Agradeço quem puder ajudar

[little_ghost 0]

Eu tenho um roteador ligado junto ao modem...ito pode atrapalhar???

 

meu codigo

 

<%

Set Mailer = Server.CreateObject("SMTPsvg.Mailer")

 

Mailer.FromName = "lucas"

Mailer.FromAddress= "lucasc@yahoo.com.br"

Mailer.RemoteHost = "smtp.uol.com.br"

 

 

Mailer.AddRecipient "Gualter","gualtermatinaga@yahoo.com.br"

 

Mailer.Subject = "Seu pedido foi recebido"

Mailer.BodyText = "Prezado João, seu pedido será entregue em breve, obrigado pela visita."

 

Mailer.SendMail

Response.Write "Mensagem enviada com sucesso"

 

Set Mailer = Nothing

%>

 

 

 

Só com Response.Write "Mensagem enviada com sucesso" , até dá a mesnagem que foi enviada a mensagem, porém não chega

[kobutiii 0]

Tente inverter a linha de AddRecipient por esta em baixo...

Mailer.AddRecipient "gualtermatinaga@yahoo.com.br", "Gualter"