www.wohlfahrt.dk/test/home.html
Jeg har implementeret en gæstebog (php) i en html fil. Nu mangler jeg bare at få den til at gemme de indlæg der kommer. er der nogen der kan fortælle mig hvorfor den ikke vil gemme indlæg??
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
   <title>guest</title>
   <meta http-equiv="content-type" content="text/html; charset=iso-8859-1">
   <meta name="generator" content="Incomedia WebSite X5 v5.0.9 - 
www.websitex5.com">
   <meta http-equiv="expires" content="0">
   <meta name="resource-type" content="document">
   <meta name="distribution" content="global">
   <meta name="robots" content="index, follow">
   <meta name="revisit-after" content="1 days">
   <meta name="rating" content="general">
   <meta name="author" content="Henrik">
   <link rel="stylesheet" href="res/main.css">
   <script type="text/javascript" src="res/settings.js"></script>
   <script type="text/javascript" src="res/arrays.js"></script>
   <script type="text/javascript" src="res/engine.js"></script>
</head>
<body leftmargin="0" topmargin="0" background="images/bg.gif">
<table align="center" width="768" border="0" height="100%" cellpadding="0" cellspacing="0">
  <tr> 
    <td height="97" background="images/top.jpg">
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"
  codebase="
http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,79,0" id="Banner" width="768" height="97">
  <param name="movie" value="images/banner.swf">
  <param name="bgcolor" value="#FFFFFF">
  <param name="quality" value="high">
  <param name="allowscriptaccess" value="samedomain">
  <param name="flashvars" value="txt=Jette&Henrik">
  <embed type="application/x-shockwave-flash" pluginspage="
http://www.macromedia.com/go/getflashplayer" width="768" height="97" name="Banner" src="images/banner.swf" bgcolor="#FFFFFF" quality="high" swLiveConnect="true" allowScriptAccess="samedomain" FlashVars="txt=Jette&Henrik">
</embed>
</object>
</td>
  </tr>
  <tr> 
    <td height="24" valign="middle" background="images/bg_menu.gif">
<table cellspacing="0" cellpadding="0" width="642">
   <tr>
      <td width="42"></td>
      <td width="120">
<div class="mainMenu" id="ID_elpage1" onclick="javascript:window.location='home.html';" onmouseover="chgPageStl(1,1)" onmouseout="chgPageStl(0,1)">Home Page</div>
      </td>
      <td width="120">
<div class="mainMenu" id="ID_elmenu1" onclick="javascript:window.location='pg000.html';" onmouseover="popUp('elmenu1',event)" onmouseout="popDown('elmenu1')">Os</div>
      </td>
      <td width="120">
<div class="mainMenu" id="ID_elmenu2" onclick="javascript:window.location='pg003.html';" onmouseover="popUp('elmenu2',event)" onmouseout="popDown('elmenu2')">Adoption</div>
      </td>
      <td width="120">
<div class="mainMenu" id="ID_elmenu3" onclick="javascript:window.location='pg006.html';" onmouseover="popUp('elmenu3',event)" onmouseout="popDown('elmenu3')">Billeder</div>
      </td>
      <td width="120">
<div class="mainMenu" id="ID_elmenu4" onclick="javascript:window.location='pg010.html';" onmouseover="popUp('elmenu4',event)" onmouseout="popDown('elmenu4')">Gæstebog</div>
      </td>
   </tr>
</table>
</td>
  </tr>
  <tr> 
    <td valign="top" background="images/bg_content.gif"><center><br>
<div align="left" id="imTitle" style="width:720">guest</div>
<div style="height:170px; width:720px; position: relative">
<div id="imToolTip"></div>
<div id="7_00" style="position: absolute; overflow: hidden; height:160px; width:720px; top: 0px; left: 0px;">
<table border="0" cellpadding="0" cellspacing="0" width="100%" height="100%" ><tr><td height="100%" valign="top" align="center">
<?php
/*-----------------------------------------------------
COPYRIGHT NOTICE
Copyright (c) 2001 - 2006, Ketut Aryadana
All Rights Reserved
Script name : ArdGuest
Version : 1.8
Website : 
http://www.promosi-web.com/script/guestbook/
Email : aryasmail@yahoo.com.au
Download URL : 
   - 
http://www.promosi-web.com/script/guestbook/download/
   - 
http://www.9sites.net/download/ardguest_1.8.zip
This code is provided As Is with no warranty expressed or implied. 
I am not liable for anything that results from your use of this code.
------------------------------------------------------*/
//--Change the following variables
//Title of your guestbook
  $title = "Velkommen til vores Gæstebog";
