Ir para conteúdo

POWERED BY:

Arquivado

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

Marco Aurelio de Souza

Recommended Posts

Marco Aurelio de Souza    0

Marco Aurelio de Souza
Postado

Pessoal, to com um formulario mas acho que esta com problemas pois, on line, ao clicar no botao enviar fica enviando sem parar (firefox pois no internet explorer, nada acontece, o navegador nao denuncia nenhum carregamento de pagina.

 

É o seguinte: ao clicar no botao enviar, puxa um ASP, via LOADVARS e, teoricamente mandaria uma msg pro recipiente, com os dados do formulario mas há algo estranhamente bizarro...

 

codigo no 1º frame:

System.useCodepage = true; // usar o formato Unicode, pra não haver problemas com o texto.

// ações do formulário
// setando as variáveis

var_nome = "";
var_email = "";
var_telefone = "";
var_mensagem = "";
var var_status:String = "";

//==============

// atribuindo a ordem de foco dos campos quando a tecla "Tab" for pressionada

nome_txt.tabIndex = 1;
email_txt.tabIndex = 2;
telefone_txt.tabIndex = 3;
mensagem_txt.tabIndex = 4;

// criando função que valida
// e envia os dados informados pelo usuário

function enviar() {
if (var_nome.length <= 2) {
var_status = "Preencha seu nome.";
// se a variável tiver menos que dois digitos, alerte o usuário
}
else if (var_email.length <= 8 or var_email.indexOf("@", 0) == -1 or var_email.indexOf(".", 0) == -1) {
var_status = "Preencha seu email corretamente.";
// se a variável tiver menos que dois digitos, alerte o usuário.
// se não existir o caracter "@", nem o "." no meio do e-mail, alerte o usuário.
}
else if (var_telefone.length <= 8) {
var_status = "Preencha seu telefone.";
// se a variável tiver menos que oito digitos, alerte o usuário.
}
else if (var_mensagem.length <= 1) {
var_status = "Digite a mensagem.";
// se a variável tiver menos que dois digitos, alerte o usuário.
}

// se os dados informados passarem pela validação, executar as linhas abaixo:
else {
var envia = new LoadVars(); // cria um objeto para enviar os dados
var carrega = new LoadVars(); // cria um objeto para receber os dados
carrega.nome = nome_txt.text; // pegar os dados da variável var_nome
carrega.email = email_txt.text; // pegar os dados da variável var_email
carrega.telefone = telefone_txt.text; // pegar os dados da variável var_telefone
carrega.mensagem = mensagem_txt.text; // pegar os dados da variável var_mensagem
// envia a mensagem através da função "sendAndLoad".
envia.sendAndLoad("http://www.sitesite.com.br/email.asp", envia, "POST");
nextScene();
}

}
enviar_btn.onRelease = function() {
enviar();
}
apagar_btn.onRelease = function() {
nome_txt.text = "";
email_txt.text = "";
telefone_txt.text = "";
mensagem_txt.text = "";
status_txt.text = "";
}

eis o codigo ASP - email.asp:

 

<%

Dim iMail, Nome, Email, Telefone, Mensagem

Nome = Request.form("var_nome")
Email = Request.form("var_email")
Mensagem = Request.form("var_mensagem")
meu_email = "e-mail que recebera os dados do formulario"
Telefone = Request.form("var_telefone")

corpo = "Nome:" & Nome & "<BR>"
corpo = corpo & "E-mail:" & Email & "<BR>"
corpo = corpo & "Telefone:" & Telefone & "<BR>"
corpo = corpo & "Mensagem:" & Mensagem & "<BR>"

Set iMail = CreateObject("CDONTS.NewMail")
iMail.From = email
iMail.To = meu_email
iMail.Subject = "contato_site"
iMail.MailFormat = 0
iMail.BodyFormat = 0
iMail.Body = corpo
iMail.Send

Set iMail = nothing
%>

Alguem pode ajudar com esse codigo? Já me certifiquei no servidor se eles possuem CDONTS e a resposta foi positiva.

 

Alguma alma caridosa?

 

Obrigado!

Compartilhar este post

Link para o post
Compartilhar em outros sites

Marco Aurelio de Souza    0

Marco Aurelio de Souza
Postado

Pessoal, to com um formulario mas acho que esta com problemas pois, on line, ao clicar no botao enviar fica enviando sem parar (firefox pois no internet explorer, nada acontece, o navegador nao denuncia nenhum carregamento de pagina.

 

É o seguinte: ao clicar no botao enviar, puxa um ASP, via LOADVARS e, teoricamente mandaria uma msg pro recipiente, com os dados do formulario mas há algo estranhamente bizarro...

 

codigo no 1º frame:

System.useCodepage = true; // usar o formato Unicode, pra não haver problemas com o texto.

// ações do formulário
// setando as variáveis

var_nome = "";
var_email = "";
var_telefone = "";
var_mensagem = "";
var var_status:String = "";

//==============

// atribuindo a ordem de foco dos campos quando a tecla "Tab" for pressionada

nome_txt.tabIndex = 1;
email_txt.tabIndex = 2;
telefone_txt.tabIndex = 3;
mensagem_txt.tabIndex = 4;

// criando função que valida
// e envia os dados informados pelo usuário

function enviar() {
if (var_nome.length <= 2) {
var_status = "Preencha seu nome.";
// se a variável tiver menos que dois digitos, alerte o usuário
}
else if (var_email.length <= 8 or var_email.indexOf("@", 0) == -1 or var_email.indexOf(".", 0) == -1) {
var_status = "Preencha seu email corretamente.";
// se a variável tiver menos que dois digitos, alerte o usuário.
// se não existir o caracter "@", nem o "." no meio do e-mail, alerte o usuário.
}
else if (var_telefone.length <= 8) {
var_status = "Preencha seu telefone.";
// se a variável tiver menos que oito digitos, alerte o usuário.
}
else if (var_mensagem.length <= 1) {
var_status = "Digite a mensagem.";
// se a variável tiver menos que dois digitos, alerte o usuário.
}

// se os dados informados passarem pela validação, executar as linhas abaixo:
else {
var envia = new LoadVars(); // cria um objeto para enviar os dados
var carrega = new LoadVars(); // cria um objeto para receber os dados
carrega.nome = nome_txt.text; // pegar os dados da variável var_nome
carrega.email = email_txt.text; // pegar os dados da variável var_email
carrega.telefone = telefone_txt.text; // pegar os dados da variável var_telefone
carrega.mensagem = mensagem_txt.text; // pegar os dados da variável var_mensagem
// envia a mensagem através da função "sendAndLoad".
envia.sendAndLoad("http://www.sitesite.com.br/email.asp", envia, "POST");
nextScene();
}

}
enviar_btn.onRelease = function() {
enviar();
}
apagar_btn.onRelease = function() {
nome_txt.text = "";
email_txt.text = "";
telefone_txt.text = "";
mensagem_txt.text = "";
status_txt.text = "";
}

eis o codigo ASP - email.asp:

 

<%

Dim iMail, Nome, Email, Telefone, Mensagem

Nome = Request.form("var_nome")
Email = Request.form("var_email")
Mensagem = Request.form("var_mensagem")
meu_email = "e-mail que recebera os dados do formulario"
Telefone = Request.form("var_telefone")

corpo = "Nome:" & Nome & "<BR>"
corpo = corpo & "E-mail:" & Email & "<BR>"
corpo = corpo & "Telefone:" & Telefone & "<BR>"
corpo = corpo & "Mensagem:" & Mensagem & "<BR>"

Set iMail = CreateObject("CDONTS.NewMail")
iMail.From = email
iMail.To = meu_email
iMail.Subject = "contato_site"
iMail.MailFormat = 0
iMail.BodyFormat = 0
iMail.Body = corpo
iMail.Send

Set iMail = nothing
%>

Alguem pode ajudar com esse codigo? Já me certifiquei no servidor se eles possuem CDONTS e a resposta foi positiva.

 

Alguma alma caridosa?

 

Obrigado!

 

Alguem pra ajudar com essa pendaiba?

 

valeu!

Compartilhar este post

Link para o post
Compartilhar em outros sites

carneirinho    7

carneirinho
Postado

Onde tem essa linha:

 

envia.sendAndLoad("http://www.sitesite.com.br/email.asp", envia, "POST");

 

deixe como:

 

envia.sendAndLoad("email.asp", envia, "POST");

 

lembrando que o html onde vai o flash e o asp precisam estar no mesmo diretório, se não funcionar, tente fazer uma pagina em html pra testar primeiro o asp, pra ver se o servidor realmente está com o cdonts funcionando, qquer coisa poste ai novamente.

Compartilhar este post

Link para o post
Compartilhar em outros sites

Marco Aurelio de Souza    0

Marco Aurelio de Souza
Postado

Oi Carneirinho, feliz 2008 pra você e pros seus.

 

Entao, eu ja testei somente o ASP, está funcionando sim... e sobre deixar apenas envia.sendAndLoad("email.asp", envia, "POST");

tbm ja fiz isso...

 

no navegador, aparece na barra de estatus que esta recebendo os dados.... e fica nisso eternamente.... porem, quando checo e-mail, chegam varios a cada instante, sem cessar.

 

Acho que o problema pode estar no AS.....

 

Nao sei oq poderia olhar pra tentar resolver.....

 

Obrigado pela sua atencao!

Compartilhar este post

Link para o post
Compartilhar em outros sites

Marco Aurelio de Souza    0

Marco Aurelio de Souza
Postado

confirmei com o servidor.

eles suportam sim cdonts.

 

Fiz uns outros testes mas nada ainda.

 

coloquei os dados já preenchidos no formulario, apenas no asp, só pra conferir o recebimento e está ok!

 

o problema está no AS mesmo só que não consigo resolver.

 

conto com a ajuda de voces!

 

abraços!

Compartilhar este post

Link para o post
Compartilhar em outros sites

Marco Aurelio de Souza    0

Marco Aurelio de Souza
Postado

Alguma novidade sobre isso??

Marco, você conseguiu resolver este problema? Estou c um problema semelhate a este...

Vlw!!

Abraços.

Infelizmente nao consegui resolver, nem ajuda pra isso, apesar da tentativa do aimgo ali em cima.

 

O que eu fiz foi abandonar esse script e partir pra um formmail, do proprio servidor. Horrivel por sinal mas foi o jeito.

 

Abraço,

Compartilhar este post

Link para o post
Compartilhar em outros sites

Marco Aurelio de Souza    0

Marco Aurelio de Souza
Postado

Me passa seu e-mail ou msn q eu já consegui resolver, e te passo via download! Caso queira...

Flw...

Abraços.

Oi Bruno, você identificou algum erro no script? Como chegou à solução?

 

docirco@hotmail.com

 

abração e valeu por ajudar.

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos Flash, ActionScript e tecnologias Adobe
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito