Envio e e-mail com flash

[Prof. Jonatas]

Boa tarde galera, tenho um código em ASP que envia um e-mail com os dados preenchidos de um formulário em flash.

Utilizo o método CDO.

1º

Minha dúvida é a seguinte, porque eu não consigo colocar como remetente a pessoa que preencheu o formulário ????

No caso seria a variável : MyEmail

Quando coloco: MyMail.From = MyEmail

O Email não é enviado, não funciona mais.

Para burlar este problema eu coloquei meu próprio email como remetente, aí funciona, mas não é correto meu cliente ta questionando porque não chega como se tivesse enviado pela pessoa q preencheu o formulário.

Segue abaixo o código:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

<%

'First lets Dim all the variables we need

Dim MyNome

Dim MyEmail

Dim MyTelefone

Dim MyMessage

Dim MyBody

MyNome = Request.Form("nome")

MyEmail = Request.Form("email")

MyTelefone = Request.Form("telefone")

MyMessage = Request.Form("mensagem")

MyBody = MyBody & "Nome: "& MyNome & vbcrlf

MyBody = MyBody & "Email: "& MyEmail & vbcrlf

MyBody = MyBody & "Telefone: "& MyTelefone & vbcrlf

MyBody = MyBody & "Mensagem: "& MyMessage & vbcrlf & vbcrlf

Set MyMail = CreateObject("CDO.Message")

MyMail.From = "i9ideias@hotmail.com"

MyMail.To = "email do cliente"

MyMail.ReplyTo = MyEmail

MyMail.Subject = "Contato pelo site, danicardoso.com"

MyMail.TextBody = MyBody

MyMail.Send

Set MyMail= nothing

Response.Write "contact0.mess=Thank you, " & MyNome & "."

%>

2º

Minha outra dúvida é, como disparar uma chamada de ação no flash.

No caso a unica coisa q acontece é que no campo mess paraece, Thank you, nome da pessoa.

Gostaria de enviar para o flash alguma coisa para o flash execultar qualquer ação, aí lá dentro do flash eu resolvo o que fazer com esta resposta porque eu quero limpar os campos após o envio ou fazer com que o botão fique inativo, qualquer coisa.

A questão é que se eu repetir o comando Response.Write mandando tipo um "oK" para outro campo, este ok entra dentro do mesmo campo mess.

Me dando uma resposta do tipo:

Thank you, nome da pessoa. contact0.mess2=ok :blink:

Fica tudo junto.

Alguém sabe me dizer como faço para disparar um evento lá no flash após o envio ??????? :wacko:

Aguardo respostas.

valeu galera, té +

[bareta]

1 mude para cdosys

2 verifique se existe valor no campo do e-mail

3

[Prof. Jonatas]

Olá Bareta,

No caso onde eu mudo essa parada ?????

Eu pesquisei na internet sobre o método cdosys e todos aparecem igual ao meu atual:

Set MyMail = CreateObject("CDO.Message")

Detalhe: a variável não está vazia porque a função MyMail.ReplyTo = MyEmail funciona perfeitamente.

Se clicar em responder vai para o email certo, então significa que a informação ta chegando néh!?

E sobre o ASP enviar uma resposta para o flash executar uma ação, alguma idéia ?????

Abçs, valeu pela força

Editado Fevereiro 11, 2011 por Prof. Jonatas

[bareta]

http://www.portalmaracaju.com.br/blog/arti...=79&blog=14