//Change "admin" with your own password. It's required when you delete an entry
  $admin_password = "hauser";
//Enter your email here
  $admin_email = "Henrik@wohlfahrt.dk";
//Your website URL
  $home = "
http://www.wohlfahrt.dk";
//Send you an email when someone add your guestbook, YES or NO
  $notify = "YES";
//Your Operating System
//For Windows/NT user : WIN
//For Linux/Unix user : UNIX
  $os = "UNIX";
//Maximum entry per page when you view your guestbook
  $max_entry_per_page = 10;
//Name of file used to store your entry, change it if necessary
  $data_file = "../test/ardgb18.dat";
//Maximum entry stored in data file
  $max_record_in_data_file = 300;
//Maximum entries allowed per session, to prevent multiple entries made by one visitor
  $max_entry_per_session = 2;
//Enable Image verification code, set the value to NO if your web server doesn't support GD lib
  $imgcode = "NO";
//Color & font setting
  $background = "#555555";
  $table_top = "#D3B68E";
  $table_content_1a = "#EDEEE8";
  $table_content_1b = "#E4E4E4";
  $table_content_2a = "#FFF8F0";
  $table_content_2b = "#FFEFDF";
  $table_bottom = "#D3B68E";
  $table_border = "#000000";
  $title_color = "#FFFF00";
  $link = "#0000FF";
  $visited_link = "#0000FF";
  $active_link = "#FF0000";
  $font_face = "verdana";
  $message_font_face = "arial";
  $message_font_size = "2";
//-- Don't change bellow this line unless you know what you're doing
$do = isset($_REQUEST['do']) ? trim($_REQUEST['do']) : "";
$id = isset($_GET['id']) ? trim($_GET['id']) : "";
$page = isset($_GET['page']) ? $_GET['page'] : 1;
$self = $_SERVER['PHP_SELF'];
if (!file_exists($data_file)) {
    echo "<b>Error !!</b> Can't find data file : $data_file.<br>";
   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);
      }
   }
}
$newline = (strtoupper($os) == "WIN") ? "\r\n" : "\n";
switch ($do) {
case "":
   $record = file($data_file);
   rsort($record);
   $jmlrec = count($record);
?>
   <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
   <html>
   <head>
   <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
   </head>
   <body bgcolor="<?=$background?>" link="<?=$link?>" vlink="<?=$visited_link?>" alink="<?=$active_link?>" topmargin="0" marginheight="0" style="font-family:<?=$font_face?>">
   <center>
   
   <table width="600" cellpadding="0" cellspacing="1" border="0">
   <tr bgcolor="<?=$table_border?>">
   <td>
      <table width="100%" cellpadding="4" cellspacing="1" border="0">
      <tr>
       <td bgcolor="<?=$table_top?>" colspan="3" width="100%">
           <font size="2" color="#ffffff"><b>Tryk <a href="<?="$self?do=add_form&page=$page"?>">her</a> for at skrive et indlæg</font></b>
        </td>
     </tr>
<?
      $jml_page = ceil($jmlrec/$max_entry_per_page);
     $nomrec = $page * $max_entry_per_page - $max_entry_per_page;
     $no = $page*$max_entry_per_page-$max_entry_per_page;
      //$no = ($jmlrec - $page * $max_entry_per_page) + $max_entry_per_page + 1;
      if ($jmlrec == 0) {
        echo '<tr><td colspan="3" bgcolor="#FFE1E1" align="center"><font size="3">Der er ikke nogle indlæg.</font></td></tr>';
     }
      $w = 0; //--Color
        for ($i=0; $i<$max_entry_per_page; $i++) {
         $nomrec++;
         $no++;
          //$no--;
          $recno = $nomrec-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 "<tr>
                    <td bgcolor=\"$warna2\" align=\"center\" valign=\"top\" width=\"15\">
                    <font size=\"2\">$no</font>
                  </td>
                  <td bgcolor=\"$warna\" width=\"570\">
                  <table border=\"0\" width=\"100%\">
                  <tr>
                   <td>
                    <font size=\"1\">$row[2]</font><br>
                   <font size=\"2\"><b>$row[3]</b></font>
                  </td>
               ";
               echo "<td align=\"right\" valign=\"top\">";
                  if (trim($row[4]) != "") {
                     echo "<a href=\"mailto:$row[4]\"><img src=\"imgs/email.gif\" border=\"0\" alt=\"$row[4]\"></a>";
                  }
                     if (trim($row[6]) != "" && trim($row[6]) != "
http://") {
                           if (ereg("^
http://", trim($row[6]))) echo " <a href=\"$row[6]\" target=\"_blank\"><img src=\"imgs/homepage.gif\" border=\"0\" alt=\"$row[6]\"></a>";
                           else echo " <a href=\"
http://$row[6]\" target=\"_blank\"><img src=\"imgs/homepage.gif\" border=\"0\" alt=\"$row[6]\"></a>";
                     }
            echo '</td></tr></table>';
            echo "<br><table border=\"0\" width=\"100%\">
                  <tr><td width=\"5\"> </td><td>
                  <font size=\"2\" face=\"$message_font_face\" size=\"$message_font_size\">".stripslashes($row[5])."</font>
                </td></tr>
                     </table>
                 ";
            echo '</td>';
            echo "<td valign=\"top\" bgcolor=\"$warna2\" align=\"center\" width=\"15\">
                  <a href=\"$self?do=del&id=$row[1]&page=$page\">
                <img src=\"imgs/del.gif\" alt=\"Delete entry # $no\" border=0 align=\"center\"></a>
                </td>
                </tr>";
         } //--end if      
        } //--end for
      echo "<tr><td colspan=\"3\" bgcolor=\"$table_bottom\" align=\"center\" width=\"600\"><font size=\"2\">";          
      if ($jml_page > 1) {      
        if ($page != 1) echo "[<a href=\"$self?page=1\">Top</a>] "; else echo '[Top] ';
         echo 'Side # ';
          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 "<font color=\"$active_link\"><b>$p</b></font>  ";
              else echo "<a href=\"$self?page=$p\">$p</a>  ";
              }
            if ($stop != $jml_page) echo '... ';              
            echo "of $jml_page ";
          } else {
              for ($p=1; $p<=$jml_page; $p++) {
                 if ($p == $page) echo "<font color=\"$active_link\"><b>$p</b></font>  ";
               else echo "<a href=\"$self?page=$p\">$p</a>  ";
              }
         }      
          if ($page != $jml_page) echo "[<a href=\"$self?page=$jml_page\">Bottom</a>]";
        else echo '[bottom]'; 
      } else echo 'Side # 1 af 1';
     echo '</font></td></tr>';
