Entendendo o Código!

[Padre 0]

Estou precisando de ajuda.

Estou fazendo um formulario para envio de email em fash com ASPMAIL.

O problema eh o seguinte... o Codigo não funciona!!!

As Variaveis podem ser puxadas direto do flash?

Alguem pode me ajudar? :(

 

<%@ Language=VBScript %>

<%

 

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

 

Mailer.FromName = Request.Form("nome")

Mailer.FromAddress = Request.Form("email")

Mailer.RemoteHost = "mail.terraempresas.com.br"

Mailer.AddRecipient = Request.Form("texto")

Mailer.Subject = "E-mail Metalurgica LH On Line"

Mailer.BodyText = Request.Form("msg")

 

if Mailer.SendMail then

Response.Write "status = Mensagem Enviada"

else

Responde.write "status = Erro de Envio. Erro: " &

Mailer.Response

end if

%>

[AMON-HÁ 0]

Estou precisando de ajuda.

Estou fazendo um formulario para envio de email em fash com ASPMAIL.

O problema eh o seguinte... o Codigo não funciona!!!

As Variaveis podem ser puxadas direto do flash?

Alguem pode me ajudar? :(

 

<%@ Language=VBScript %>

<%

 

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

 

Mailer.FromName = Request.Form("nome")

Mailer.FromAddress = Request.Form("email")

Mailer.RemoteHost = "mail.terraempresas.com.br"

Mailer.AddRecipient = Request.Form("texto")

Mailer.Subject = "E-mail Metalurgica LH On Line"

Mailer.BodyText = Request.Form("msg")

 

if Mailer.SendMail then

Response.Write "status = Mensagem Enviada"

else

Responde.write "status = Erro de Envio. Erro: " &

Mailer.Response

end if

%>

Bom... possíveis causas do erro...

 

1º Seu servidor (no caso o do terra empresas) pode naum ter o componente ASPMAIL instalado... (verifique com o terra)

2º "mail.terraempresas.com.br" esse endereço pode naum está correto... (verifique com o terra tb)

3º

naum é assim:

Responde.write "status = Erro de Envio. Erro: " &

Mailer.Response

é assim...

Responde.write "status = Erro de Envio. Erro: " & Mailer.Response

na mesma linha...

 

espero ter ajudado...

Boa Sorte!!! http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

[Padre 0]

Bom... possíveis causas do erro...

 

1º Seu servidor (no caso o do terra empresas) pode naum ter o componente ASPMAIL instalado... (verifique com o terra)

2º "mail.terraempresas.com.br" esse endereço pode naum está correto... (verifique com o terra tb)

3º

naum é assim:

Responde.write "status = Erro de Envio. Erro: " &

Mailer.Response

é assim...

Responde.write "status = Erro de Envio. Erro: " & Mailer.Response

na mesma linha...

 

espero ter ajudado...

Boa Sorte!!! http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

 

Infelizmente não resolveu, mas obrigado pela informação.

O terra aceita o ASPMAIL e o CDONTS porém não consigo fazer funcionar nenhum dos dois. :(

Já tentei de tudo não imagino onde possa estar o erro. Mas de qq forma obrigado!

[AMON-HÁ 0]

Cara... teste este exemplo ae...

ele foi retirado do site do fabricante...

 

Set Mailer = Server.CreateObject("SMTPsvg.Mailer")Mailer.FromName   = "Joe’s Widgets Corp."Mailer.FromAddress= "Joe@somehost.com"Mailer.RemoteHost = "mailhost.localisp.net"Mailer.AddRecipient "John Smith", "jsmith@anotherhostname.com"Mailer.Subject	= "Great SMTP Product!"Mailer.BodyText   = "Dear Stephen" & VbCrLf & "Your widgets order has been processed!"if Mailer.SendMail then  Response.Write "Mail sent..."else  Response.Write "Mail send failure. Error was " & Mailer.Responseend if

FONTE: http://www.serverobjects.com/

 

Caso naum consiga resultados satisfatórios... sugiro que entre em contato com o suporte técnico do seu servidor de hospedagem... pode ser que o problema seja com eles...

 

http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

[Salgado 4]

Cara, qual o erro que acontece? aparece a mensagem de erro em seu flash ou simplesmente não chega mensagem?

[Padre 0]

Pessoal descobri o problema mas não achei uma solução, o problema está nesta linha:

 

 

Mailer.AddRecipient request.Form("var")

 

 

Se eu coloco um email normal ele funciona, mas com a variavel ele não funciona!

O problema eh que eu preciso que ele funcione com a variavel!

Os dados da variavel está correto. Já verifiquei todos os outros dados tb!

 

Obrigado pela ajuda pessoal! http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

[Mário Monteiro 179]

tem certeza que ta passando um valor??

[Padre 0]

Certeza! http://forum.imasters.com.br/public/style_emoticons/default/yes.gif

Já refiz esse formulario 500x...

http://forum.imasters.com.br/public/style_emoticons/default/cry.gif

[Mário Monteiro 179]

antes desta linha aiMailer.AddRecipient request.Form("var")se voce colocarresponse.write(request.Form("var"))Mailer.AddRecipient request.Form("var")aparece o email???

[Padre 0]

Aparece sim! :blink:

[AMON-HÁ 0]

Cara... nunca usei o ASPMAIL naum...

mas você já tentou colocar algo assim?

Mailer.AddRecipient "", request.Form("var")

 

http://forum.imasters.com.br/public/style_emoticons/default/ermm.gif

[Padre 0]

Cara, acabei de tentar e não deu certo!

 

Se você tiver um modelo com o CDONTS usando uma variavel no campo TO por favor me passe!

 

Vlw pela ajuda!

 

http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

[AMON-HÁ 0]

Cara, acabei de tentar e não deu certo!Se você tiver um modelo com o CDONTS usando uma variavel no campo TO por favor me passe!Vlw pela ajuda! http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

Tae cara...

<%Set ObjMail = Server.CreateObject("CDONTS.NewMail")ObjMail.To = "recipiente@dominio.com.br"ObjMail.From = "destinatario@dominio.com.br"ObjMail.Subject = "Assunto Fica Aqui"ObjMail.Body = "<b>Mensagem vai aqui... pode usar tags HTML...</b>"ObjMail.Importance = 1		'0 - BAIXA, 1 - NORMAL, 2 - ALTAObjMail.BodyFormat = 0		'0 - HTML, 1 - TEXTOObjMail.MailFormat = 0		'(MIME) 0 - HTML, 1 - TEXTOObjMail.SendSet ObjMail = Nothing%>

espero que esse funcione...Boa Sorte!!! http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

[Padre 0]

Cara vlw pela ajuda eu consegui fazer funcionar com o ASPMAIL...graças a sua ajuda!

 

O Problema agora é nesta linha

 

if Mailer.SendMail then  Response.Write " status = Mensagem Enviadaelse  Response.Write "status = Erro" & Mailer.Responseend if

A mensagem naum aparece no formulario...

A variavel do campo onde deveria aparecer é "status"

[Padre 0]

Ninguem pode me ajudar?

[AMON-HÁ 0]

Cara vlw pela ajuda eu consegui fazer funcionar com o ASPMAIL...graças a sua ajuda!O Problema agora é nesta linha

if Mailer.SendMail then  Response.Write " status = Mensagem Enviadaelse  Response.Write "status = Erro" & Mailer.Responseend if

A mensagem naum aparece no formulario...A variavel do campo onde deveria aparecer é "status"

Cara... essas propriedades e métodos que você está usando naum é do CDONTS... é do ASPMAIL...tente assim:

if ObjMail.Send then  Response.Write "status = Mensagem Enviada"else  Response.Write "status = Erro, A Mensagem Não Foi Enviada"end if

http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

[Padre 0]

Mas eu estou usando o ASPMAIL!

[AMON-HÁ 0]

Mas eu estou usando o ASPMAIL!

hehehe... foi mal... pensei que estava usando o código do CDONTS que te passei...

 

entaum é assim...

If Mailer.SendMail Then  Response.Write "status = Mensagem Enviada"Else  Response.Write "status = Erro " & Mailer.ResponseEnd If

 

PS: se o nm do objeto naum for Mailer, entaum mude ae...

 

vlw... http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

[Padre 0]

Cara, naum deu certo :(

[AMON-HÁ 0]

Cara, naum deu certo :(

Como assim...???enviou o email e naum apareceu a msg de envida com sucesso foi???cara poste novamente o seu código ae pra mim vê como é que tá agora...