Select!

Jeg har en select box som indeholder nogle navne som bliver udskrevet fra min DB.

Når en bruger vælger et navn i min select, vil jeg gerne have udskrevet de Id'er der passer i en tabel, men hvordan gør jeg det??

Her er min select:

<select name="menukategori" class="soeg">
                                  <%
Dim strConnect, Conn

'Åbner connection
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ConString
 
sql = "SELECT * FROM Kategori"

Set objRec = Server.CreateObject("ADODB.Recordset")

objRec.open sql, Conn
While NOT objRec.EOF
%>
                                  <option value="<%=objRec("kategoriId")%>"><%=objRec("kategoriNavn")%></option>
                                  <%
objRec.MoveNext
Wend

objRec.close
Conn.Close
SEt Conn = Nothing
%>
                                </select>