Ir para conteúdo

POWERED BY:

Arquivado

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

Vainqueurbr

Erro ao enviar os dados para email

Recommended Posts

:blink: Olá estou com dúvidas em um script em asp que baixei, porque ao enviar o formulário é exibido a seguinte mensagem:

Ocorreu um erro.

O Erro é At least one Recipient, CC or BCC must be entered

 

o script é:

<%'Declarando variveisDim sNameTo, sNameFrom, sEmailFrom, sText, sEmailTo, sAssunto'Pegando os dados digitados nos campos e colocando em variaveissNameFrom = Request.Form("nome")sEmailFrom = Request.Form("email")sEmailTo = "email@yahoo.com.br"sNameTo = "Nome do Site"sText = Request.Form("mensagem")sAssunto = Request.Form("assunto")'Cria o objetoset mailer = server.createobject("SMTPsvg.Mailer")Mailer.FromName = sNameFromMailer.FromAddress = sEmailFrom'Host para envio de emailsMailer.RemoteHost = "smtp.mail.yahoo.com.br"Mailer.AddRecipient sEmailTo, sNameToMailer.Subject = sAssunto & " - E-mail"'Monta a texto para o enviostrMsgHeader = sNameFrom & "(" & sEmailFrom & ") " & " quem enviou! " & vbCrLf & vbCrLfstrMsgFooter = sTextMailer.BodyText = strMsgHeader & strMsgFooter' Se for enviado redirecionar para obrigado.aspif Mailer.SendMail thenResponse.Redirect "obrigado.asp"else' Se não for enviado mostra o erro que ocoreuResponse.Write ("Ocorreu um erro.<BR>")Response.Write ("O Erro é " & Mailer.Response)end if%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

está invertido nessa parte....troque de

Mailer.AddRecipient sEmailTo, sNameTo
para

Mailer.AddRecipient sNameTo,sEmailTo

Compartilhar este post


Link para o post
Compartilhar em outros sites

possivelmente seu servidor só permite enviar emails de contas armazenadas nele ou o yahoo não permite que seja acessado por smtp

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

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