Basit bir sayaç uygulaması

İhtiyaca binanen hazırladığım basit bir sayaç uygulamasını sizlerle paylaşmak istedim. Umarım işinizi görür.
sayac.php adında bir dosya oluşturup aşağıdaki kodu içine yapıştırın.
sayac adında bir klasör oluşturup chmod ayarlarını 777 yapın.

<?php
////////////////////
$yol = './sayac/';
$ip_adres = $_SERVER['REMOTE_ADDR'];
////////////////////
function sayac_tar($tarih) {
$ktarihi = date("d",$tarih).date("m",$tarih).date("Y",$tarih);
return $ktarihi;
}
function yaz($dosya,$count) {
	global $yol;
	$file = fopen( $yol."$dosya", "w" );
	$count = $count + 1;
	fwrite( $file, $count );
	fclose( $file );
}
function oku($dosya) {
	global $yol;
	$file = @fopen(  $yol."$dosya", "r" );
	$count = @fread( $file, filesize( $yol."$dosya" ) );
	@fclose( $file );
	return $count;
}
function ipkontrol($ip) {
	global $yol;
	$file = @fopen(  $yol."ip-".sayac_tar(mktime()).".php", "r" );
	$liste = @fread( $file, filesize( $yol."ip-".sayac_tar(mktime()).".php" ) );
	@fclose( $file );
if (ereg($ip, $liste)) {
$engelle = 1; } 
else 
{ 
$engelle = 0;  
$file_W = fopen(  $yol."ip-".sayac_tar(mktime()).".php", "a" );
$yaz = $ip."\n";
fwrite( $file_W, $yaz);
fclose( $file_W );
}
return $engelle; }
function sayac() {
	global $ip_adres,$yol;
	$tekil = oku('tekil-'.sayac_tar(mktime()).'.php');
	$dun = mktime()-86400;
	if (file_exists($yol.'tekil-'.sayac_tar($dun).'.php')) {
		$tekil_dun = oku('tekil-'.sayac_tar($dun).'.php');
	} else { 
		$tekil_dun = 'Veri Yok'; }
	$t_tekil = oku('tekil-toplam.php');
	if (ipkontrol($ip_adres)==0) {
	yaz('tekil-'.sayac_tar(mktime()).'.php',$tekil);	
	yaz('tekil-toplam.php',$t_tekil);	
	}
	$sil = mktime()-172800;
	@unlink($yol.'tekil-'.sayac_tar($sil).'.php');
	@unlink($yol.'ip-'.sayac_tar($sil).'.php');
	$rtn = '<table border="0" width="100%" id="table1">
	<tr>
		<td width="78" align="right"><font face="Tahoma" style="font-size: 8pt">Bugün Tekil</font></td>
		<td width="4"><font face="Tahoma" style="font-size: 8pt">:</font></td>
		<td><font face="Tahoma" style="font-size: 8pt" color="#CC0000">'.$tekil.'</font></td>
	</tr>
	<tr>
		<td width="78" align="right"><font face="Tahoma" style="font-size: 8pt">Dün Tekil</font></td>
		<td width="4"><font face="Tahoma" style="font-size: 8pt">:</font></td>
		<td><font face="Tahoma" style="font-size: 8pt" color="#CC0000">'.$tekil_dun.'</font></td>
	</tr>
	<tr>
		<td width="78" align="right"><font face="Tahoma" style="font-size: 8pt">Toplam 
		Ziyaretçi</font></td>
		<td width="4"><font face="Tahoma" style="font-size: 8pt">:</font></td>
		<td><font face="Tahoma" style="font-size: 8pt" color="#CC0000">'.$t_tekil.'</font></td>
	</tr>
</table>';
	return $rtn;
}
echo sayac();
?>

Kullanımı :
Sayacın gözükmesini istediğiniz alana <? include('sayac.php'); ?> olarak çağırarak kullanabilirsiniz. Fonksiyon olduğu için direk fonksiyonuda kullanabilirsiniz.

Görünüm :


Saygılar...

kain; öncelikle paylaşımın için teşekkürler.
sayacı yan yana yazdırmak istediğimde şu hatayı aldım... Yardımcı olursan memnun olurum.

Parse error: syntax error, unexpected T_STRING in /home/reklamve/public_html/sayac/sayac2.php on line 60

   <?php
