想用ASP VBScript实现这样一个页面：在一个页面中，有两个下拉列表a和b，分别对应数据库中

想用ASP VBScript实现这样一个页面：在一个页面中，有两个下拉列表a和b，分别对应数据库中

<%
'先打开数据库
set rs = Server.Createobject("ADODB.RecordSet")
rs.open “select * from table where A<>''”,conn,1,1
for i =0 to rs.recordCount
if rs.eof then
exit for
end if
A = rs("A")
%>
这里option的Value是从A字段读取的
<%
rs.MoveNext
next
rs.close
set rs = nothing
%>



proccessData.asp
<%
'先打开数据库
aVal = request("aVal")
set rs = Server.Createobject("ADODB.RecordSet")
rs.open “select * from table where A ="&aVal&"",conn,1,1
for i =0 to rs.recordCount
if rs.eof then
exit for
end if
B = rs("B")
response.write(""&B&"")
rs.MoveNext
next
rs.close
set rs = nothing
%>

先获得A的值添加到第一个select中，再利用ajax将A的值传回后台做为B的查询条件，得到B的值添加到第二个select中