UPS
Sådan:
<%
response.expires = -1
if len(Session(\"ip\")) = 0 then
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"database.mdb\") & \";UID=admin;PWD=;\"
Set rs2 = Server.CreateObject(\"ADODB.RecordSet\")
rs2.Open \"Select * From jwgbog\", Conn, 1, 3
rs2.AddNew
rs2(\"navn\") = Request.form(\"navn\")
rs2(\"efternavn\") = Request.form(\"efternavn\")
rs2(\"land\") = Request.form(\"land\")
rs2(\"icq\") = Request.form(\"icq\")
rs2(\"kommetare\") = Request.form(\"kommetare\")
rs2(\"email\") = Request.form(\"email\")
rs2(\"url\") = Request.form(\"url\")
rs2(\"pic\") = Request.form(\"pic\")
rs2(\"kl\") = time()
rs2(\"dato\") = date()
rs2(\"ip\") = Request.ServerVariables(\"REMOTE_ADDR\")
rs2.Update
rs2.Close
Set rs2 = Nothing
Session(\"ip\") = request.servervariables(\"REMOTE_ADDR\")
end if
set rscount = conn.execute(\"select count(id) as antal from jwgbog\")
antal = rscount(\"antal\")
set rscount = nothing
%>
<html>
<head>
<title>JWgbog 1.0 ASP</title>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-1\">
<link rel=\"stylesheet\" href=\"styles.css\" type=\"text/css\">
</head>
<body bgcolor=\"#FFFFFF\" text=\"#000000\">
<table border=\"0\" width=\"700\" bgcolor=\"#000000\" cellspacing=\"1\" cellpadding=\"0\" align=\"center\">
<tr>
<td width=\"100%\" bgcolor=\"#FFFFFF\" valign=\"top\">
<table width=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"3\">
<tr bgcolor=\"#FFFFFF\">
<td width=\"50%\"><font size=\"5\"><b><font face=\"Verdana, Arial, Helvetica, sans-serif\">JWgbog
1.0 ASP</font></b></font></td>
<td align=\"right\" valign=\"bottom\" nowrap width=\"50%\">
<div align=\"right\"><font size=\"2\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\"></font></font>
<table border=\"0\" cellspacing=\"0\" cellpadding=\"0\" width=\"200\">
<tr>
<td align=\"right\">
<div align=\"right\"><font size=\"2\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">last
entry:<br>
<b>5/12/2001 7:32:38 PM</b></font></font><font face=\"Verdana, Arial, Helvetica, sans-serif\"><b></b></font></div>
</td>
</tr>
</table>
</div>
</td>
</tr>
</table>
</td>
</tr>
</table>
<table border=\'0\' cellspacing=\'0\' cellpadding=\'0\' width=\'700\' align=\"center\" height=\"19\">
<tr>
<td width=\'1\' valign=\'top\' bgcolor=\'#000000\'><img src=\"images/intet.gif\" width=\'1\'></td>
<td width=\'698\' valign=\'top\' bgcolor=\'#f7f7f7\'>
<table width=\"100%\" border=\"0\" cellspacing=\"4\" cellpadding=\"0\">
<tr>
<td width=\"50%\"><font face=\"Verdana, Arial, Helvetica, sans-serif\"><b><font size=\"2\"><a href=\"index.asp\">Hjem</a>
</font><font face=\"Verdana, Arial, Helvetica, sans-serif\"><b><font face=\"Verdana, Arial, Helvetica, sans-serif\"><b><font size=\"2\">|
<a href=\"add.asp\">Tilføj</a></font></b></font></b></font><font size=\"2\">
| <a href=\"guestbook.asp\">Vis Gæstebogen</a></font></b></font>
</td>
<td width=\"50%\">
<div align=\"right\"><b><font size=\"2\" face=\"Verdana, Arial, Helvetica, sans-serif\">Skrevet
i min gæstbog: <b><%=antal%></b></font> <font face=\"Verdana, Arial, Helvetica, sans-serif\" size=\"1\"></font></b></div>
</td>
</tr>
</table>
</td>
<td width=\'1\' valign=\'top\' bgcolor=\'#000000\'><img src=\"intet.gif\" width=\'1\'></td>
</tr>
</table>
<table border=\"0\" width=\"700\" bgcolor=\"#000000\" cellspacing=\"1\" cellpadding=\"0\" align=\"center\">
<tr>
<td bgcolor=\"#FFFFFF\" valign=\"top\" colspan=\"2\">
<div align=\"center\"> <br>
<form action=\"tilfoj.asp\" method=\"post\">
<br>
<table width=\"400\" border=\"0\" cellspacing=\"1\" cellpadding=\"3\" class=\"1px_ganz\" align=\"center\" bgcolor=\"#f7f7f7\">
<tr>
<td width=\"134\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">Dit
Navn <span class=\"rot\"> *</span><font color=\"#666666\"> </font>
</font><br>
<input type=\"text\" name=\"navn\" maxlength=\"100\" class=\"1px_ganz\">
</td>
<td width=\"251\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">Efternavn</font><span class=\"rot\"><br>
<input type=\"text\" name=\"efternavn\" maxlength=\"100\" class=\"1px_ganz\">
</span></td>
</tr>
<tr>
<td width=\"134\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">Land</font><br>
<input type=\"text\" name=\"land\" maxlength=\"100\" class=\"1px_ganz\">
</td>
<td width=\"251\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">
Icq</font><span class=\"rot\"><br>
<input type=\"text\" name=\"icq\" maxlength=\"100\" class=\"1px_ganz\">
</span></td>
</tr>
<tr>
<td colspan=\"2\" height=\"2\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">Billder:</font>
<input type=\"radio\" value=\"1\" checked name=\"pic\">
<img src=\"1.gif\" align=\"middle\">
<input type=\"radio\" name=\"pic\" value=\"2\">
<img src=\"2.gif\" align=\"middle\">
<input type=\"radio\" name=\"pic\" value=\"3\">
<img src=\"3.gif\" align=\"middle\">
<input type=\"radio\" name=\"pic\" value=\"4\">
<img src=\"4.gif\" align=\"middle\">
<input type=\"radio\" name=\"pic\" value=\"5\">
<img src=\"5.gif\" align=\"middle\"></td>
</tr>
<tr>
<td colspan=\"2\" height=\"167\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">
Kommetare<span class=\"rot\">*</span><font color=\"#666666\"> </font></font><br>
<textarea name=\"kommetare\" cols=\"50\" rows=\"8\" class=\"1px_ganz\"></textarea>
</td>
</tr>
<tr>
<td width=\"134\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">Email<span class=\"rot\">
</span></font><span class=\"rot\"><br>
<input type=\"text\" name=\"email\" maxlength=\"100\" class=\"1px_ganz\" size=\"15\">
</span></td>
<td width=\"251\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">Hjemmeside</font><span class=\"rot\"><font face=\"Verdana, Arial, Helvetica, sans-serif\"><br>
<input type=\"text\" name=\"url\" value=\"
http://\" maxlength=\"100\" class=\"1px_ganz\" size=\"15\">
</font></span></td>
</tr>
<tr>
<td colspan=\"2\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\"><span class=\"rot\">
</span></font>
<table border=\"0\" cellspacing=\"0\" cellpadding=\"0\" width=\"200\">
<tr>
<td align=\"left\">
<div align=\"left\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\"><span class=\"rot\">
*</span><font color=\"#666666\"> = Skal indtastes</font></font></div>
</td>
</tr>
</table>
</td>
</tr>
</table>
<br>
<b><font size=\"2\" face=\"Verdana, Arial, Helvetica, sans-serif\" class=\"mehr_platz\">
</font></b> <br>
<table border=\"0\" cellspacing=\"0\" cellpadding=\"0\" width=\"400\">
<tr>
<td>
<div align=\"center\"><font face=\"Verdana, Arial, Helvetica, sans-serif\"><b>
<input type=\"Submit\" value=\"Tilføj\" name=\"Submit\">
<input type=\"Reset\" value=\"Slet Alt\" name=\"Reset\">
</b></font></div>
</td>
</tr>
</table>
<br>
</form>
</div>
</td>
</tr>
</table>
</body>
</html>