Question

关于ASP下拉列表的问题

请看图，选择学院后，要求专业也跟着变，就是说专业是属于前面学院的。
<tr>
<td height="30">
<select class="put" name="学院" size="1">
<%
dim rs1,sql1

set rs1=server.createobject("adodb.recordset")
sql1="select*from 学院信息"
rs1.open sql1,objconn,1,1
do while not rs1.eof
response.write"<option value="+rs1("学院")
response.write">"+rs1("学院")+"</option>"
rs1.movenext
loop
rs1.close
%>
</select>
</td>
<td height="30">
<select class="put" name="专业" size="1">
<%
sql1="select distinct 专业 from 专业信息 "
rs1.open sql1,objconn,1,1
do while not rs1.eof
response.write"<option value="+rs1("专业")
response.write ">"+rs1("专业")+"</option>"
rs1.movenext
loop
rs1.close
%>
</select>
</td>
</tr>
不会，就做了个不会变的。改的话要怎么改，还请说详细点，刚学，还是个菜鸟……
一楼，你好像没明白我的意思，我要的功能是：如果选机械工程学院，那后面的专业就是机械工程学院包含的专业，如果我选计算机学院，那后面的专业就是计算机学院包含的，不要显示其它学院的专业。
你的程序比我的严谨，可是没有实现这个功能。谢谢你的回答。

Answer 1

这个需要js脚本来辅助实现。
第一个select改变的时候，会触发一个onchange事件，需要js脚本来处理，获取第一个select的值，通过异步ajax的方式，来获取第二个下拉框的项，并通过js脚本动态加载。或者也可以不用ajax的方式，页面一开始加载的时候，就将所有的学院和专业保存到js的数组里，然后onchange的时候，直接筛选js数组里的数据。

你这个属于二级菜单联动，搜索一下百度，会有你要的。

Answer 2

直接粘贴
===================================
<tr>
<td height="30">
<select class="put" name="学院" size="1">
<%
dim rs1,sql1

set rs1=server.createobject("adodb.recordset")
sql1="select*from 学院信息"
rs1.open sql1,objconn,1,1
if not rs.eof then
do while not rs1.eof
response.write"<option value="+rs1("学院")
response.write">"+rs1("学院")+"</option>"
rs1.movenext
loop
rs1.close
end if
set rs1=nothing
%>
</select>
</td>
<td height="30">
<select class="put" name="专业" size="1">
<%
sql1="select distinct 专业 from 专业信息 "
rs1.open sql1,objconn,1,1
if not rs.eof then
do while not rs1.eof
response.write"<option value="+rs1("专业")
response.write ">"+rs1("专业")+"</option>"
rs1.movenext
loop
rs1.close
end if
set rs1=nothing
%>
</select>
</td>
</tr>