// --------condiciones++++++++++++++
on (release) {
if (nombre eq "") {
} else if (telefono eq "") {
tellTarget ("_root.contacto.status") {
gotoAndPlay(2);
}
} else if (mensaje eq "") {
tellTarget ("_root.contacto.status") {
gotoAndPlay(2);
}
} else if ( MailFrom eq "") {
tellTarget ("_root.contacto.status") {
gotoAndPlay(2);
}
} else if (ciudad eq "") {
tellTarget ("_root.contacto.status") {
gotoAndPlay(2);
}
} else {
gotoAndPlay(2);
salto = "\r\n\r\n";
salto2 = "\r\n";
// --------Personaliza las variables++++++++++++++
Body = "-------- Formulario de contacto + + +-- + +++"+salto2+"--------------------------------------------------------------"+salto+ "Nombre: " + nombre +salto+ "--------------------------------------------------------------"+salto+"Correo electrónico: "+MailFrom+salto+ "--------------------------------------------------------------"+salto+ "Teléfono: "+telefono+salto+ "--------------------------------------------------------------"+salto+ "Ciudad: "+ciudad+salto+ "--------------------------------------------------------------"+salto+ "Mensaje: "+ salto+ mensaje+salto+ "--------------------------------------------------------------"+salto+"Información y datos enviados a través y desde el formulario flash http://www.sito.org"+salto+"--------------------------------------------------------------"+salto+"Este correo fue generado por :"+salto+"O´creativo http://www.sito.org + + Nueva idea "+salto+ "--------------------------------------------------------------"+salto+"::::::::::::::::::::::::::::::::::::" ;
Subject = "+ contacto ..:.+::.:...+.:.:::..+";
// --------tu e-mail ++++++++++++++
MailTo = destino;
// -------la URL del PHP ++++++++++++++
loadVariablesNum("http://www.sito.org/formulario.php", 1, "POST");
}
}
Questo sopra è il codice del pulsante "INVIA"
sotto c è il codice del file formulario.php
<?php
//Send to Variable
$MailTo = " " . $HTTP_POST_VARS["MailTo"] . "\n";
$Subject = " " . $HTTP_POST_VARS["Subject"] . "\n";
$Body = " " . $HTTP_POST_VARS["Body"] . "\n";
$MailFrom = " " . $HTTP_POST_VARS["MailFrom"] . "\n";
//Send Mail
mail($MailTo, $Subject, $Body, "From: $MailFrom");
?>
non mi arriva l email sbaglio qualcosa?