El formulario flash aparntemente funciona correctamente porque si no completo los campos obligatorios no me deja enviarlo, creo que el problema esta en el php o no se si al estar incrustado en un html deba modificar algo.
El formulario posee 5 campos: Nombre y apellido (variable nom), telefono (variable tel), email (variable email), area de interes (variable area) y consulta (variable mensaje). También hay un campo de texto dinámico (variable respuesta). Los campos obligatorios son nombre, email y consulta.
En el primer frame tengo e siguiente codigo
nom=''
email=''
mensaje=''
En el boton enviar
Código ActionScript :
on (release) { if ((nom=='') or (email=='') or (mensaje=='')) { respuesta = "Hay campos obligatorios sin rellenar."; } else { loadVariablesNum ("php2excel_csv.php", 0, "POST"); respuesta = "El formulario ha sido enviado con éxito."; } }
En el boton borrar
Código ActionScript :
on (release) { nom = ""; email = ""; tel = ""; area = ""; mensaje = ""; respuesta = ""; }
Y mi php dice lo siguiente
Código PHP :
<?PHP $archivo = fopen("formulario.csv" , "w"); if ($archivo) { //variables que hayamos declarado en la pelicula de flash $datos="Nombre del autor: ".$_POST['nom']; $datos.="Su telefono:, ".$_POST['tel']; $datos.="Su email:, ".$_POST['email']; $datos.="Area de interes:, ".$_POST['area']; $datos.="Mensaje:, ".$_POST['mensaje']; fputs ($archivo, $datos); } echo $pulsado; fclose ($archivo); ?> <?php include "libmail.php"; $m= new Mail; //correo desde el que se enviará $m->From( "[email protected]" ); //correo al que se enviará. Se puede poner en ambos lugares el mismo correo $m->To( "[email protected]" ); //el subject del email, será el email que haya escrito el usuario, salvo que lo cambiemos, pon lo que quieras $m->Subject( "Consulta de Formulario de Contacto Web" ); //variables que hayamos declarado en la pelicula de flash $m->Body( "Nombre del autor: ".$_POST['nom']." Su telefono: ".$_POST['tel']." Su email: ".$_POST['email']." Area de interes: ".$_POST['area']." Mensaje: ".$_POST['mensaje']); //Si queremos que el correo se envíe a más cuentas de correo, quitar las barras de comentario y especificar los correos $m->Cc( "[email protected]"); $m->Priority(1) ; $m->Attach( "formulario.csv", "application/vnd.ms-excel", "attachment" ); $m->Send(); ?>
Aguien puede detectar cual puede ser el problema. Espero me puedan ayudar, gracias!