Vou deixar aqui a resposta para caso alguem perdido (como eu) esteja com o mesmo problema.
Formulario Flash + ASP:
1. Certifique-se que o servidor tem o componente Aspemail instalado.
2. Codigo ActionScript 2.0 dentro do botao enviar (bem simples, pois qdo inventei moda com codigos para o Flash limpar, dar mensagem, etc... dava pau):
on (release) {
// Endereco da pagina ASP para o botao enviar funcionar
getURL("http://www.coloque aqui seu site.com/nome da sua pagina.asp?nome da variavel colocada na caixa do formulario Flash="+_parent.mesmo nome da variavel+"&variavel="+_parent.mesma variavel+"&variavel="+_parent.mesma variavel+"&variavel="+_parent.mesma variavel+"&"&variavel="+_parent.mesma variavel, "_self", "GET");
//o trace vai mostrar no output se o flash esta puxando as variaveis. Se vier undefined eh pq a variavel esta dentro de algum movieclip que vc criou e vc deve escrever o nome depois de _parent, ex: "&company="+_parent.nome do movieclip.company
trace("Name " + _parent.nome da variavel);
trace("Company " + _parent.nome da variavel);
trace("Telephone " + _parent.nome da variavel);
trace("E-mail " + _parent.nome da variavel);
trace("Message " + _parent.nome da variavel);
}No ASP (no final, depois que a pessoar preencheu o formulario e enviou, o asp vai redirecionar para a pagina principal do seu site, se der erro ele vai dizer o problema):
<%
Set Mail=Server.CreateObject("Persits.MailSender")
Mail.Host="nome do seu host - smtp"
Mail.Subject="assunto do seu email - ex: Contato do site tal"
Mail.From="destinatario@empresa.com"
Mail.AddAddress "destinatario@empresa.com"
Mail.Body= "Name: " & Request.QueryString("nome da variavel que vc colocou no Flash") & Chr(13) & _
"Company: " & Request.QueryString("nome da variavel que vc colocou no Flash") & Chr(13) & _
"Telephone: " & Request.QueryString("nome da variavel que vc colocou no Flash") & Chr(13) & _
"E-mail: " & Request.QueryString("nome da variavel que vc colocou no Flash") & Chr(13) & _
"Message: " & Request.QueryString("nome da variavel que vc colocou no Flash")
On Error Resume Next ' catch errors
Mail.Send
If Err <> 0 Then ' error occurred
response.write(Err.Description)
else
response.redirect("http://www.nome do seu site.com")
End If
%>Tudo bem simples, mas funcional!
Espero que ajude mais alguem!
- DarkSign likes this



Postagens
Female
