En vild en

Jeg her et problem

Jeg har oprettet en \"personaleside\" via en \"Access DB\" hvor navn, gade, by telefon osv. stilles op under hinanden i hver sin celle, så de er visuelle for dem som har logget ind. Der kan i øjeblikket tilføjes og slettes en person.

Mit problem ligger i at der ikke kan rettes.

Dette implementeres i en celle:
<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = DSN & \"DBQ=\" & Server.MapPath (\"../log/personale.mdb\")
Conn.Open DSN

strSQL = \"Select * From users Order by Username\"
Set rs = Conn.Execute(strSQL)

Do
Response.Write \"<tr><td>\"& rs(\"Username\") & \" &nbsp; \" & rs(\"Efternavn\") & \"</td></tr>\"
rs.MoveNext

Loop While Not rs.EOF
Conn.Close
Set Conn = Nothing
%>

ok...

Via \"Response.Write......\" indsættes alle navne og efternavne i cellen under hinanden.
Det ville være behjælpeligt hvis man kunne klikke på et af navnene og derfra ville kunne hoppe direkte over til \"rettesiden\" (personale/ret.asp) som er en form med alle felter.

Min form ser sådan ud:
<form name=\"form2\" method=\"post\" form action=\"retperson.asp?id=<%=Rs(\"id\")%>\">

...og her det første felt i formen
<input type=\"text\" name=\"Username\" size=\"30\" maxlength=\"50\" value=\"<%=Rs(\"Username\")%>\">

Der er kludder i den. \"Action=...\" pejer ikke på en person men et ID. Den skal peje på den person man har kilkket på...

Min retperson.asp:
<% response.buffer = true %>

<%
strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"../../log/personale.mdb\")
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open strDSN
%>

<%
sql = \"UPDATE users SET Dato = \'\" & request.form(\"Dato\") & \"\'\"
sql = sql & \", Username= \'\" & request.form(\"Username\") &\"\'\"
sql = sql & \", Efternavn= \'\" & request.form(\"Efternavn\") & \"\'\"
sql = sql & \", Gade= \'\" & request.form(\"Gade\") &\"\'\"
sql = sql & \", By= \'\" & request.form(\"By\") &\"\'\"
sql = sql & \", Telefon= \'\" & request.form(\"Telefon\") &\"\'\"
sql = sql & \", Login= \'\" & request.form(\"Login\") &\"\'\"
sql = sql & \", Email= \'\" & request.form(\"Email\") &\"\'\"
sql = sql & \"WHERE Id = \" & request(\"ID\")
Conn.Execute (sql)
Conn.Close
%>

<% response.redirect (\"../personale2.asp\")%>

Mit er altså jeg ikke kan rette
Hvis dette ikke er nok kan jeg godt ligge mere info...