OnChange hop til ny side med ID

strSQL = "Select * from overgruppe"
                Conn.Execute (strSQL)
                Set rs = conn.Execute(strSQL)
               
            DO WHILE NOT rs.EOF
                    Session("over-id") = rs("id")
                    gruppe = rs("gruppe")
                    Response.write "<a class=""products"">" & gruppe & "<a>"
                    Response.write "<br>"
                   
                                                stmtSQL = "select * from gruppe where overgruppe_id =" & Session("over-id")
                                                set rs2 = conn.execute(stmtSQL)

                                                        Response.write "<select name='Gruppe' size='1' onchange='value'>"
                                                        Response.write "<option value=""0"">Vælg!</option>"
                                                        Do while not rs2.eof   
                                                        Response.write "<option value='" & rs2("id") & "'>" & rs2("vare_gruppe") & "</option>" & VbCrLf
                                                        rs2.movenext
                                                        Loop
                                                        Response.write "</select>"
                                                        Response.write "<br>"
                                                        rs2.Close
                                               
        rs.MoveNext
        Loop
        rs.Close

Jeg har et problem .. Jeg vil gerne have når jeg Onchange skifter ned skal den hoppe over på en side hvor Querystring har ID med som passer til value i select boxen :)