Update och select

Jag har en sida där man kan uppdatera databasen med nya värden. På "update" sidan vill jag även ha en länk där man kan se sina ändringar, här tar det stopp. Koden ser ut så här:

<%
Set fritid = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
fritid.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=d:\sport.mdb"
SQL = "UPDATE adressbok SET Rubrik1_1 = '" & Request.Form("rubrik1_1") & "', Text1_1 = '" & Request.Form("text1_1") & "', Pris1_1 = '" & Request.Form("pris1_1") & "', Url1_1 = '" & Request.Form("url1_1") & "' WHERE Nr = '" & Request("nr") & "'"
fritid.execute(SQL)
%>
För att se din ändringar, 
<a href="update.asp?ID=<%=rs("Kundnr")%>">klicka 
        h&auml;r</a>.
...

Jag vill alltså att länken ska gå vidare till en sida där man ser sina ändringar.
Tack på förhand!

------------------
//Mav

<%
Set fritid = Server.CreateObject("ADODB.Connection")
fritid.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=d:\sport.mdb"
SQL = "UPDATE adressbok SET Rubrik1_1 = '" & Request.Form("rubrik1_1") & "', Text1_1 = '" & Request.Form("text1_1") & "', Pris1_1 = '" & Request.Form("pris1_1") & "', Url1_1 = '" & Request.Form("url1_1") & "' WHERE Nr = '" & Request("nr") & "'"
fritid.execute(SQL)
%>
För att se din ändringar, 
<a href="update.asp?ID=<%=request("nr")%>">klicka 
här</a>.

eller?

------------------
essentitia preter non sans multiplicandum

Tack, såg att jag hade gjort ett helt annat fel som var orsaken.
Tusen tack!

------------------
//Mav