Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

little_ghost

e-mail - erro momentaneo

Por , em ASP Clássico

Recommended Posts

little_ghost    0

little_ghost
Postado

Éstou sofrendo com o envio de e-mail ha mais ou menos 1 semana, porém não acredito que meu codigo esteja errado, até mesmo porque vcs do fórum foram me ajudando e consegui consertar e chegou a dar certo.

 

Acontece que testo o arquivo em um dia, dá tudo certo, no outro vou testa da erro 554 no valid recipient que provalvelmente seria o destinatário. Troco e coloco outros destinatários e mesmo assim não vai. Aí deixo quieto e testo mais tarde e funciona. Tem alguima explicação para isto?

 

O e-mail do remetente fica temporarimanete bloqueado?..... Como funciona na verdade, pois do jeito que enxergo o codigo (pode ser totalmente errado), se colocar um e-mail de uma pessoa que conheço no remetente, consigo enviar e-mail em nome dela, sem que haja prévia autenticação?

 

Por favor me ajudem mais uma vez. Meu codigo:

 

formulário:

 

<html>
<head><title>Formulario de E-mail</title></head>
<body>

<form action="resultado.asp" method="post" name="form1">

<pre>
Nome		
<input type="text" name="nome">
Para		<input type="text" name="destinatario">
Assunto		<input type="text" name="assunto">
Mensagem	<textarea cols="40" row="6"name="mensagem"></textarea>
Anexo		<input type="file" name="anexo" size=90>

<input type="submit" value="Enviar">
</form>

 

minha página resultado:

 

<%
Dim destinatario, assunto, corpo

destinatario= Request.Form("destinatario")
assunto= Request.Form("assunto")
corpo= Request.Form("mensagem")
arquivo = Request.Form("anexo")

response.write destinatario
response.write "<br>" & assunto
response.write "<br>" & corpo
response.write "<br>" & arquivo

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

Mailer.FromName = "Bruno"
Mailer.FromAddress= "brunocobello@uol.com.br" 
Mailer.RemoteHost = "smtp.uol.com.br"
Mailer.AddRecipient "",destinatario

Mailer.Subject = assunto
Mailer.BodyText = corpo 
Mailer.AttachFile arquivo

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

Set Mailer = Nothing 
%>

 

com o response.write que dei chamando as varíaveis nome, assunto, destinatario, todas são recuperadas normalmente na segunda página.

 

Quem tiver algum luz por favor ajude

 

Obrigado

Compartilhar este post

Link para o post
Compartilhar em outros sites

Salgado    4

Salgado
Postado

Possivelmente o servidor está bloqueando o envio dos e-mails.

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito