Envio de formulario desde Flash acon ASP

Buenos días amigos de Cristalab.

Tengo un problema con un formulario ASP en Flash.
Tengo un flash que tiene el siguiente código:

Código :

 var enviar_lv:LoadVars = new LoadVars();
var recibir_lv:LoadVars = new LoadVars();
function enviar() {
   if (email_txt.text.length && nombre_txt.length && titulo_txt.length && mensaje_txt.length) {
      if (email_txt.text.indexOf("@") != -1 && email_txt.text.indexOf(".") != -1) {
         form_lv.nombre = nombre_txt.text;
         form_lv.mail = email_txt.text;
         form_lv.mensaje = mensaje_txt.text;
         form_lv.titulo = titulo_txt.text;
         form_lv.sendAndLoad("send.asp", form_lv, "POST");
         gotoAndStop(2);
         recibir_lv.onLoad = function() {
            if (estado == "ok") {
                  gotoAndStop(3);                  
               } else {
                  gotoAndStop(4);

                  }};
                  } else {
                     email_txt.text = "Correo Invalido";
                     }
                     } else {email_txt.text = "Dato Necesario";
                     nombre_txt.text = "Dato Necesario";
                     titulo_txt.text = "Dato Necesario";
                     mensaje_txt.text = "Dato Necesario";}
                     };
borrar = function () {
   nombre_txt.text = "";
   email_txt.text = "";
   mensaje_txt.text = "";
   titulo_txt.text = "";
   };
enviar_btn.onRelease = enviar;
borrar_btn.onRelease = borrar;
stop();

y este es código en ASP

Código :

form.asp
<%
Set oMail = Server.CreateObject ("CDONTS.NewMail")
oMail.BodyFormat = 0
oMail.MailFormat = 0
Remitente = Request.Form("email")
Destino = "[email protected]" 'Email de destino
Nombre = Request.Form("nombre")
Titulo = Request.Form("empresa")
Mensaje = Request.Form("mensaje")
oMail.Send Remitente, Destino, Asunto, Cuerpo
Set oMail = Nothing
%>
estado = ok

El problema es que no me envía el correo al destinatario y dentro del codigo hay una parte donde después de procesar la variable enviar me envía a otro key frame, lo cual no hace se queda en el segundo key, no soy muy experto en esto del ASP, si ustedes detectan el error les agradecería infinitamente.

la página para que vean algo de lo que les quiero decir es:

www.pixel-gd.net


Millones de gracias.

Pues deberías de utilizar una dirección absoluta para checar que se están enviando los correos, cuando trabajes en forma local.

Código :

form_lv.sendAndLoad("http://www.pixel-gd.net/send.asp", form_lv, "POST");

Sinceramente no me acuerdo mucho de ASP pero si esta correcto tu script, funcionará.

Saludos

Hola de nuevo, aún no he resuelto mi problema, modifiqué el código del ASP el cual quedó así:

Código :

<%
Set oMail = Server.CreateObject (\\\"CDONTS.NewMail\\\")

oMail.BodyFormat = 0
oMail.MailFormat = 0

Destino = \\\"[email protected]\\\" 
Nombre = Request.Form(\\\"nombre\\\")
Remitente = Request.Form(\\\"mail\\\")
Mensaje = Request.Form(\\\"mensaje\\\")
Titulo = Request.Form(\\\"titulo\\\")

oMail.Send Nombre, Remitente, Mensaje, Titulo

Set oMail = Nothing
%>
estado=\\\"ok\\\"

Y el del Flash así:

Código :

var envio_lv:LoadVars = new LoadVars();
var recibir_lv:LoadVars = new LoadVars();

enviar = function () { 
   if (email_txt.text.length && nombre_txt.length && titulo_txt.length && mensaje_txt.length) {
      if (email_txt.text.indexOf(\\\"@\\\") != -1 && email_txt.text.indexOf(\\\".\\\") != -1) {
         envio_lv.nombre = nombre_txt.text;
         envio_lv.mail = email_txt.text;
         envio_lv.mensaje = mensaje_txt.text;
         envio_lv.titulo = titulo_txt.text;
         envio_lv.sendAndLoad(\\\"send.asp\\\", recibir_lv, \\\"POST\\\");
         gotoAndStop(2);
         recibir_lv.onLoad = function() {
            if (this.estado=\\\"ok\\\") {
                  gotoAndStop(3);                  
               } else {
                  gotoAndStop(4);

                  }};
                  } else {
                     email_txt.text = \\\"Correo Invalido\\\";
                     }
                     } else {email_txt.text = \\\"Dato Necesario\\\";
                     nombre_txt.text = \\\"Dato Necesario\\\";
                     titulo_txt.text = \\\"Dato Necesario\\\";
                     mensaje_txt.text = \\\"Dato Necesario\\\";}
                     };
borrar = function () {
   nombre_txt.text = \\\"\\\";
   email_txt.text = \\\"\\\";
   mensaje_txt.text = \\\"\\\";
   titulo_txt.text = \\\"\\\";
   };
enviar_btn.onRelease = enviar;
borrar_btn.onRelease = borrar;
stop();

En la página www.pixel-gd.net en la parte del contacto hace perfecto el proceso, es decir me dice que ha enviado correctamente el mail, pero no es así.

Por favor alguien que me brinde una solución.

Millones de gracias

Muchas gracias a todos pero ya encontré la respuesta.