Ir para conteúdo

POWERED BY:

Arquivado

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

NinoSPFC

Formulario de Contato Flash + Asp.Net

Recommended Posts

Nunca pensei que isso me traria tanto transtorno =)

 

Preciso fazer um formulario para um site em flash.

 

Ele está hospedado na locaweb e o plano só tem suporte a ASP.NET se fosse Asp estaria perfeito.

 

Mas nunca fiz nada em Asp.Net.

 

Alguém pode me dar um auxilio de como ler as variáveis do Flash no Asp.Net?

 

 

 

Formulario em Asp.Net padrão

 

<%@ Page Language="C#" %>
<%@ Import Namespace="System" %>
<!--Inclui o namespace para envio de emails -->
<%@ Import Namespace="System.Web.Mail" %>
<html>
<script runat="server">
public void Page_Load(Object Sender, EventArgs e)
{

//strBody3 = Request.Form("nome")
Request.Querystring("email");
//strBody = Request.Form("tel")
//strBody2 = Request.Form("mensagem")

//Instancia o Objeto Email como MailMessage
MailMessage Email = new MailMessage();

//Atribui ao método From o valor do Remetente
Email.From = email;

//Atribui ao método To o valor do Destinatário
Email.To = "anderson.poli@gmail.com";

//Atribui ao método Subject o assunto da mensagem
Email.Subject = "Teste de Envio de mensagens";

//Define o formato da mensagem que pode ser Texto ou Html
Email.BodyFormat = MailFormat.Text;

//Atribui ao método Body a texto da mensagem
Email.Body = "Texto da mensagem";

//Define qual o host a ser usado para envio de mensagens, na locaweb é smtp2.locaweb.com.br
SmtpMail.SmtpServer = "localhost";

//Envia a mensagem baseado nos dados do objeto Email
SmtpMail.Send(Email);

//Escreve no label que a mensagem foi enviada
Response.Write("Email enviado com sucesso!");
}
</script>
</html>

 

No ASP antigo eu usava o seguinte codigo para pegar as variaveis do Flash mas agora não rola..

 

Dim strTo, strSubject, strBody, strBody2, strBody3
Dim objCDOMail

strTo = "anderson.poli@gmail.com"

strBody3 = Request.Form("nome")
strSubject = Request.Form("email")
strBody = Request.Form("tel")
strBody2 = Request.Form("mensagem")

 

Se alguém poder me ajudar !! Valeu!!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Consegui desta forma

 

 

<% @Page Language="VB" %>

<% @Import Namespace="System.Web.Mail" %>

<%

 

Dim strPara As String

Dim strDe As String

Dim strtexto As String

Dim strNome As String

Dim strTelefone As String

Dim strMensagem As String

Dim strAssunto As String

 

strPara = "email@email.com.br"

strDe = Request.Form("email")

strNome = Request.Form("nome")

strTelefone = Request.Form("telefone")

strMensagem = Request.Form("mensagem")

strAssunto = "Contato feito pelo site "

strTexto = "Nome: " + strNome + vbcrlf + "Email: " + strDe + vbcrlf +"Telefone: " + strTelefone + vbcrlf + "Mensagem: " + strMensagem

 

SmtpMail.Send(strDe, strPara, strAssunto, strTexto)

 

Response.Write("Email foi enviado !!!")

%>

 

Valeu

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.