Your Ad Here

Hosting Gratis
Free SQL Query Builder
Free Adware Removal
Free Antivirus Downloads
Free Software
Protect your PHP Scripts
Crack Password
Adsense Money
Lowongan kerja
Yahoo Hosting

Free vbnet matrik
Mahasiswa
VB control
Visual basic
Visual basci tutorial
VB6 library
VB6 protection
Mp3 indonesia
VB source code
Lock folder
MSQ SQL Forum
Table SQL
Java SQL
Connect SQL
SQL database
dotnetnuke SQL
Convert VB6
Visual Basic6
secure VB
Excel to MySQL
wallpapers
visual studio
Client Server
File Server
SQL server pop
Restore SQL
SQL Databases
Free text chat
Flash text
C# control
Visual studio
Web developers
SQL Basics
SQL tutorial
Java Code
ASP Function
SQL Tracking
SQL Comparison
Postgres SQL
VB6 Projects
PHP Store
PHP Ecommerce
E-Commerce CMS
SQL Driver

visitor online

Your Ad Here  

<?php
$dataFile = "visitors.txt";

$sessionTime = 30; //this is the time in **minutes** to consider someone online before removing them from our file

//Please do not edit bellow this line

error_reporting(E_ERROR | E_PARSE);

if(!file_exists($dataFile)) {
$fp = fopen($dataFile, "w+");
fclose($fp);
}

$ip = $_SERVER['REMOTE_ADDR'];
$users = array();
$onusers = array();

//getting
$fp = fopen($dataFile, "r");
flock($fp, LOCK_SH);
while(!feof($fp)) {
$users[] = rtrim(fgets($fp, 32));
}
flock($fp, LOCK_UN);
fclose($fp);


//cleaning
$x = 0;
$alreadyIn = FALSE;
foreach($users as $key => $data) {
list( , $lastvisit) = explode("|", $data);
if(time() - $lastvisit >= $sessionTime * 60) {
$users[$x] = "";
} else {
if(strpos($data, $ip) !== FALSE) {
$alreadyIn = TRUE;
$users[$x] = "$ip|" . time(); //updating
}
}
$x++;
}

if($alreadyIn == FALSE) {
$users[] = "$ip|" . time();
}

//writing
$fp = fopen($dataFile, "w+");
flock($fp, LOCK_EX);
$i = 0;
foreach($users as $single) {
if($single != "") {
fwrite($fp, $single . "\r\n");
$i++;
}
}
flock($fp, LOCK_UN);
fclose($fp);

if($uo_keepquiet != TRUE) {
echo '<div style="padding:5px; margin:auto; background-color:#fff"><b>' . $i . ' visitors online</b></div>';
}

?>

seo
Search Engine Optimization and SEO Tools

stop watch vb2005 send email vb2005 windowsAPI Timer calculator vb2005 audio video vb2005 clock crystal vb ne image slide show vb2005 media player vb2005 cetak vb2005 mainkan Video di vb2008 Check if contents of DataGridView edited by user CheckBox in DataGridView How Can I make Edit for data create an insert SQL table column on datagridview Importing a Text file Loading image files Resizing Form using Timer Update data vb2005 deleting data Splash Screen VB2005 crystal report vb2005 koding-koding contoh project vb2005 implementasikan bahasa pemrograman vb.net mengembangkan vb.net mendownload download secara gratis jual beli uang asing vb

anes 2008