* * 1066.net's 35,000 images and 5000+ pages created and curated over 20 years remain open and largely unchanged as a tribute to its webmaster Ion Castro, who passed away Aug 30th 2018 from cancer. Linking to content is fine but PLEASE get permission if you want to re use anything from here, and thank you. * Ion's obituaries are (Link:) Here
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); ?> <?echo "$title"?> " link="" vlink="" alink="" topmargin="0" marginheight="0">

">

 


">(:: ">">Home ::)

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 to sign the guestbook ">Contact webmaster
There is no entry yet.
$no "; echo "
$row[2]
$row[3] from $row[5]
\"$row[3]'s"; if (trim($row[7])<>"" and trim($row[7])<>"//") { if (ereg("^//", trim($row[7]))) echo " \"$row[3]'s"; else echo " \"$row[3]'s"; } echo "
"; echo "
  $row[6]
"; echo "
Delete entry # $no
"; 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 "

" SIZE=1>">Ard Guestbook 1.6

<?echo "$title"?>

 

the 1066 network

 

">
">
">">Home :: ">">View entry
"> ">
"> "> "> "> "> ">
*Name :
*Email :
Website :
*Country :
*Comment :

* Required field
'">
70) $vname = substr($vname,0,70); } if (isset($_POST["vemail"])) { $vemail = $_POST["vemail"]; if (strlen($vemail) > 100) $vemail = substr($vemail,0,100); } if (isset($_POST["vurl"])) { $vurl = $_POST["vurl"]; if (strlen($vurl) > 150) $vurl = substr($vurl,0,150); } if (isset($_POST["vcountry"])) { $vcountry = $_POST["vcountry"]; if (strlen($vcountry) > 50) $vcountry = substr($vcountry,0,50); } if (isset($_POST["vcomment"])) $vcomment = $_POST["vcomment"]; } else if (!empty($HTTP_POST_VARS)) { if (isset($HTTP_POST_VARS["vname"])) { $vname = $HTTP_POST_VARS["vname"]; if (strlen($vname) > 70) $vname = substr($vname,0,70); } if (isset($HTTP_POST_VARS["vemail"])) { $vemail = $HTTP_POST_VARS["vemail"]; if (strlen($vemail) > 100) $vemail = substr($vemail,0,100); } if (isset($HTTP_POST_VARS["vurl"])) { $vurl = $HTTP_POST_VARS["vurl"]; if (strlen($vurl) > 150) $vurl = substr($vurl,0,150); } if (isset($HTTP_POST_VARS["vcountry"])) { $vcountry = $HTTP_POST_VARS["vcountry"]; if (strlen($vcountry) > 50) $vcountry = substr($vcountry,0,50); } if (isset($HTTP_POST_VARS["vcomment"])) $vcomment = $HTTP_POST_VARS["vcomment"]; } if (trim($vname)=="" or trim($vcomment=="") or trim($vemail)=="") { echo "

Error !

You may left some fields. Please click here and try again."; 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)) <> "//") { if (!preg_match ("#^//[_a-z0-9-]+\\.[_a-z0-9-]+#i", $vurl)) { echo "

Error !

Invalid URL format. Please click here and try again."; exit; } } } $test_comment = explode(" ",$vcomment); $jmltest = count($test_comment); for ($t=0; $t<$jmltest; $t++) { if (strlen(trim($test_comment[$t])) > 35) { 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); $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); } if (preg_match("/[^a-z ]/i",$vcountry)) $vcountry = "..."; $newdata = "\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] or ($cekrow[3] == $newrow[3] and $cekrow[5] == $newrow[5])) $jmlentry++; } if ($jmlentry < 3) $bagus = true; else $bagus = 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 = "1066.net 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]
from $row[5]
$row[4]

$row[6]

"; break; } } echo "
Admin password :

"; break; case "del2": if (isset($_POST["pwd"])) $pwd = $_POST["pwd"]; else if (isset($HTTP_POST_VARS["pwd"])) $pwd = $HTTP_POST_VARS["pwd"]; if (isset($_POST["id"])) $id = $_POST["id"]; else if (isset($HTTP_POST_VARS["id"])) $id = $HTTP_POST_VARS["id"]; if (isset($_POST["page"])) $page = $_POST["page"]; else if (isset($HTTP_POST_VARS["page"])) $page = $HTTP_POST_VARS["page"]; 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 ($id==$row[1]) { $record[$i] = ""; break; } } $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 ?>