Ajax + Asp实现级联菜单

http://www.corange.cn/archives/2008/03/788.html
在一些时候常常用到一个一级列表框（姑且这么叫）和一个二级列表框（姑且这么叫），二级列表框的选项随一级列表改变而改变，为了完成这个任务，其中一种就是用ajax+asp实现实现，代码如下：
一个Ajax请求文件ajax_func.js放在ajax文件夹里：
varhttp_request=false;
functionsend_request(method,url,content,responseType,callback){
http_request=false;
if(window.XMLHttpRequest){
http_request=newXMLHttpRequest();
if(http_request.overrideMimetype){
http_request.overrideMimetype("text/xml");
}
}
elseif(window.ActiveXObject){
try{
http_request=newActiveXObject("Msxml.XMLHTTP");
}catch(E){
try{
http_request=newActiveXObject("Microsoft.XMLHTTP");
}catch(E){}
}
}
if(!http_request){
window.alert("不能创建XMLHttpRequest对象实例！");
}
if(responseType.toLowerCase()=="text"){
http_request.onreadystatechange=callback;
}
elseif(responseType.toLowerCase()=="xml"){
http_request.onreadystatechange=callback;
}
else{
window.alert("响应类别参数错误！");
returnfalse;
}
if(method.toLowerCase()=="get"){
http_request.open(method,url,true);
}
elseif(method.toLowerCase()=="post"){
http_request.open(method,url,true);
http_request.setRequestHeader("Content-Type","application/x-www-form-urlencoded");
}
else{
window.alert("http请求类别参数错误！");
returnfalse;
}
http_request.send(content);
}
functionprocessTextResponse(){
if(http_request.readyState==4){
if(http_request.state==200){
alert("Text文档响应。");
}else{
alert("您所请求的页面有异常！");
}
}
}
functionprocessXMLResponse(){
if(http_request.readyState==4){
if(http_request.state==200){
alert("XML文档响应。");
}else{
alert("您所请求的页面有异常！");
}
}
}
一个连接数据库文件functiion.asp放在inc文件夹里：
'清空数据
FunctionQingKong(rs)
Setrs=Nothing
EndFunction
'关闭connection连接的数据库
Subguanconn()
conn.close
EndSub
'弹出对话框,及页面转向。
Functionoutmsg(massage,adress)
response.write""&Chr(13)
response.write""&Chr(13)
response.write""&Chr(13)
EndFunction
%>
数据库supernews.mdb放在文件夹data里，表设计为：

生成ＸＭＬ文件为prov.asp,代码如下：
Dimprov
prov=request("id")
Ifprov=""Then
outmsg"非法登入！","city.htm"
EndIf
Dimconn,sql,rs,num
sql="selectcount(*)asnumfromtb_citywherecity_prov='"&prov&"'"
kaiconn
Setrs=conn.execute(sql)
num=rs("num")
%>
列表框页面代码为：


functionclear(o){
l=o.length;
for(i=0;i
if(prov=="")
{
returnfalse;
}
send_request("get","prov.asp?id="+prov,null,"xml",chuli);
}
functionchuli()
{
if(http_request.readyState==4)
{
if(http_request.status==200)
{
varoj=document.getElementById("city");
clear(oj);
vardoc=http_request.responseXML;

varnum=doc.getElementsByTagName("num")[0].firstChild.data;
for(i=0;i
}
else
{
alert("你请求的页面异常！");
}
}
}
//-->


省份
北京市
天津市
河北省
山西省
内蒙古
辽宁省
吉林省
黑龙江省
上海市
江苏省
浙江省
安徽省
福建省
台湾
江西省
山东省
河南省
湖北省
湖南省
广东省
香港特别行政区
澳门特别行政区
广西壮族自治区
海南省
重庆市
四川省
贵州省
云南省
西藏自治区
陕西省
甘肃省
青海省
宁夏回族自治区
新疆维吾尔族自治区


城市

在ＩＩＳ下运行（ 必须在ＩＩＳ下运行）效果如下：