Error !! Can't find data file : $data_file.
"; exit; } else { if ($max_record_in_data_file <> "0") { $f = file($data_file); rsort($f); $j = count($f); if ($j > $max_record_in_data_file) { $rf = fopen($data_file,"w"); if (strtoupper($os)=="UNIX") { if (flock($rf,LOCK_EX)) { for ($i=0; $i<$max_record_in_data_file; $i++) { fwrite($rf,$f[$i]); } flock($rf,LOCK_UN); } } else { for ($i=0; $i<$max_record_in_data_file; $i++) { fwrite($rf,$f[$i]); } } fclose($rf); } } } switch ($do) { case "": $record = file($data_file); rsort($record); $jmlrec = count($record); ?>
 


0) $jml_page++; $no = $page*$max_entry_per_page-$max_entry_per_page; if ($jmlrec == 0) echo ""; $w = 0; //--Color for ($i=0; $i<$max_entry_per_page; $i++) { $no++; $recno = $no-1; if (isset($record[$recno])) { $row = explode("|~|",$record[$recno]); if ($w==0) { $warna = $table_content_1a; $warna2 = $table_content_1b; $w=1; } else { $warna = $table_content_2a; $warna2 = $table_content_2b; $w=0; } echo ""; echo ""; } //--end if } //--end for echo ""; ?>
Click here for registration
There are no entries yet.
$no "; echo "
$row[2]
$row[3]
$row[4]
$row[5]
\"$row[3]'s"; if (trim($row[6]) <> "" && trim($row[6]) <> "http://") { if (ereg("^http://", trim($row[6]))) echo " \"$row[3]'s"; else echo " \"$row[3]'s"; } echo "
"; echo "
  $row[8]
"; echo "
\"Delete
"; if ($jml_page > 1) { if ($page <> 1) echo "[Top] "; else echo "[Top] "; echo "Page # "; if ($jml_page > 10) { if ($page < 5) { $start = 1; $stop = 10; } elseif ($jml_page - $page < 5) { $start = $jml_page - 9; $stop = $jml_page; } else { $start = $page-4; $stop = $page+5; } if ($start <> 1) echo "... "; for ($p=$start; $p<=$stop; $p++) { if ($p == $page) echo "$p  "; else echo "$p  "; } if ($stop <> $jml_page) echo "... "; echo "of $jml_page "; } else { for ($p=1; $p<=$jml_page; $p++) { if ($p == $page) echo "$p  "; else echo "$p  "; } } if ($page <> $jml_page) echo "[Bottom]"; else echo "[bottom]"; } else echo "Page #1 of 1"; echo "


 
 

View recent entries
Know more about Limulator
*Name :        
*Organisation:
*Country :
*Email :
Ph No. :
Website :
Purpose for using software:

