Ir para conteúdo

POWERED BY:

Arquivado

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

Carlos_bsb

Form mail Flash

Recommended Posts

pessoal preciso muito de ajuda.

 

criei um formulario no flash para envio de e-mail utilizando asp.

 

os codigos sao os seguintes

 

do flash

stop();
[color="#FF0000"]var objMail:LoadVars = new LoadVars();
System.useCodepage=true;

bt.onRelease = function() {
objMail.nome = nome.text;
objMail.email = email.text;
objMail.assunto = assunto.text;
objMail.mensagem = mensagem.text;
mensagem.text = nome.text = assunto.text = email.text = "";
objMail.sendAndLoad("http://www.jhonnyerahony.com.br/teste/recebe.asp, objMail, "POST");[/color]
}

objMail.onLoad = function() {
gotoAndStop(2);
if(this.ver)
msg.text = "Seu e-mail foi enviado com sucesso!!";
else
msg.text = "Ocorreu algum erro no envio do e-mail";
} 

e na pagina asp

<%
			Dim objNewMail
			
			nome = Request.Form("nome")
			email = Request.Form("email")
			assunto = Request.Form("assunto")
			mensagem = Request.Form("mensagem")
			
			Set objNewMail = Server.CreateObject("CDONTS.Newmail" )
						
			objNewMail.To = "contato@jhonnyerahony.com.br"
			objNewMail.From = email
			objNewMail.Subject = assunto
			varHTML = FALSE
			
			If (varHTML) Then
			objNewMail.Bodyformat = 0 '0-HTML, 1-Texto
			objNewMail.MailFormat = 0
			End If
			
			objNewMail.Body = ""& nome & "   | " & "email.:" & email & "   | "& "Assunto: "& assunto & "   | " &  "Texto escrito:" &mensagem
			objNewMail.Send
			
			Set objNewMail = Nothing
			
			If ( Err.Number <> 0 ) Then
			SendMail = Err
			End If
			
			On Error Goto 0
			
			Response.Redirect "contatos.asp?ref=CadSucesso"
			end if
			%>
e o mesmo so da erro de envio de e-mail conforme no flash, gostaria de saber onde possa esta o erro!!!!

Compartilhar este post


Link para o post
Compartilhar em outros sites

pessoal mudei a forma de enviar a variável e funcionou legal...

[color="#FF0000"]stop();
System.useCodepage = true;// Para evitar problemas com acentuação.
enviar.onRelease = function() {// Quando clicar no botão enviar.
var carregafale:LoadVars = new LoadVars();// Cria um variavel "carregafale"
carregafale.nome = nome.text;// O mesmo com os imput text.
carregafale.email = email.text;
carregafale.assunto = assunto.text;
carregafale.mensagem = mensagem.text;
carregafale.sendAndLoad("mail.asp", carregafale, "POST");// A variavel manda os arquivos para o asp.[/color]
encontrei o código no forum mesmo....

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.