<?
include("gbsrc.php");
echo "$rules<br>\n
<table align=\"center\" width=\"90%\">
<center><font size=\"2\" face=\"Verdana, Arial, Helvetica, sans-serif\"> \n</center>";
if ($bozo = "yes") echo "";
echo "
<form>
<tr><td><div align=\"left\"><font size=\"2\" face=\"Verdana\">Navn:</td>
<td><input type=\"text\" name=\"name\" value=\"$name\" class=search size=30></td></tr>
<tr><td><font size=\"2\" face=\"Verdana\">eMail:</td>
<td><input type=\"text\" name=\"email\" value=\"$email\" class=search size=30></td></tr>
<tr><td><font size=\"2\" face=\"Verdana\">url:</td>
<td><input type=\"text\" name=\"url\" value=\"$url\" class=search size=30></td></tr>
<tr><td><font size=\"2\" face=\"Verdana\">$cap_msg:</td>
<td><textarea name=\"message\" class=search cols=30 rows=5>".$message."</textarea></td></tr>
<tr><td><div align=\"left\">
<input type=\"hidden\" name=\"edit\" value=\"yes\">
<input type=\"submit\" value=$cap_submit border=0>
</div></td></tr>
</form>
</table>
";
?>
<br><br>
<?
echo $entrytext;
if (!file_exists($filelocation)) {
$newfile = fopen($filelocation,"w+");
fclose($newfile);
echo $cap_noentry;
}
$newfile = fopen($filelocation,"r");
$content = fread($newfile, filesize($filelocation));
fclose($newfile);
$content=stripslashes($content);
$lines = explode("%",$content);
$rev=array();
for ($i=sizeof($lines)-1;$i>0;$i--){array_push($rev,$lines[$i]);}
$lines=$rev;
while(list($key)= each ($lines)){
$urladd="";
$mailadd="";
$user = explode("#",$lines[$key]);
if ($user[1] != ""){$mailadd="<a href=\"mailto:".$user[1]."\" class=asm><font size=\"1\" face=\"Verdana\">email</a>";}
if ($user[2] != ""){
if (substr($user[2],0,7)!= "
http://"){
$user[2]="
http://".$user[2];}
$urladd="<a href=\"".$user[2]."\" target=\"_blank\"class=asm><font size=\"1\" face=\"Verdana\">Hjemmeside</a>";
}
echo "<table align=\"center\" width=\"90%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">
<tr bgcolor=\"$col_tb\">
<td colspan=\"2\"><font size=\"2\" face=\"Verdana\"><i>";
echo "<dl><b>$user[0]</b> $mailadd $urladd ($user[3])";
echo "</i></font></td>
</tr>
<tr>
<td width=\"8%\"><font size=\"2\" face=\"Verdana\"></font></td>
<td width=\"100%\"><font size=\"2\" face=\"Verdana\">";
echo "
$user[4]\n</dl>";
echo "<br>
</font></td>
</tr>
</table>";
}
?>