Menu-ting...

Hej med-Eksperter,

Jeg er ved at opbygge en menu...

Følgende haves:
Database
- Tbl_Cat <-- Heri holdes kategorinavnene

Den ser ud som følger:
Cat_ID (Auto)
Menu_ID (Tekst)
Cat_Navn (Tekst)
SQL (Tekst)
maincat (Ja/Nej)

Foreøbig har jeg denne kode:

Set myConn = Server.CreateObject(\"ADODB.Connection\")
myConn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\"& Server.MapPath(\"varer.mdb\")
SQL = \"SELECT * FROM tbl_Cat WHERE maincat=TRUE\"
Set rs = myConn.Execute(SQL)

IF request(\"menuID\") = \"\" THEN
response.write \"<table border=\'0\' width=\'100%\' cellpadding=\'0\' cellspacing=\'2\'>\"
Do while NOT rs.EOF
response.write \"<tr>\"
response.write \"<td bgcolor=\'#FFFFFF\'><a href=\'menu.asp?menuID=\"& rs(\"Menu_ID\") &\"\'>\"& rs(\"Cat_Navn\") &\"</a></td>\"
response.write \"</tr>\"
RS.MoveNext
LOOP
response.write \"</table>\"
End IF


Nu er mit problem så at få menuen til at folde sig ud ved klik på Hovedgrupperne...

Og hvis det kan lade sig gøre folde ind igen ved klik på en anden hovedgruppe

Spørgsmål ?
Don\'t hessitate to ask them ! :o)