<?
/* aqui se incializan variables de PHP */
if (phpversion() >= "4.2.0") {
if ( ini_get('register_globals') != 1 ) {
$supers = array('_REQUEST',
'_ENV',
'_SERVER',
'_POST',
'_GET',
'_COOKIE',
'_SESSION',
'_FILES',
'_GLOBALS' );
foreach( $supers as $__s) {
if ( (isset($$__s) == true) && (is_array( $$__s
) == true) ) extract( $$__s, EXTR_OVERWRITE );
}
unset($supers);
}
} else {
if ( ini_get('register_globals') != 1 ) {
$supers = array('HTTP_POST_VARS',
'HTTP_GET_VARS',
'HTTP_COOKIE_VARS',
'GLOBALS',
'HTTP_SESSION_VARS',
'HTTP_SERVER_VARS',
'HTTP_ENV_VARS'
);
foreach( $supers as $__s) {
if ( (isset($$__s) == true) && (is_array( $$__s
) == true) ) extract( $$__s, EXTR_OVERWRITE );
}
unset($supers);
}
}
/* DE AQUI EN ADELANTE PUEDES EDITAR EL ARCHIVO */
if($email=="")
{
/* reclama si no se ha rellenado el campo email en el formulario */
echo "<script languaje=javascript>".
"alert(\"¡¡¡¡EL E-MAIL NO ES CORRECTO!!!!\");".
"location.href=\"contactar.html\";".
"</script>";
}
/* aquí se especifica la pagina de respuesta en caso de envío exitoso */
$respuesta="respuesta.htm";
// la respuesta puede ser otro archivo, en incluso estar en otro servidor
/* AQUÍ ESPECIFICAS EL CORREO AL CUAL QUEIRES QUE SE ENVÍEN LOS DATOS
DEL FORMULARIO, SI QUIERES ENVIAR LOS DATOS A MÁS DE UN CORREO,
LOS PUEDES SEPARAR POR COMAS */
$para ="
[email protected]";
/* AQUI ESPECIFICAS EL SUJETO (Asunto) DEL EMAIL */
$sujeto = "Formulario de Informacion Solicitada";
/* aquí se construye el encabezado del correo, en futuras
versiones del script explicaré mejor esta parte */
$encabezado = "From: $nombre <$email>";
$encabezado .= "\nReply-To: $email";
$encabezado .= "\nX-Mailer: PHP/" . phpversion();
/* con esto se captura la IP del que envío el mensaje */
$ip=$REMOTE_ADDR;
/* las siguientes líneas arman el mensaje */
$mensaje .= "NOMBRE: $nombre\n";
$mensaje .= "Telefono: $telefono\n";
$mensaje .= "EMAIL: $email\n";
$mensaje .= "COMENTARIOS: $comentarios\n";
/* aqui se intenta enviar el correo, si no se
tiene éxito se da un mensaje de error */
foreach($para as $email_destino){
if(!mail($email_destino, $sujeto, $mensaje, $encabezado))
}
{
echo "<script languaje=javascript>".
"alert(\"THE MESSAGE COULD NOT BE COMMANDED!!!!\");".
"location.href=\"contactar.html\";".
"</script>";
}
else
{
/* aqui redireccionamos a la pagina de respuesta */
echo "<script languaje=javascript>".
"alert(\"Su Mensaje se ha enviado Correctamente!!!!\");".
"location.href=\"../index.html\";".
"</script>";
}
?>