Temos pavadinimas: WordPress, Shopify ir PHPFusion programuotojų bendruomenė :: Lankytojų skaičiavimas

Parašė Peacemaker· 2007 Gru. 27 11:12:51
#1

Čia pateikiu senai visiems žinomą panelės kodą.Man reikia jį perdaryt, kad rodytų unikalius lankytojus, o ne pinigus.Duomenų nuskaitymas (t.y.kiek yra unikalių apsilankymų per pvz.mėn) vyktų iš tekstinio failo pvz.hits.txt. Ten saugoma visų unikalių vartotojų ip adresai.Vietoj kreipimosi į duomenų bazę reikia sukurti kreipimąsi į nurodytą failą, kad iš jo būtų nuskaitytas ip adresų kiekis (lankytojų skaičius).Reikia kažkaip į panelės kodą įdėti mėlynu šriftu parašytą kodą.(vietoj kreipimosi į duombazę)

$filename = "hits.txt";

$file = file($filename);
$file = array_unique($file);
$hits = count($file);
echo $hits;

$fd = fopen ($filename , "r");
$fstring = fread ($fd , filesize ($filename));
fclose($fd);
$fd = fopen ($filename , "w");
$fcounted = $fstring."\n".getenv("REMOTE_ADDR");
$fout= fwrite ($fd , $fcounted );
fclose($fd);




?>
<?php openside("Lankytojai šį mėnesį");

@MYSQL_CONNECT("mysql", "nickas", "slaptazodis");

@mysql_select_db("lentele");

$query = "SELECT SUM(amount) FROM parama ";

$result = mysql_query($query) or die(mysql_error());

// Print out result
while($row = mysql_fetch_array($result)){
$vardas=$row['SUM(amount)'];
}


$pavadinimas = "Iš 1000:"; //pavadinimas
$ko = "Jau apsilankė"; //vienetas (pvz: Lt.)
$max = 1000;
$dabar = $vardas;
$pa= Paaukota;


//paveiksleliu nustatymai
$bg_pic = "http://img340.imageshack.us/img340/2239/loadbarbgnc2.gif"; //fono paveiksliukas (neaktyvi zona)
$nulis_pic = "http://img231.imageshack.us/img231/8220/nosounddh2.gif"; //rodomoas paveiksliukas jei rezultatas lygus 0% (pvz jei nera klausytoju)
$mazas_pic = "http://img340.imageshack.us/img340/456/loadbargreenyk1.gif"; //uzsidengiantis paveiksliukas (zalia)
$vidutinis_pic = "http://img230.imageshack.us/img230/3815/loadbaryellowue2.gif"; //Kai vidutine procentu israiska (geltona)
$didelis_pic = "http://img403.imageshack.us/img403/8008/loadbarreduh0.gif"; //Kai arti arba lygu 100 procentu (raudona)


//pagrindiniai veiksmai
$procentai = (int)round((100 * $dabar) / $max);
$width = $procentai; //paveiksliuko plotis procentaliai
if ($procentai <= 1) {$pic = $nulis_pic; $width = "100";}
elseif ($procentai <= 40) { $pic = $mazas_pic; }
elseif ($procentai <= 80) { $pic = $vidutinis_pic; }
elseif ($procentai <= 100) { $pic = $didelis_pic; }
else { $pic = $didelis_pic; $width = "100"; } //jei daugiau nei 100%

//atvaziduojam lentele su rezultatais
echo "<center><br><b>".$pavadinimas."</b><br>";
echo "<b> ".$pa.": ".$dabar."Lt</b></font>";

echo "<table class=main border=0 width=100><tr><td style='padding: 0px; background-image: url(".$bg_pic."); background-repeat: repeat-x'>";

echo "<img height=15 width=\"".$width."%\" src=\"$pic\" alt='$dabar'><br><font size='1'><center>".$procentai."%</center></font></td></tr></table>";

closeside(); ?>
<?

Parašė Peacemaker· 2007 Gru. 27 11:12:41
#2

Jau pats sutvarkiau.

Parašė Peacemaker· 2007 Gru. 27 12:12:32
#3

Taigi, manau sukuriau naudingą, nors ir nedidelį modą.Kaip jau rašiau jis parodo lankytojų skaičių grafiškai.Išbandyti galite visi:
1.Sukuriame failą pavadinimu 'counter.php'
Į jį įrašome :
<?php
$filename = "hits.txt";

