Hente en information / ASP / ACCES

Jeg har min opret.asp og indsaet.asp og dinside.asp
På opret.asp er der forms hvor man kan skrive brugernavn, email osv.. og indsaet.asp udfører den kommandoen og indsaetter til databasen.
Alt dette fungerer fint. Men når den så har oprettet brugeren vil jeg have den til at udskrive et link hvor den skriver: "Gå til din start side" og den så smider én hen på siden dinside.asp?UserID= <-- Her skal så være ID'et på brugeren som den netop har oprettet i databasen.

Her er koden som jeg har indtil videre:
----------------------------------------

<%
' 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("database.mdb")
Conn.Open DSN

' SQL sætning opbygges
strSQL = "Insert into bruger ("

strSQL = strSQL & "profil, "
strSQL = strSQL & "adgangskode, "
strSQL = strSQL & "adgangskode_bekraft, "
strSQL = strSQL & "email)"

strSQL = strSQL & "values("

strSQL = strSQL & "'" & Request.Form("PROFILNAVN") & "', "
strSQL = strSQL & "'" & Request.Form("KODEORD") & "', "
strSQL = strSQL & "'" & Request.Form("KODEORD_BEKRAFT") & "', "
strSQL = strSQL & "'" & Request.Form("EMAIL") & "')"

Response.write "Tillykke med din nye profil: <h1>" & request.Form("PROFILNAVN") & "</h1>"

' SQL sætning eksekveres
Conn.Execute(strSQL)

' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>

<%
' 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("database.mdb")
Conn.Open DSN

' SQL forespørgsel
strSQL = "Select * From bruger Where UserID = " & // Det UserID den lige har oprettet i databasen //
' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs = Conn.Execute(strSQL)

Response.Write "<br><a href='dinside.asp?UserID=" & rs("UserID") & "'>" & "Gå til din startside" & "</a>"

Conn.Close
Set Conn = Nothing
%>