AJAX的无刷新省市联动下拉框－－改进设计

最新推荐文章于 2024-08-27 13:38:21 发布

akunshenjk

最新推荐文章于 2024-08-27 13:38:21 发布

阅读量1.7k

点赞数

分类专栏： Ajax 文章标签： ajax xmlhttprequest javascript function sql server html

本文链接：https://blog.csdn.net/akunshenjk/article/details/616497

版权

Ajax 专栏收录该内容

3 篇文章 0 订阅

订阅专栏

读取XML文档，并赋给select

select.htm

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv="cache-ctrol" content="no-cache">
<meta http-equiv="Pragma" content="no-cache">
<title>省市联动优化设计</title>
<script language="javascript" src="ajax.js"></script>
<script language="javascript">
  function setSelect(sid,selectp){
   if (typeof(sid) == 'undefined'){
    return false;
   }
   var url="XML.asp?sid="+sid;
   var ajax=InitAjax();
   ajax.open("GET", url, true);
   ajax.onreadystatechange = function() {
    if (ajax.readyState == 4 && ajax.status == 200) {
     var xmlobj=ajax.responseXML;
     var xmltr=xmlobj.getElementsByTagName("RSSTR");
     while(eval('document.all.'+selectp+'.length')>xmltr.length-1){
      vl=eval('document.all.'+selectp+'.length');
      eval('document.all.'+selectp+'.remove(vl-1);');
     }
     for(var i=0;i<xmltr.length;i++){
      eval('document.all.'+selectp+'.options[i]=new Option(xmltr[i].getElementsByTagName("RSSNAME")[0].firstChild.data,xmltr[i].getElementsByTagName("RSSID")[0].firstChild.data);')
     }
    }
   }
   ajax.send(null);
  }
</script>
</head>
<body οnlοad="javascript:setSelect(0,'sp');">
省份：<select name="sp" οnchange="javascript:setSelect(this.value,'sc');">
<option>--请选择--</option>
</select>
城市：<select name="sc">
<option>--请选择--</option>
</select>
</body>
</html>

ajax.js

XML.asp

<%
Response.contentType="application/xml"
Response.Expires=0
Response.Write("<?xml version=""1.0"" encoding=""gb2312""?>")
%>
<RSS>
<%
dim conn,totle
Dim ConnString,UserName,Msg
Set conn = Server.CreateObject("ADODB.Connection")
ConnString= "DRIVER={SQL Server}; SERVER=(local); DATABASE=DataName; UID=sa; PWD="
conn.open ConnString
SID=Request.querystring("sid")
Response.write("<RSSTR><RSSID>0</RSSID><RSSNAME>--请选择--</RSSNAME></RSSTR>"&vbcrlf)
strsql="select ID,BigID,TextName from AddRessName where BigID="&clng(SID)
set rs=server.createobject("ADODB.Recordset")
rs.open strsql,conn,1,1
if not rs.eof then
  for i=1 to rs.recordcount
   if rs.eof then exit for
    Response.write("<RSSTR><RSSID>"&rs(0)&"</RSSID><RSSNAME>"&trim(rs(2))&"</RSSNAME></RSSTR>"&vbcrlf)
   rs.movenext
  next
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</RSS>

数据库：

ID BigID TextName

1 0 浙江

2 1 杭州

3 0 江苏

4 3 苏州

………………

akunshenjk

关注

0
点赞
踩
0

收藏

觉得还不错? 一键收藏
1
评论
AJAX的无刷新省市联动下拉框－－改进设计

读取XML文档，并赋给selectselect.htm"http://www.w3.org/TR/html4/loose.dtd"> 省市联动优化设计 function setSelect(sid,selectp){ if (typeof(sid) == undefined){ return false; } var url="XML.asp?sid="+
复制链接

扫一扫

专栏目录