ob_start();
ob_implicit_flush(0);
function CheckCanGzip() {
global $HTTP_ACCEPT_ENCODING;
if (headers_sent() || (connection_status()!=0) ){ return 0; }
// Comprobamos que el servidor accepta compresión de datos.
if (strpos($_SERVER["HTTP_ACCEPT_ENCODING"], 'x-gzip') !== false) return "x-gzip";
if (strpos($_SERVER["HTTP_ACCEPT_ENCODING"],'gzip') !== false) return "gzip";
return 0;
}#end function
/* $level contiene el nivel de compresión: de 0 a 9, donde 0=ninguno y 9=máximo. */
function GzDocOut($level=1,$debug=0) {
$ENCODING = CheckCanGzip();
if ($ENCODING) {
print "\n\n";
$Contents = ob_get_contents();
//$Contents=oneLine($Contents);
ob_end_clean();
if ($debug) {
$s = "
Recomienda esta página a todos tus amig@s y conocid@s, seguramente te lo agradecerán. Además puedes añadir tus propios comentarios... incluso si has llegado aquí desde el enlace inferior que aparece en cada página directamente se le recomendará esa página. Ya conoces nuestra web, puedes ser el primero que se la enseñe a tus amig@s, ¿por qué no lo haces?
$evaluaCaptcha = comprobarCaptcha($_REQUEST["captchaAnswer"],$_REQUEST["answerSel"]);
$RecPag=$_REQUEST["RecPag"];
$RecEB=$_REQUEST["RecEB"];
$lapag=$_REQUEST["lapag"];
$message=$_REQUEST["message"];
$comentario=$_REQUEST["comentario"];
$emailrec=$_REQUEST["emailrec"];
$nombrec=$_REQUEST["nombrec"];
$envemail_1=$_REQUEST["envemail_1"];
$envemail_2=$_REQUEST["envemail_2"];
$envemail_3=$_REQUEST["envemail_3"];
$envemail_4=$_REQUEST["envemail_4"];
$envemail_5=$_REQUEST["envemail_5"];
if ($RecPag!=0 and $RecPag!=110 and ($RecPag<199 or $RecPag>299)) {
$NomPrevio=mysql_query("select nombre from previos where enlace=$RecPag ");
$QueNombre=mysql_fetch_row($NomPrevio);
if($QueNombre[0]=="Diccionario") {$QueNombre[0]="Diccionario Universal";}
//
";
}#end if
if ($RecEB == "si" && $evaluaCaptcha) {
# Componemos el mensaje...
if ($lapag==0) {
$message="De $nombrec \n\nTe recomiendo que visites esta p�gina http://www.elbuyate.com";
}
else {
$message="De $nombrec \n\nTe recomiendo que visites esta p�gina http://www.elbuyate.com/?url=".$lapag." ";
}#end if
if ($comentario !="") {
$message.="\n\n".$comentario;
}#end if
$message.="\n\nServicio de recomendaci�n de El Buyate. Un saludo.";
# Fin del mensaje
$para=0;
if ($envemail_1!="") {
$para++;
mail("$envemail_1", "$nombrec te recomienda El Buyate", $message,"From: $emailrec \n");
}#end if
if ($envemail_2!="") {
$para++;
mail("$envemail_2", "$nombrec te recomienda El Buyate", $message,"From: $emailrec \n");
}#end if
if ($envemail_3!="") {
$para++;
mail("$envemail_3", "$nombrec te recomienda El Buyate", $message,"From: $emailrec \n");
}#end if
if ($envemail_4!="") {
$para++;
mail("$envemail_4", "$nombrec te recomienda El Buyate", $message,"From: $emailrec \n");
}#end if
if ($envemail_5!="") {
$para++;
mail("$envemail_5", "$nombrec te recomienda El Buyate", $message,"From: $emailrec \n");
}#end if
# Emails para mi de lo q se recomienda...
$ParaMi="Emails\n$envemail_1\n$envemail_2\n$envemail_3\n$envemail_4\n$envemail_5\n".$message;
getIp($gIp);
$ParaMi.="\nIP: ".$gIp;
mail("webmaster@elbuyate.com", "$nombrec ha recomendado El Buyate", $ParaMi,"From: $emailrec \n");
# Fin Emails para mi de lo que se recomienda.
echo "
E-mail/s enviado/s con e-mail $emailrec. $nombrec, gracias por su colaboración.
¿Desea recomendar El Buyate a más gente?
";
$pagesRec=mysql_query("select veces from contadores where contador='recomendar' ");
$rowpagesRec=mysql_fetch_row($pagesRec);
#echo "$rowpagesRec[0]";
$auxRec=$rowpagesRec[0]+$para;
mysql_query("update contadores set veces=$auxRec where contador='recomendar'");
}#end if
?>
mt_srand ((double) microtime() * 1000000);
$adServerTradeDoubler=<<
var uri = 'http://impes.tradedoubler.com/imp/pool/js/58892/346985?' + new String (Math.random()).substring (2, 11);
document.write('<\/sc'+'ript>');
CODEtradedoubler;
$codigoBannering=<<