亲测：ajax+多表+asp+多select 表单联动

 

 初始时index.asp显示上面的6个下拉列表，其中第1个已填充数据。

选择华北地区，然后第2个会填充，选择第2个中的，第3个开始填充，依此类推。

 

index.asp

search.js

search.asp

xxx.db

主要就是这四个文件，其中search.asp可以构造一个地址查看一下直观的输出效果：

http://localhost/search.asp?t=province&f1=province_id&f2=province_name&id=1&w=area_id&o=province_order&m=123

 

<?xml version="1.0" encoding="gb2312"?>
<root>
<message id="1">
  <cid>1</cid>
  <name>北京市</name>
</message>
<message id="2">
  <cid>2</cid>
  <name>天津市</name>
</message>
<message id="3">
  <cid>3</cid>
  <name>河北省</name>
</message>
<message id="4">
  <cid>4</cid>
  <name>山西省</name>
</message>
<message id="5">
  <cid>5</cid>
  <name>内蒙古自治区</name>
</message>
</root>

<!--#include file="include/adoconn.asp"-->
<%

'  程序名：ajax无限级联动

' search.asp
Response.ContentType="text/xml"
tablename=saferequest("t")
f1=saferequest("f1") '字段1
f2=saferequest("f2") '字段2
wherename=saferequest("w") '条件
ordername=saferequest("o") '顺序
id=saferequest("id")
sql="select "&f1&","&f2&" from "&tablename&" where "&wherename&"="&id&" order by "&ordername&" asc"
'response.write sql
'response.end
rs.open sql,conn,1,1

str="<?xml version=""1.0"" encoding=""gb2312""?>"&vbnewline
str=str&"<root>"&vbnewline
If rs.eof Then

Else
 i=1
 Do While Not rs.eof
  str=str&"<message id="""&i&""">"&vbnewline 'vbnewline另起一行
  str=str&"  <cid>"&rs(f1)&"</cid>"&vbnewline
  str=str&"  <name>"&rs(f2)&"</name>"&vbnewline
  str=str&"</message>"&vbnewline
  i=i+1
  rs.movenext
 loop
End If

str=str&"</root>"
rs.close
response.write str
%>