两个select数据联动，求另一个写法，在线等。。。

[fangsky]

在我的一个表 t_zhuanye 中,存储着一个关于专业的数据,其中分为两级.比如
数据结构：
id parentid zymc
1 1 理科
2 1 数学
3 1 物理
4 4 文科
5 4 汉语言
6 4 英语
现在我通过以下的代码(页面刷新)可以实现一级分类和二级分类的单独取出.
有没有办法,可以不通过页面刷新来实现选择一级分类,就会出现对应的二级分类.
那位大哥能够帮我写一下具体的代码。
<script language="javascript">
function chang_product_type(){
location.href="xxcx.asp?type_id="+root_sort.options[root_sort.selectedIndex].value;}
</script>
<table width="291" height="18">
<tr>
<Td>选择一级分类
<select name="root_sort" class=p9 style="width:230px;height:22px" onChange="javascript:chang_product_type();">
<%set myrs_root=server.CreateObject("adodb.recordset")
myrs_root.Open "select ID,zymc from t_zhuanye where ID=ParentID and me_version='cn' order by ID",conn,1,1
do until myrs_root.EOF
Response.Write "<option value=" & myrs_root("id") & ">" & myrs_root("zymc") & "</option>"
myrs_root.movenext
loop
myrs_root.Close
set myrs_root=nothing
%>
</select>
选择二级分类
<select name="type_id" style="WIDTH: 260px; COLOR: navy; font-size:9pt">
<%set myrs_child=server.CreateObject("adodb.recordset")
sql="select * from t_zhuanye where me_version='cn' and id <> parentid and parentid=" & type_id & " order by id"
myrs_child.Open sql,conn,1,1
do until myrs_child.EOF
Response.Write "<option value='" & myrs_child("id") & "'>┠" & myrs_child("zymc") & "</option>"
myrs_child.MoveNext
loop
myrs_child.Close
set myrs_child=nothing
%>
</select>
</Td></tr>
</table>