?>
        </table>        
      </td>
      </tr>
      </table>
      <br>
      
   </center>
   </body>
   </html>
<?
break;
case "add_form":
$_SESSION['secc'] = strtoupper(substr(sha1(time().$admin_email),0,4));
if (!isset($_SESSION['add'])) $_SESSION['add'] = 0;
if (!isset($_SESSION['name'])) $_SESSION['name'] = "";
if (!isset($_SESSION['email'])) $_SESSION['email'] = "";
if (!isset($_SESSION['url'])) $_SESSION['url'] = "
http://";
if (!isset($_SESSION['comment'])) $_SESSION['comment'] = "";
?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
<title><?=$title?></title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="<?=$background?>" style="font-family:<?=$font_face?>">
<div align="center"> 
  <font size="5" color="<?=$title_color?>"><b><?=$title?></b></font><br>
  <font size="1"><b><a href="<?=$home?>"><font color="<?=$title_color?>">Home</font></a> :: <a href="<?=$self?>"><font color="<?=$title_color?>">View entry</font></a></b></font>
  <br><br>
  <form method="post" action="<?=$self?>">
  <input type="hidden" name="do" value="add">
    <table width="500" border="0" cellspacing="0" cellpadding="0" bgcolor="<?=$table_border?>">
      <tr>
      <td>
        <div align="center">
            <table width="100%" border="0" cellspacing="1" cellpadding="5">
              <tr bgcolor="<?=$table_content_1a?>"> 
                <td width="28%"> 
                  <div align="right"><font size="2">*Name : </font></div>
                </td>
                <td width="72%"> 
                  <input type="text" name="vname" size="30" maxlength="70" value="<?=$_SESSION['name']?>">
                </td>
              </tr>
              <tr bgcolor="<?=$table_content_1a?>"> 
                <td width="28%"> 
                  <div align="right"><font size="2">Email : </font></div>
                </td>
                <td width="72%"> 
                  <input type="text" name="vemail" size="30" maxlength="100" value="<?=$_SESSION['email']?>">
                </td>
              </tr>
              <tr bgcolor="<?=$table_content_1a?>"> 
                <td width="28%"> 
                  <div align="right"><font size="2">Website : </font></div>
                </td>
                <td width="72%"> 
                  <input type="text" name="vurl" size="30" maxlength="150" value="<?=$_SESSION['url']?>">
                </td>
              </tr>
              <tr bgcolor="<?=$table_content_1a?>"> 
                <td valign="top" width="28%"> 
                  <div align="right"><font size="2">*Comment : </font></div>
                </td>
                <td width="72%"> 
                  <textarea name="vcomment" cols="40" rows="7" wrap="virtual"><?=$_SESSION['comment']?></textarea>
              <br><font size="1">* Required field</font>
                </td>
              </tr>
           <?if (strtoupper($imgcode) == "YES") {?>
              <tr bgcolor="<?=$table_content_1a?>"> 
                <td width="28%"> 
                  <div align="right"><font size="2">Verification Code :</font></div>
                </td>
                <td width="72%"> 
                  <font size="1">Please retype this code below :</font>
              <img src="/test/image.php?<?=time()?>" border="1"><br>
              <input type="text" name="vsecc" size="4" maxlength="4">
                </td>
              </tr>
           <?}?>
              <tr bgcolor="<?=$table_content_1b?>"> 
                <td colspan="2"> 
                  <div align="center">
                    <font size="2">
                    <input type="submit" value="Submit">
                    <input type="reset" value="Reset">
               <input type="button" value="Back" onclick="window.location='<?="$self?page=$page"?>'">
                    </font>
               </div>
                </td>
              </tr>
            </table>
        </div>
      </td>
    </tr>
  </table>
  </form>
