Ir para conteúdo

POWERED BY:

Arquivado

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

bossal_jr

Preciso de

Recommended Posts

Sou iniciante em asp e peguei o código de faleconsoco, só que quando fui utiliza-lo ocorreu o seguinte erro Ocorreu um erro.O Erro é At least one Recipient, CC or BCC must be enteredAlguém pode me ajudar?

Compartilhar este post


Link para o post
Compartilhar em outros sites

é esse o código:<%'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 = "seuemail@imasters.com.br"sNameTo = "Nome do Site"sText = Request.Form("mensagem")sAssunto = Request.Form("assunto")'Cria o objeto set mailer = server.createobject("SMTPsvg.Mailer") Mailer.FromName = sNameFrom Mailer.FromAddress = sEmailFrom'Host para envio de emails Mailer.RemoteHost = "smtp2.locaweb.com.br" Mailer.AddRecipient sEmailTo, sNameTo Mailer.Subject = sAssunto & " - E-mail"'Monta a texto para o envio strMsgHeader = sNameFrom & "(" & sEmailFrom & ") " & " quem enviou! " & vbCrLf & vbCrLf strMsgFooter = sText Mailer.BodyText = strMsgHeader & strMsgFooter' Se for enviado redirecionar para obrigado.asp if Mailer.SendMail then Response.Redirect "obrigado.asp" else' Se não for enviado mostra o erro que ocoreu Response.Write ("Ocorreu um erro.<BR>") Response.Write ("O Erro é " & Mailer.Response) end if%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

Sou iniciante em asp e peguei o código de faleconsoco, só que quando fui utiliza-lo ocorreu o seguinte erro Ocorreu um erro.O Erro é At least one Recipient, CC or BCC must be enteredAlguém pode me ajudar?

Tenta assim...
<%'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")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 = "smtp2.locaweb.com.br"Mailer.AddRecipient "seuemail@imasters.com.br", "Nome do Site"Mailer.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

Não sei se com a resposta do WLJ deu certo mas acho que está faltando um sinal de igual aí neste código...

'Cria o objetoset mailer = server.createobject("SMTPsvg.Mailer")Mailer.FromName = sNameFromMailer.FromAddress = sEmailFrom'Host para envio de emailsMailer.RemoteHost = "smtp2.locaweb.com.br"Mailer.AddRecipient "seuemail@imasters.com.br", "Nome do Site"Mailer.Subject = sAssunto & " - E-mail"

Mailer.AddRecipient  = "seuemail@imasters.com.br", "Nome do Site"

Compartilhar este post


Link para o post
Compartilhar em outros sites

Coloquei o sinal de = só que agora apareçe o seguinte erro:Erro de compilação do Microsoft VBScript erro '800a0401' Fim da instrução esperado /faleconosco/enviar.asp, line 17 Mailer.AddRecipient = "seuemail@imasters.com.br", "Nome do Site"------------------------------------------------^

Compartilhar este post


Link para o post
Compartilhar em outros sites

Coloquei o sinal de = só que agora apareçe o seguinte erro:Erro de compilação do Microsoft VBScript erro '800a0401' Fim da instrução esperado /faleconosco/enviar.asp, line 17 Mailer.AddRecipient = "seuemail@imasters.com.br", "Nome do Site"------------------------------------------------^

Rodou o código sem o sinal "=" ?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Coloquei o sinal de =  só que agora apareçe o seguinte erro:Erro de compilação do Microsoft VBScript erro '800a0401' Fim da instrução esperado /faleconosco/enviar.asp, line 17 Mailer.AddRecipient = "seuemail@imasters.com.br", "Nome do Site"------------------------------------------------^

Rodou o código sem o sinal "=" ?
Não ocorreu o mesmo erro Ocorreu um erro.O Erro é At least one Recipient, CC or BCC must be entered

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.