Problemas com envio de e-mail

[williamot 0]

Olá gente...

Bom seguinte fiz um form para envio de e-mail mas o msm não funciona...

 

Dentro do flash no botão enviar tem essa ação:

on (release) {
	loadVariablesNum("contactar.asp", 0, "POST");
}

Mas não envia... quando chega o e-mail chega vazio...

[Vi =) 0]

isso ta mto incompleto acho...na verdade acho q você precisa d um codigo action script que pegue os valores recebidos pelos campos de texto e leve ao asp...

 

por exemplo, para o campo de texto "nome", você o instancia com algum nome e em AS você diz a variavel correspondente a ele em asp...

[williamot 0]

Então... ai q tá.. na propria programação em ASP q eu fiz tá pegando legal..

Mas parece q não está sendo enviada as variaveis..

 

Esse é o arquivo q tá recebendo as variaveis:

 

<%
email  = Request("email")
nome = Request("nome")
assunto = Request("assunto")
mensagem = Request("mensagem")
Set Mail = Server.CreateObject("Persits.MailSender")
'Servidor de SMTP
Mail.Host = "mail.empresa.com"
'E-mail do remetente
Mail.From = email
'Remetente
Mail.FromName = nome
Mail.AddAddress "email@empresa.com", "Nome"
'Assunto da mensagem
Mail.Subject = assunto
'Corpo da mensagem
Mail.Body = mensagem
On Error Resume Next
Mail.Send
If Err <> 0 Then
Response.Write "Error encountered: " & Err.Description
End If

Set Mail = Nothing
%>

[Pino 0]

cara... codigo do flash... +/- assim, desculpe algum erro mas dor de cabeca ta f***

 

var oEnvia:Object = new Object ();

 

seu_btn.onPress = function () {

oEnvia.nome = nome_txt.text; // valor a ser passado é = o valor do campo q o cara preencheu o nome

oEnvia.email = nome_txt.text; // valor a ser passado é = o valor do campo q o cara preencheu o email

oEnvia.sendAndLoad("contactar.asp", oEnvia, "POST"); // onde no seu asp tem q ter as variaveis pra receber, nao entendo nada de asp

}

 

basicamente isso ai

 

flws

=]

[williamot 0]

Olha gente eu tentei mas tb não funfou não..

olha como ficou o código..

 

on (release) {
	var oEnvia:Object = new Object();
	enviar_form.onPress = function() {
		oEnvia.nome = nome.text;
		//valor a ser passado é = o valor do campo q o cara preencheu o nome
		oEnvia.email = email.text;
		//valor a ser passado é = o valor do campo q o cara preencheu o email
		oEnvia.assunto = assunto.text;
		//valor a ser passado é = o valor do campo q o cara preencheu o assunto
		oEnvia.mensagem = mensagem.text;
		//valor a ser passado é = o valor do campo q o cara preencheu a mensagem
		oEnvia.sendAndLoad("contactar.asp",oEnvia,"POST");

	};
}

E não vai..

[brcontainer 16]

Mas existe a instanvia "nome" "email" e "mensagem"?

 

VocÊ nomeou as instancias?

 

uma pergunta no ASP não seria assim o uso do Request:

Request.querystring()

?

[williamot 0]

Como assim no asp? num tendi..

 

No arquivo asp tá assim ó.. :

 

<%
email  = Request("email")
nome = Request("nome")
assunto = Request("assunto")
mensagem = Request("mensagem")
Set Mail = Server.CreateObject("Persits.MailSender")
'Servidor de SMTP
Mail.Host = "mail.empresa.com"
'E-mail do remetente
Mail.From = email
'Remetente
Mail.FromName = nome
Mail.AddAddress "email@empresa.com", "Nome"
'Assunto da mensagem
Mail.Subject = assunto
'Corpo da mensagem
Mail.Body = mensagem
On Error Resume Next
Mail.Send
If Err <> 0 Then
Response.Write "Error encountered: " & Err.Description
End If

Set Mail = Nothing
%>

[brcontainer 16]

aqui:

email = Request("email")

 

você usou só Request não seria Request.querystring("email")

[williamot 0]

Então no caso ficaria todos o request como Request.querystring ?

Tipo:

email = Request.querystring("email")

nome = Request.querystring("nome")

assunto = Request.querystring("assunto")

mensagem = Request.querystring("mensagem")

 

Valeu

[brcontainer 16]

Isso mesmo ;)

Vou testar seu AS agora ok.

Detalhe faça da maneira que o Pino mostrou pois com ON() as vezes pode não pegar as propriedades corretamente.

[williamot 0]

Tentei tb mas não funcionou... :( já to quase me jogando do precipicio.. :S

[brcontainer 16]

Descobri o erro, troque isso:

var oEnvia:Object = new Object ();

por isso:

var oEnvia:Object = new LoadVars();

 

NO FRAME deve possuir esse código:

var oEnvia:Object = new LoadVars();

enviar_form.onPress = function() {
oEnvia.nome = nome.text;
//valor a ser passado é = o valor do campo q o cara preencheu o nome
oEnvia.email = email.text;
//valor a ser passado é = o valor do campo q o cara preencheu o email
oEnvia.assunto = assunto.text;
//valor a ser passado é = o valor do campo q o cara preencheu o assunto
oEnvia.mensagem = mensagem.text;
//valor a ser passado é = o valor do campo q o cara preencheu a mensagem
trace("enviando" + nome.text + email.text + assunto.text + mensagem.text);
oEnvia.sendAndLoad("http://site.com/contactar.php",oEnvia,"POST");
}

oEnvia.onLoad = function() {
msg.text = this.ver;
}

deverá haver um botão com a intancea enviar_form e os inputs deverão ser instanceados com NOME, EMAIL, ASSUNTO e MENSAGEM.

 

O ASP deve ser mais ou menos assim(troquei query por Form):

<%
email  = Request.Form("email")
nome = Request.Form("nome")
assunto = Request.Form("assunto")
mensagem = Request.Form("mensagem")
Set Mail = Server.CreateObject("Persits.MailSender")
'Servidor de SMTP
Mail.Host = "mail.empresa.com"
'E-mail do remetente
Mail.From = email
'Remetente
Mail.FromName = nome
Mail.AddAddress "email@empresa.com", "Nome"
'Assunto da mensagem
Mail.Subject = assunto
'Corpo da mensagem
Mail.Body = mensagem
'On Error Resume Next
Mail.Send
If Err <> 0 Then
Response.Write "&ver=Error encountered: " & Err.Description
Else
Response.Write "&ver=Email enviado com sucesso"
End If

Set Mail = Nothing
%>