</div>
</body>
</html>
<!-- End of entry form -->
<?php
break;
case "add":
   $vname = isset($_POST['vname']) ? trim($_POST['vname']) : "";
   $vemail = isset($_POST['vemail']) ? trim($_POST['vemail']) : "";
   $vurl = isset($_POST['vurl']) ? trim($_POST['vurl']) : "";
   $vcomment = isset($_POST['vcomment']) ? trim($_POST['vcomment']) : "";
   $vsecc = isset($_POST['vsecc']) ? strtoupper($_POST['vsecc']) : "";
   if (strlen($vname) > 70) $vname = substr($vname,0,70);
   if (strlen($vemail) > 100) $vemail = substr($vemail,0,100);
   if (strlen($vurl) > 150) $vurl = substr($vurl,0,150);
   $_SESSION['name'] = $vname;
   $_SESSION['email'] = $vemail;
   $_SESSION['url'] = $vurl;
   $_SESSION['comment'] = stripslashes($vcomment);
   if ($vname == "" || $vcomment == "") {
      input_err("You may left some fields.");
   }
   if ($vemail != "" && !preg_match("/([\w\.\-]+)(\@[\w\.\-]+)(\.[a-z]{2,4})+/i", $vemail)) {
      input_err("Invalid email address.");
   }
   if ($vurl != "" && strtolower($vurl) != "
http://") {
       if (!preg_match ("#^
http://[_a-z0-9-]+\\.[_a-z0-9-]+#i", $vurl)) {
         input_err("Invalid URL format.");
       }
   }
   $test_comment = preg_split("/[\s]+/",$vcomment);
   $jmltest = count($test_comment);
   for ($t=0; $t<$jmltest; $t++) {
      if (strlen(trim($test_comment[$t])) > 70) {
        input_err("Invalid word found on your entry : ".stripslashes($test_comment[$t]));
     }
   }
   if (isset($_SESSION['add']) && $_SESSION['add'] >= $max_entry_per_session) {
      input_err("Sorry, only $max_entry_per_session message(s) allowed per session.",false);
   } elseif (!isset($_SESSION['add'])) {
      exit;
   }
   if ($vsecc != $_SESSION['secc'] && strtoupper($imgcode) == "YES") {
      input_err("Invalid verification code");
   }
   //--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);
   $vurl = str_replace("|","",$vurl);
   $vemail = str_replace("<","",$vemail);
   $vemail = str_replace(">","",$vemail);
   $vemail = str_replace("|","",$vemail);
   if (strtoupper($os) == "WIN") {
      $vcomment = str_replace($newline,"<br>",$vcomment);
      $vcomment = str_replace("\r","",$vcomment);
      $vcomment = str_replace("\n","",$vcomment);
   } else {
      $vcomment = str_replace($newline,"<br>",$vcomment);
      $vcomment = str_replace("\r","",$vcomment);
   }
   if (isset($_SERVER['HTTP_X_FORWARDED_FOR']) && eregi("^[0-9]{1,3}\\.[0-9]{1,3}\\.[0-9]{1,3}\\.[0-9]{1,3}$",$_SERVER['HTTP_X_FORWARDED_FOR'])) {
       $ipnum = $_SERVER['HTTP_X_FORWARDED_FOR'];
   } else {
       $ipnum = getenv("REMOTE_ADDR");
   }
   $newdata = "|~|$idx|~|$tgl|~|$vname|~|$vemail|~|$vcomment|~|$vurl|~|$ipnum|~|";
   $newdata = stripslashes($newdata);
   $newdata .= $newline;
   if (!is_spam($newdata)) {
      $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("<br>","\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");
      }
      //--clear session
      $_SESSION['name'] = "";
      $_SESSION['email'] = "";
      $_SESSION['url'] = "
http://";
      $_SESSION['comment'] = "";
      $_SESSION['add']++;
      $_SESSION['secc'] = "";
      redir($self,"Thank you, your entry has been added.");
   } else {
      redir($self,"Sorry, your entry can't be added into the guestbook.");
   }