$file = file($filename);
$file = array_unique($file);
$hits = count($file);
echo $hits;

$fd = fopen ($filename , "r");
$fstring = fread ($fd , filesize ($filename));
fclose($fd);
$fd = fopen ($filename , "w");
$fcounted = $fstring."\n".getenv("REMOTE_ADDR");
$fout= fwrite ($fd , $fcounted );
fclose($fd);
?>

2.Sukuriame failą 'hits.txt'
Abu šiuos failus sumetame į pagrindinę ftp direktoriją.
3.Sukuriame panelę.Joje įrašome

?>
<?php openside("Lankytojai šį mėnesį");

$filename = "hits.txt";

$file = file($filename);
$file = array_unique($file);
$hits = count($file);

$fd = fopen ($filename , "r");
$fstring = fread ($fd , filesize ($filename));
fclose($fd);
$fd = fopen ($filename , "w");
$fcounted = $fstring."\n".getenv("REMOTE_ADDR");
$fout= fwrite ($fd , $fcounted );
fclose($fd);



$pavadinimas = "Iš 500:"; //pavadinimas
$ko = "Jau apsilankė"; //vienetas (pvz: lankytojai.)
$max = 500;
$dabar = $hits;
$pa=Apsilanke;


//paveiksleliu nustatymai
$bg_pic = "http://img340.imageshack.us/img340/2239/loadbarbgnc2.gif"; //fono paveiksliukas (neaktyvi zona)
$nulis_pic = "http://img231.imageshack.us/img231/8220/nosounddh2.gif"; //rodomoas paveiksliukas jei rezultatas lygus 0% (pvz jei nera klausytoju)
$mazas_pic = "http://img340.imageshack.us/img340/456/loadbargreenyk1.gif"; //uzsidengiantis paveiksliukas (zalia)
$vidutinis_pic = "http://img230.imageshack.us/img230/3815/loadbaryellowue2.gif"; //Kai vidutine procentu israiska (geltona)
$didelis_pic = "http://img403.imageshack.us/img403/8008/loadbarreduh0.gif"; //Kai arti arba lygu 100 procentu (raudona)


//pagrindiniai veiksmai
$procentai = (int)round((100 * $dabar) / $max);
$width = $procentai; //paveiksliuko plotis procentaliai
if ($procentai <= 1) {$pic = $nulis_pic; $width = "100";}
elseif ($procentai <= 40) { $pic = $mazas_pic; }
elseif ($procentai <= 80) { $pic = $vidutinis_pic; }
elseif ($procentai <= 100) { $pic = $didelis_pic; }
else { $pic = $didelis_pic; $width = "100"; } //jei daugiau nei 100%

//atvaziduojam lentele su rezultatais
echo "<center><br><b>".$pavadinimas."</b><br>";
echo "<b> ".$pa.": ".$dabar." lankytojai</b></font>";

echo "<table class=main border=0 width=100><tr><td style='padding: 0px; background-image: url(".$bg_pic."); background-repeat: repeat-x'>";

echo "<img height=15 width=\"".$width."%\" src=\"$pic\" alt='$dabar'><br><font size='1'><center>".$procentai."%</center></font></td></tr></table>";

closeside(); ?>
<?
4.Įjungiame panelę.(P.S ,jeigu kam kiltų neaiškumų kaip tai atrodo ar veikia,nueikit į www.f1.xz.lt )


Tai viskas.Laukiu Jūsų komentarų.

Redagavo Peacemaker· 2007 Gru. 27 12:12:56

Parašė MAnjack· 2007 Gru. 27 12:12:02
#4

Nefloodink.

Parašė sniuff· 2007 Gru. 27 12:12:05
#5

:D trys pranešimai iš eilės. Žmogus su savim kalbasi

Parašė Enzo· 2007 Gru. 27 12:12:39
#6

KipshiuS parašė:
:D trys pranešimai iš eilės. Žmogus su savim kalbasi


O tau būtinai reikėjo atrašyti šioje temoje. Beje reiks pabandyt tą modą

Parašė Peacemaker· 2007 Gru. 27 18:12:11
#7

Gal kas jau bandėt?

Parašė ozzWANTED· 2007 Gru. 27 18:12:31
#8

Kipriuxxz, jeigu pateiktum į straipsnius - būtų šaunu.

Parašė Peacemaker· 2007 Gru. 27 18:12:37
#9

Well,parašysiu.;)