Så här ser koden ut:
<%
Response.Buffer = True
Response.Expires = -1
Response.AddHeader "Pragma", "no-cache"
Response.AddHeader "cache-control", "no-store"
%>
<%
Set connection = server.createObject("adodb.connection")
connection.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("db/medlemmar.mdb") & ";"
%>
<head>
<title></title>
<base target="top">
</head>
<body bgcolor="#F3F3F3">
<table border="0" width="100%" height="12">
<tr>
<td width="81%" height="1" bgcolor="#008000"> <font face="Verdana" size="1"><b><font color="#FFFFFF">Välkommen
</font><%=Session (SiteID + "namn")%></b></font></td>
<td width="19%" height="1" bgcolor="#008000"><font color="#FFFFFF" size="1" face="Verdana"><b> 10
Senaste medlemmarna</b></font></td>
</tr>
<tr>
<td width="81%" height="26"></td>
<td width="19%" height="98"><font size="5" face="Verdana"><b><%=SELECT TOP 10 * FROM anvandare ORDER BY id_nr
DESC%></b></font>
</td>
</tr>
</table>