Tengo un código de un formulario en flash el cual está de la siguiente manera:
Código :
//Declaro las variables para enviar y para recibir
var envio_lv:LoadVars = new LoadVars();
var recibir_lv:LoadVars = new LoadVars();
//Función que envia el forumlario
function enviarMail() {
   envio_lv.asunto = asunto_txt.text;
   envio_lv.email = email_txt.text;
   envio_lv.cuerpo = cuerpo_txt.text;
   envio_lv.telefono = telefono_txt.text;
   envio_lv.sendAndLoad("email.aspx", recibir_lv, "POST");
   //Aqui ustedes pueden cambiar de form.php a form.asp dependiendo del servidor
   //que usen
}
//Función que procesa los datos recibidos del servidor
recibir_lv.onLoad = function(exito) {
   if (exito) {
      estado_txt.text = this.estado;
   } else {
      //Muestra un mensaje de error en negrita
      estado_txt.text = "Error en la aplicación de correo";
   }
};Y quiero recoger esas variables en el archivo enviar.aspx (asp.net) para enviar el mensaje.
¿ De que forma recogo esas variables en este script de envío (tal y como está a continuación envia un correo a través de html, pero que debo hacer para que funcione con esas variables de flash)?
Código :
<%@ Page Language="VB" %>
<!DOCTYPE "-//W3C//DTD XHTML 1.0 Transitional//EN""http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script runat="server">
    Protected Sub btnEnviar_Click(ByVal sender As Object, ByVal e As System.EventArgs)
        '
        Dim correo As New System.Net.Mail.MailMessage()
        correo.From = New System.Net.Mail.MailAddress(txtDe.Text)
        correo.To.Add(txtPara.Text)
        correo.Subject = txtAsunto.Text
        txtTexto.Text &= vbCrLf & vbCrLf & _
                        "Fecha y hora GMT: " & _
                        DateTime.Now.ToUniversalTime.ToString("dd/MM/yyyy HH:mm:ss")
        correo.Body = txtTexto.Text
        correo.IsBodyHtml = False
        correo.Priority = System.Net.Mail.MailPriority.Normal
        '
        Dim smtp As New System.Net.Mail.SmtpClient
        '
        '---------------------------------------------
        ' Estos datos debes rellanarlos correctamente
        '---------------------------------------------
        smtp.Host = "smtp.1and1.es"
        'smtp.Credentials = New System.Net.NetworkCredential("usuario", "password")
        'smtp.EnableSsl = False
        '
        Try
            smtp.Send(correo)
            LabelError.Text = "Mensaje enviado satisfactoriamente"
        Catch ex As Exception
            LabelError.Text = "ERROR: " & ex.Message
        End Try
        
    End Sub
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
        ' Esto (en ASP.NET 2.0) no se ejecuta... si AutoEventWireup="false"
        If Not IsPostBack Then
            txtTexto.Text = "Hola," & vbCrLf & _
                        "Esto es una prueba de envio de correo usando ASP.NET 2.0 con Visual Basic" & vbCrLf & _
                        "Saludos!!!"
            LabelError.Text = ""
        End If
    End Sub
</script>Muchas gracias
Un saludo,
Víctor


 
  
			