* Required fields
Anti-Spam: What is the sum of 7 and 5? :
70) $vname = substr($vname,0,70); if (strlen($vemail) > 100) $vemail = substr($vemail,0,100); if (strlen($vurl) > 150) $vurl = substr($vurl,0,150); if ($vname=="" or $vemail=="" or $vaddress=="" or $vCountry=="") { echo "

Please enter all required fields by clicking here"; exit; } if (!preg_match("/([\w\.\-]+)(\@[\w\.\-]+)(\.[a-z]{2,4})+/i", $vemail)) { echo "

Error !

Invalid email address. Please click here and try again."; exit; } if (trim($vurl) <> "") { if (strtolower(trim($vurl)) <> "http://") { if (!preg_match ("#^http://[_a-z0-9-]+\\.[_a-z0-9-]+#i", $vurl)) { echo "

Error !

Invalid URL format. Please click here and try again."; exit; } } } if ($scheck != "12") { echo "

Wrong Anti-Spam answer. Please click here"; exit; } $test_comment = explode(" ",$vcomment); $jmltest = count($test_comment); for ($t=0; $t<$jmltest; $t++) { if (strlen(trim($test_comment[$t])) > 50) { echo "

Error!

Please don't abuse my guestbook. Click here and try again."; exit; } } //--only 2000 characters allowed for comment, change this value if necessary $maxchar = 2000; if (strlen($vcomment) > $maxchar) $vcomment = substr($vcomment,0,$maxchar)."..."; $idx = date("YmdHis"); $tgl = date("F d, Y - h:i A"); $vname = str_replace("<","",$vname); $vname = str_replace(">","",$vname); $vname = str_replace("~","-",$vname); $vname = str_replace("\"",""",$vname); $vcomment = str_replace("<","<",$vcomment); $vcomment = str_replace(">",">",$vcomment); $vcomment = str_replace("~","-",$vcomment); $vcomment = str_replace("\"",""",$vcomment); $vemail = str_replace("<","",$vemail); $vemail = str_replace(">","",$vemail); $vemail = str_replace("~","-",$vemail); $vemail = str_replace("\"",""",$vemail); $vaddress = str_replace("<","",$vaddress); $vaddress = str_replace(">","",$vaddress); $vaddress = str_replace("~","-",$vaddress); $vaddress = str_replace("\"",""",$vaddress); $vCountry = str_replace("<","",$vCountry); $vCountry = str_replace(">","",$vCountry); $vCountry = str_replace("~","-",$vCountry); $vCountry = str_replace("\"",""",$vCountry); $vphone = str_replace("<","",$vphone); $vphone = str_replace(">","",$vphone); $vphone = str_replace("~","-",$vphone); $vphone = str_replace("\"",""",$vphone); $vurl = str_replace("<","",$vurl); $vurl = str_replace(">","",$vurl); $vurl = str_replace("|","",$vurl); if (strtoupper($os) == "WIN") { $vcomment = str_replace("\r\n","
",$vcomment); $vcomment = str_replace("\r","",$vcomment); $vcomment = str_replace("\n","",$vcomment); } else { $vcomment = str_replace("\n","
",$vcomment); $vcomment = str_replace("\r","",$vcomment); } $ipnum = getenv("REMOTE_ADDR"); $newdata = "|~|$idx|~|$tgl|~|$vname|~|$vaddress|~|$vCountry|~|$vemail|~|$vphone|~|$vcomment|~|$vurl|~|$ipnum|~|\n"; $newdata = stripslashes($newdata); $bagus = true; $cekdata = file($data_file); $jmlcekdata = count($cekdata); if ($jmlcekdata > 0) { rsort($cekdata); if ($jmlcekdata > 2) { $newrow = explode("|~|",$newdata); $jmlentry = 0; for ($c=0; $c<3; $c++) { $cekrow = explode("|~|",$cekdata[$c]); if ($cekrow[4] == $newrow[4] || ($cekrow[3] == $newrow[3] && $cekrow[4] == $newrow[4])) { $jmlentry++; } } $bagus = ($jmlentry < 3) ? true : false; } } if ($bagus) { $tambah = fopen($data_file,"a"); if (strtoupper($os)=="UNIX") { if (flock($tambah,LOCK_EX)) { fwrite($tambah,$newdata); flock($tambah,LOCK_UN); } } else { fwrite($tambah,$newdata); } fclose($tambah); //--SEND MAIL if (strtoupper($notify) == "YES") { $msgtitle = "Someone signed your guestbook"; $vcomment = str_replace(""","\"",$vcomment); $vcomment = stripslashes($vcomment); $vcomment = str_replace("
","\n",$vcomment); $msgcontent = "Local time : $tgl\n\nThe addition from $vname :\n----------------------------\n\n$vcomment\n\n-----End Message-----"; @mail($admin_email,$msgtitle,$msgcontent,"From: $vemail\n"); } } echo "

Thank you, your entry has been added.

Please wait...
"; break; case "del": $record = file($data_file); $jmlrec = count($record); for ($i=0; $i<$jmlrec; $i++) { $row = explode("|~|",$record[$i]); if ($id == $row[1]) { echo " Delete record
Delete Confirmation

$row[2]
$row[3]
- $row[4]

$row[5]

IP : $row[9]
"; break; } } echo "
Admin password :

» Delete all record that using this IP : $row[9]

"; break; case "del2": $pwd = isset($_POST['pwd']) ? trim($_POST['pwd']) : ""; $id = isset($_POST['id']) ? trim($_POST['id']) : ""; $page = isset($_POST['page']) ? $_POST['page'] : 1; $byip = isset($_POST['byip']) ? $_POST['byip'] : ""; if ($pwd <> $admin_password) { echo "

Invalid admin password !

Please wait...
"; exit; } $record = file($data_file); $jmlrec = count($record); for ($i=0; $i<$jmlrec; $i++) { $row = explode("|~|",$record[$i]); if ($byip == "") { if ($row[1] == $id) { $record[$i] = ""; break; } } else { if ($row[7] == $byip) { $record[$i] = ""; } } } $update_data = fopen($data_file,"w"); if (strtoupper($os) == "UNIX") { if (flock($update_data,LOCK_EX)) { for ($j=0; $j<$jmlrec; $j++) { if ($record[$j] <> "") { fputs($update_data,$record[$j]); } } flock($update_data,LOCK_UN); } } else { for ($j=0; $j<$jmlrec; $j++) { if ($record[$j] <> "") { fputs($update_data,$record[$j]); } } } fclose($update_data); echo "

Record has been deleted !

Please wait...
"; break; } //--end switch ?>