= “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 “No ingresaste la dirección de correo electrónico”;
exit();
}

/* 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 =”consultas@lospsiquicosdelamor.com”;

/* AQUI ESPECIFICAS EL SUJETO (Asunto) DEL EMAIL */
$sujeto = “Mensaje via web Los Psiquicos del Amor”;

/* aquí se construye el encabezado del correo, en futuras
versiones del script explicaré mejor esta parte */
$encabezado = “From: $nombre “;
$encabezado .= “nReply-To: $email”;
$encabezado .= “nX-Mailer: PHP/” . phpversion();

/* con esto se captura la IP del que envío el mensaje */
$ip=$REMOTE_ADDR;
$fech = date(“d-m-Y”);
$hora_local = mktime(date(“H”)+1,date(“i”));
$hora=getdate($hora_local);
$hr = $hora[hours].”:”.$hora[minutes];

/* las siguientes líneas arman el mensaje */
$msg = “——————————- n”;
$msg .= “|||||||||| MENSAJE WEB |||||||||n”;
$msg .= “——————————- n”;
$msg .= “NOMBRE: $nombren”;
$msg .= “FECHA NACIMIENTO: $fechan”;
$msg .= “CIUDAD: $ciudadn”;
$msg .= “PAIS: $paisn”;
$msg .= “EMAIL: $emailn”;
$msg .= “TELEFONO: $telefonon”;
$msg .= “——————————- n”;
$msg .= “COMENTARIOS: $comentariosnnn”;
$msg .= “——————————- n”;
$msg .= “FECHA DE ENVIO: $fechn”;
$msg .= “HORA DE ENVIO: $hrn”;
$msg .= “IP: $ipn”;
/* aqui se intenta enviar el correo, si no se
tiene éxito se da un mensaje de error */
if (!mail($para, $sujeto, $msg, $encabezado))
{
echo “

No se pudo realizar su petición, vuelva a intentarlo

“;
exit();
}
else
{
/* aqui redireccionamos a la pagina de respuesta */
/*echo ““;*/
print ““;
/*echo ““;*/
echo ““;

}
?>