Følgende er taget fra
www.html.dk (\"lang\" tilføjet i where clause):
<html>
<title>Hente data fra database</title>
<head>
</head>
<body>
<dl>
<%
\' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = DSN & \"DBQ=\" & Server.MapPath (\"/cgi-bin/database.mdb\")
Conn.Open DSN
\' Hent fra databasen afhængig af værdien id fra URL
strSQL = \"Select * From personer Where Id = \" & Request.Querystring(\"lang\")
Set rs = Conn.Execute(strSQL)
\' Skriv personens data
Response.Write \"<dt>Navn:</dt><dd>\" & rs(\"Fornavn\") & \" \" & rs(\"Efternavn\") & \"</dd>\"
Response.Write \"<dt>Telefon:</dt><dd>\" & rs(\"Telefon\") & \"</dd>\"
Response.Write \"<dt>Fødselsdato:</dt><dd>\" & FormatDateTime(rs(\"Foedselsdato\"), vbLongDate) & \"</dd>\"
Conn.Close
Set Conn = Nothing
%>
</dl>
<p><a href=\"liste.asp\">Retur til listen</a></p>
</body>
</html>
/Claus