////////////////////
$yol = './sayac/';
$ip_adres = $_SERVER['REMOTE_ADDR'];
////////////////////
function sayac_tar($tarih) {
$ktarihi = date("d",$tarih).date("m",$tarih).date("Y",$tarih);
return $ktarihi;
}
function yaz($dosya,$count) {
    global $yol;
    $file = fopen( $yol."$dosya", "w" );
    $count = $count + 1;
    fwrite( $file, $count );
    fclose( $file );
}
function oku($dosya) {
    global $yol;
    $file = @fopen(  $yol."$dosya", "r" );
    $count = @fread( $file, filesize( $yol."$dosya" ) );
    @fclose( $file );
    return $count;
}
function ipkontrol($ip) {
    global $yol;
    $file = @fopen(  $yol."ip-".sayac_tar(mktime()).".php", "r" );
    $liste = @fread( $file, filesize( $yol."ip-".sayac_tar(mktime()).".php" ) );
    @fclose( $file );
if (ereg($ip, $liste)) {
$engelle = 1; } 
else 
{ 
$engelle = 0;  
$file_W = fopen(  $yol."ip-".sayac_tar(mktime()).".php", "a" );
$yaz = $ip."\n";
fwrite( $file_W, $yaz);
fclose( $file_W );
}
return $engelle; }
function sayac() {
    global $ip_adres,$yol;
    $tekil = oku('tekil-'.sayac_tar(mktime()).'.php');
    $dun = mktime()-86400;
    if (file_exists($yol.'tekil-'.sayac_tar($dun).'.php')) {
        $tekil_dun = oku('tekil-'.sayac_tar($dun).'.php');
    } else { 
        $tekil_dun = 'Veri Yok'; }
    $t_tekil = oku('tekil-toplam.php');
    if (ipkontrol($ip_adres)==0) {
    yaz('tekil-'.sayac_tar(mktime()).'.php',$tekil);    
    yaz('tekil-toplam.php',$t_tekil);    
    }
    $sil = mktime()-172800;
    @unlink($yol.'tekil-'.sayac_tar($sil).'.php');
    @unlink($yol.'ip-'.sayac_tar($sil).'.php');
    $rtn = '<table border="0" width="100%" id="table1">
    <tr>
	    <td width="78" align="right"><font face="Tahoma" style="font-size: 8pt">Bugün Tekil</font></td>
        <td width="4"><font face="Tahoma" style="font-size: 8pt">:</font></td>
        <td><font face="Tahoma" style="font-size: 8pt" color="#CC0000">'.$tekil.'</font></td>
		//<td>&nbsp;</td>
		<td width="78" align="right"><font face="Tahoma" style="font-size: 8pt">Dün Tekil</font></td>
        <td width="4"><font face="Tahoma" style="font-size: 8pt">:</font></td>
        <td><font face="Tahoma" style="font-size: 8pt" color="#CC0000">'.$tekil_dun.'</font></td>
		//<td>&nbsp;</td>
		<td width="78" align="right"><font face="Tahoma" style="font-size: 8pt">Toplam 
        Ziyaretçi</font></td>
        <td width="4"><font face="Tahoma" style="font-size: 8pt">:</font></td>
        <td><font face="Tahoma" style="font-size: 8pt" color="#CC0000">'.$t_tekil.'</font></td>
    </tr>    
</table>';
    return $rtn;
}
echo sayac();
?>

Akif aşağıdaki kodları deniyebilirsin,

   <?php
////////////////////
$yol = './sayac/';
$ip_adres = $_SERVER['REMOTE_ADDR'];
////////////////////
function sayac_tar($tarih) {
$ktarihi = date("d",$tarih).date("m",$tarih).date("Y",$tarih);
return $ktarihi;
}
function yaz($dosya,$count) {
    global $yol;
    $file = fopen( $yol."$dosya", "w" );
    $count = $count + 1;
    fwrite( $file, $count );
    fclose( $file );
}
function oku($dosya) {
    global $yol;
    $file = @fopen(  $yol."$dosya", "r" );
    $count = @fread( $file, filesize( $yol."$dosya" ) );
    @fclose( $file );
    return $count;
}
function ipkontrol($ip) {
    global $yol;
    $file = @fopen(  $yol."ip-".sayac_tar(mktime()).".php", "r" );
    $liste = @fread( $file, filesize( $yol."ip-".sayac_tar(mktime()).".php" ) );
    @fclose( $file );
if (ereg($ip, $liste)) {
$engelle = 1; } 
else 
{ 
$engelle = 0;  
$file_W = fopen(  $yol."ip-".sayac_tar(mktime()).".php", "a" );
$yaz = $ip."\n";
fwrite( $file_W, $yaz);
fclose( $file_W );
}
return $engelle; }
function sayac() {
    global $ip_adres,$yol;
    $tekil = oku('tekil-'.sayac_tar(mktime()).'.php');
    $dun = mktime()-86400;
    if (file_exists($yol.'tekil-'.sayac_tar($dun).'.php')) {
        $tekil_dun = oku('tekil-'.sayac_tar($dun).'.php');
    } else { 
        $tekil_dun = 'Veri Yok'; }
    $t_tekil = oku('tekil-toplam.php');
    if (ipkontrol($ip_adres)==0) {
    yaz('tekil-'.sayac_tar(mktime()).'.php',$tekil);    
    yaz('tekil-toplam.php',$t_tekil);    
    }
    $sil = mktime()-172800;
    @unlink($yol.'tekil-'.sayac_tar($sil).'.php');
    @unlink($yol.'ip-'.sayac_tar($sil).'.php');
    $rtn = '<table border="0" id="table1" cellspacing="0" cellpadding="0">
		<tr>
			<td>Bugün Tekil : '.$tekil.'</td>
			<td>Dün Tekil : '.$tekil_dun.'</td>
			<td>Toplam Ziyaretçi : '.$t_tekil.'</td>
		</tr>
	</table>';
    return $rtn;
}
echo sayac();
?>

Merhaba

Kain, son kodu da ekledim. Sayac klasorunun altında..
ana sayfaya include ediyorum.. Şu hatayı aldım..

Fatal error: Cannot redeclare sayac_tar() (previously declared in /home/reklamve/public_html/sayac/sayac.php:6) in /home/reklamve/public_html/sayac/sayac4.php on line 6

Akif en son verdiğim kodları ilkine ekleme, sayac.php dosyasını tekrar oluştur içine yapıştır. Hata ondan kaynaklanıyor.

Sağol Kain.. Şimdi çalışıyor. Teşekkür ederim .

Paylasim icin tesekkürler Kain, benimde isime yarayacak.

teşekkürler Kain. Bugün bu siteden işime yarayacak bayağ bişey aradım tam istediğim de buydu.

Teşekkürler..