break;
case "del":
   $record = file($data_file);
   $jmlrec = count($record);
   for ($i=0; $i<$jmlrec; $i++) {
       $row = explode("|~|",$record[$i]);
      if ($id == $row[1]) {
         ?>
        <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
        <html>
        <head>
        <title>Delete record</title>
        <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
        </head>
        <body bgcolor="<?=$background?>" style="font-family:<?=$font_face?>">
        <center>
        <font size="4" color="<?=$title_color?>">Delete Confirmation</font>
        <br><br>
        <table border="0" cellpadding="5" cellspacing="1" width="450">
         <tr>
         <td bgcolor="<?=$table_top?>">
            <font size="2">
         <font size="1"><b><?=$row[2]?></font><br><?=$row[3]?></b> - <a href="mailto:<?=$row[4]?>"><?=$row[4]?></a>
         <br><br><?=$row[5]?>
         <br><br><font size="1">IP : <?=$row[7]?></font>
         </font> 
         </td>
         </tr>
        </table>
        <form action="<?=$self?>" method="post">
           <input type="hidden" name="do" value="del2">
           <input type="hidden" name="id" value="<?=$id?>">
           <input type="hidden" name="page" value="<?=$page?>">
           <font color="<?=$title_color?>" size="2"><b>Admin password : </b></font> <input type="password" name="pwd">
           <br><br>
           <font size="2" color="<?=$title_color?>"><b>»</b><input type="checkbox" name="byip" value="<?=$row[7]?>"> Delete all records that using this IP : <?=$row[7]?></font>
           <br><br>
           <input type="submit" value="Delete"> <input type="button" value="Cancel" onclick="window.location='<?="$self?page=$page"?>'">
        </form>
        </center>
        </body>
        </html>
        <?
      }
   }      
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) {
        redir("$self?page=$page","Invalid admin password !");
   }
   $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);
   redir("$self?page=$page","Record has been deleted !");
break;
} //--end switch
function redir($target,$msg) {
global $background,$font_face,$title_color;
?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
<meta http-equiv="refresh" content="1; url=<?=$target?>">
</head>
<body bgcolor="<?=$background?>">
<center><font color="<?=$title_color?>" face="<?=$font_face?>"><h3><?=$msg?></h3>Please wait...</font></center>
</body>
</html>
<?
exit;
}
function input_err($err_msg,$linkback=true) {
global $background,$font_face;
?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
<title>Error !</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="<?=$background?>">
<center>
<br>
<table border="1" bgcolor="#000000" cellspacing="0" cellpadding="6">
<tr>
   <td bgcolor="#FFCC00" align="center">
      <font size="3" color="#000000" face="<?=$font_face?>"><b><?=$err_msg?></b><br>
      <?if ($linkback) {?>
      <font size="2">Click <a href="javascript:history.back()">here</a> and try again.</font>
       <?}?>
      </font>
   </td>
</tr>
</table>
</center>
</body>
</html>
<?php
exit;
}
function is_spam($string) {
   $data = "spamwords.dat";
   $is_spam = false;
   if (file_exists($data)) {
      $spamword = file($data);
      $jmlrec = count($spamword);
      for ($i=0; $i<$jmlrec; $i++) {
         $spamword[$i] = trim($spamword[$i]);
         if (eregi($spamword[$i],$string)) {
            $is_spam = true;
            break;
         }
      }
   }
   return $is_spam;
}
?></td></tr></table></div>
</div>
</center></td>
  </tr>
  <tr align="center" > 
    <td height="40" valign="middle" background="images/bg_bottom.gif"> 
      <table width="95%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td valign="top">  
          </td>
          <td align="right" valign="top"><a class="footer" href="mailto:henrik@wohlfahrt.dk"><img src="images/im_email.gif" width="17" height="14" border="0"> henrik@wohlfahrt.dk</a>  
          </td>
        </tr>
      </table></td>
  </tr>
</table>
</body>
</html>