2 dropdown boxe arbejde sammen

Ska bruge en kode til at få 2 drop downboxe til at arbejde sammen så hvis man vælger noget i den første skal den i den næste kun vise det der høre til den første box..

Har fundet denne kode, men mit problem med den er at jeg ikke ka få den til at man kan vælge en value til boxen. Det skal man kunne..

Men her er den kode jeg har fundet:

<%

strsql = "Select * From typer order by navn"
set mar = conn.execute(strsql)
maarkerialt = int(1)

do until mar.eof
maarkerialt = int(maarkerialt + 1)
mar.movenext
loop

%>

<script>

vmodel = new Array(<%=maarkerialt%>);
for (i = 0; i < vmodel.length; i++) vmodel[i] = new Array();

vmodel[0][0] = "Vælg";
<%

strsql = "Select * From typer order by navn"
set mar = conn.execute(strsql)
modelnrtal = int(1)
do until mar.eof

strsql = "Select * From typer_2 where typeid=" & mar("id") & " order by navn"
set mo = conn.execute(strsql)
talnr = int(0)

if not (mo.eof or mo.bof) then


do until mo.eof

%>
vmodel[<%=modelnrtal%>][<%=talnr%>] = "<%=mo("navn")%>";

<%
talnr = int(talnr + 1)

mo.movenext
loop



modelnrtal = int(modelnrtal +1)

mar.movenext
loop

%>


function skift(frm) {
ind = frm.ttype.selectedIndex;
frm.undertype.length = vmodel[ind].length;
for (n = 0; n < vmodel[ind].length; n++) {
frm.undertype.options[n].text = vmodel[ind][n];
frm.undertype.options[n].value = vmodel[ind][n];
}
}
</script>


Nogle der kan hjælpe.?