hent data fra tabel ved hjælp af en Request.Querystring("kode")

Er der nogle der kan hjælpe mig?
Jeg kan sipelhen ikke få mit script til at hente min brugers data ud fra cellen "kode"??
Jeg kan godt hvis der henter fra fra cellen "Id"(dette felt er også primære nøglen).

jeg vil også gerne have den løber hele tabellen igennem og siger at der ikke er nogle personer med den kode. hvis den når EOF.

If Request.Querystring("kode") = "" then %>

<form method="get"><input type="text" name="kode"><input type="submit" value="send"></form>
<%
else


Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("db.mdb")
Conn.Open DSN

strSQL = "Select * From tabel where kode = " & Request.Querystring("kode")
Set rs = Conn.Execute(strSQL)   
   


Response.Write "<dt>Navn:</dt><dd>" & rs("fornavn") & " " & rs("efternavn") & "</dd>"
Response.Write "<dt>Telefon:</dt><dd>" & rs("tlf") & "</dd>"




Conn.Close
Set Conn = Nothing

end if
%>


Håber der er nogle der kan hjælpe!