WordPress, Shopify ir PHPFusion programuotojų bendruomenė

Parašė bruzgis· 2007 Lap. 30 00:11:22
Prašom
<?

# Šis kodas pades jums fiksuoti jus reklamuojančius ar iš kitu svetainiu

# ateinančius lankytojus

# Sistema apsaugota, fiksuoja tik kitus saitus, savęs ne,

# ir tik jei paspaudimas buna retesnis nei 60 sekundžiu.



$limit = 10; //Kiek rodyt referalu

$text = 'Mus remia<br/>'; //pradzios tekstas



//funkcija skirta sukurti lentelei

function sukurk() {

 mysql_query('CREATE TABLE IF NOT EXISTS `referals` ('

 . ' `site` VARCHAR( 100 ) NOT NULL ,'

 . ' `url` VARCHAR( 200 ) NOT NULL ,'

 . ' `count` INT( 20 ) NOT NULL ,'

 . ' `time_last` INT( 10 ) NOT NULL ,'

 . ' PRIMARY KEY ( `site` )'

 . ' ) TYPE = MYISAM ');

}



$laikas = time() - 60; //nurodykite sekundemis

//jeigu nustatem iš kur atejo lankytojas

if (isset($_SERVER['HTTP_REFERER'])) { $referalas = $_SERVER['HTTP_REFERER']; } else { $referalas = ''; }

if (isset($referalas) && $referalas != '') {

 $referalas = strip_tags($referalas);

 $hostas = parse_url($referalas);

 $hostas = $hostas['host']; //nustatom hosta

 if ($hostas != $_SERVER['HTTP_HOST'] && !empty($hostas) && $hostas != '') {

 $result = mysql_query("SELECT * FROM referals WHERE site=".escape($hostas)." AND time_last < $laikas");

 $rows = mysql_num_rows($result); //skaiciuojam ar yra ir

 if ($rows != 0) {

 //jei yrasu yra atnaujinam info

 $sql = mysql_query("UPDATE referals SET url = ".escape($referalas).", count = count+1, time_last = '".time()."' WHERE site = ".escape($hostas));

 }

 else {

 //jei nėra įrašų - iterpiam

 $sql = mysql_query("INSERT INTO referals (`site`,`count`,`time_last`,`url`) VALUES (".escape($hostas).",'1','".time()."',".escape($referalas).")") or sukurk();

 }

 }

}

$result = mysql_query("SELECT * FROM referals ORDER BY time_last DESC LIMIT 0, $limit");

if (mysql_num_rows($result) == 0) { sukurk(); }

while ($myrow = mysql_fetch_array($result)) {

 $text .= "<a href='".input($myrow['url'])."' target='_blank' title='Mus paremė ".input($myrow['count'])." karų'>".input($myrow['site'])."</a><br>";

}

echo $text;

//ištrinam nebenaudojamus kintamuosius

unset($laikas,$hostas,$result,$rows,$myrow,$referalas,$text,$myrow);

?>