//Fecha
$meses = array("Enero", "Febrero", "Marzo", "Abril", "Mayo", "Junio", "Julio", "Agosto", "Septiembre", "Octubre", "Noviembre", "Diciembre");
$hoy = getdate(time());
$fecha = "".$hoy["mday"] ." / ".$meses[$hoy["mon"]-1] ." / ". $hoy["year"]." ";
//Visitantes online
// Configuracion de las variables
$arch = "dades.txt";
// Archivo de datos de los usuarios (coloque la ruta completa dentro del servidor).
$logoutTime = 600;
// Tiempo tras el cual un usuario es considerado inactivo (en segundos).
$IP = $REMOTE_ADDR;
$count = 0;
$res = '';
$fp = fopen($arch,"r+");
$t = time();
$content = fread($fp,filesize($arch));
fclose($fp);
$lineas = split("\n",$content);
for ($i=0; $i < count($lineas); $i++) {
$datos = split(':',$lineas[$i]);
$n = $t - $logoutTime;
if ($datos[0] != $IP && $datos[1] > ($n)) {
$res .= "$datos[0]:$datos[1]\n";
$count++;
}#end if
}#end for
$res .= "$IP:$t\n";
$count++;
$fp = fopen($arch,"w+");
fwrite ($fp,$res);
fclose($fp);
?>
Secciones Web
Los wallpapers oficiales de El Buyate
echo $son[0]; ?> wallpapers, úsalos para lo que más te convenga :)
$publiEn=4;
$publiAux=0;
if ($son[0]<=$wallsPagina)
{ $enlazando="";}
else {
$enlazando="|";
$cuantos=1;
for ($i=0;$i<$son[0];$i=$i+$wallsPagina)
{
if ($OffSet==$i)
{ $fuente="";
$cierrafuente=" ";
}
else
{ $fuente="";
$cierrafuente="";
}
if ($cuantos==1)
{ $navega=$fuente."Últimos".$cierrafuente; }
else
{ $navega=$fuente.$cuantos.$cierrafuente; }
//$enlazando=$enlazando." $navega |";
$enlazando=$enlazando." $navega |";
$cuantos++;
}
$enlazando=$enlazando." ";
echo $enlazando;
}
?>
$sw=0;
while ($sobreprevio=mysql_fetch_row($tomoprevios))
{
$sobreprevio[1]=utf8_encode($sobreprevio[1]);
$fecha=split("-",$sobreprevio[4]);
if ($sw==0)
{
echo ''.
''.
$sobreprevio[1].
' '.
# ''.
# $fecha[2].'/'.$fecha[1].'/'.$fecha[0].
# ' '.
''.
' 640x480 '.
' 800x600 '.
' 1024x768 '.
' '.
' Diseñado por '.
$sobreprevio[2].
' Descargas '.
$sobreprevio[8].
' '.
' '.
'
';
$sw=1;
}
else
{
echo ''.
''.
$sobreprevio[1].
' '.
# ''.
# $fecha[2].'/'.$fecha[1].'/'.$fecha[0].
# ' '.
''.
' 640x480 '.
' 800x600 '.
' 1024x768 '.
' '.
' Diseñado por '.
$sobreprevio[2].
' Descargas '.
$sobreprevio[8].
' '.
'
';
$sw=0;
}
$publiAux++;
if ($publiAux==$publiEn)
{
?> include "publicidad.php"; ?>
}#end if
}#end while
if ($sw==0) { echo ''; }
?>
echo $enlazando; ?>
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=<<
CODEbannering;
$codigoDisenix=<<
CODEdisenix;
$codigoWebConference=<<
CODEweb;
$codigoLibro=<<
CODELibro;
$codigoMedievol=<<
CODEMedievol;
$codigoMedievol2=<<
CODEMedievol2;
$codigoSeedingUp1=<<
CODESeeding1;
$codigoSeedingUp2=<<
CODESeeding2;
$codigoSeedingUp3=<<
CODESeeding3;
//$codigoDisenix,
//$misBanners=array($adServerTradeDoubler,$codigoBannering,$codigoWebConference);
//$misBanners=array($adServerTradeDoubler,$codigoMedievol,$codigoMedievol2);
//$misBanners=array(0,$adServerTradeDoubler,$codigoSeedingUp1,$codigoSeedingUp2,$codigoSeedingUp3);
$codigoBooking=<<
CODEBooking;
//$misBanners=array(0,$adServerTradeDoubler);
$misBanners=array(0,$codigoBooking);
$TotalBanners=count($misBanners)-1;
$numeroBan=mt_rand(0,$TotalBanners);
while ($numeroBan==0) {$numeroBan=mt_rand(0,$TotalBanners);}
$publicidad4=$misBanners[$numeroBan];
/*
if ($url==102)
{
$publicidad4=$codigoLibro;
}#end if
*/
return;
if (!isset($recomendar)) {
?>
En red desde el 12 de Marzo de 2001 | 2001-2023 El Buyate | info@elbuyate.com