源码网,源码论坛,源码之家,商业源码,游戏源码下载,discuz插件,棋牌源码下载,精品源码论坛

 找回密码
 立即注册
查看: 388|回复: 17

[AJAX相关] 利用XMLHTTP实现的二级连动Select

[复制链接]

7万

主题

861

回帖

32万

积分

论坛元老

Rank: 8Rank: 8

积分
329525
发表于 2006-9-18 00:00:00 | 显示全部楼层 |阅读模式
这是继 "利用XMLHTTP无刷新获取数据" 的另一篇关于XMLHTTP的应用. 
关于XMLHTTP.可以说,是一个很好的接合剂.把客户端和服务端的距离拉近了. 
利用XMLHTTP.我们可以实现很多好的想法. 
这文章.实现了二级连动Select. 
传统二级连动是把所有的数据都传到有客户端.. 
利用XMLHTTP.我们可以实时地返回我们所需要的数据. 
select.htm 
复制代码 代码如下:
<script language="Javascript"> 
function GetResult(str) 

/* 
 *--------------- GetResult(str) ----------------- 
 * GetResult(str)  
 * 功能:通过XMLHTTP发送请求,返回结果. 
 * 参数:str,字符串,发送条件. 
 * 实例:GetResult(document.all.userid.value); 
 * author:wanghr100(灰豆宝宝.net) 
 * update:2004-5-27 19:02 
 *--------------- GetResult(str) ----------------- 
 */ 
    var oBao = new ActiveXObject("Microsoft.XMLHTTP"); 
    oBao.open("POST","Server.asp?sel="+str,false); 
    oBao.send(); 
    //服务器端处理返回的是经过escape编码的字符串. 
    //通过XMLHTTP返回数据,开始构建Select. 
    BuildSel(unescape(oBao.responseText),document.all.sel2) 

function BuildSel(str,sel) 

/* 
 *--------------- BuildSel(str,sel) ----------------- 
 * BuildSel(str,sel)  
 * 功能:通过str构建Select. 
 * 参数:str,字符串,由服务端返回的.有特定结构"字符串1,字符串2,字符串3" 
 * 参数:sel,要构建的Select 
 * 实例:BuildSel(unescape(oBao.responseText),document.all.sel2) 
 * author:wanghr100(灰豆宝宝.net) 
 * update:2004-5-27 19:02 
 *--------------- BuildSel(str,sel) ----------------- 
 */ 
    //先清空原来的数据. 
    sel.options.length=0; 
    var arrstr = new Array(); 
    arrstr = str.split(","); 
    //开始构建新的Select. 
    for(var i=0;i<arrstr.length;i++) 
    { 
        sel.options[sel.options.length]=new Option(arrstr,arrstr) 
    } 

</script> 
<select name="sel" onChange="GetResult(this.value)"> 
<option value="">请选择 
<option value="福建省">福建省 
<option value="湖北省">湖北省 
<option value="辽宁省">辽宁省 
<select> 
<select name="sel2"></select>

server.asp  服务器端处理. 
复制代码 代码如下:
<% @Language="Javascript" %> 
<% 
function OpenDB(sdbname) 

/* 
 *--------------- OpenDB(sdbname) ----------------- 
 * OpenDB(sdbname)  
 * 功能:打开数据库sdbname,返回conn对象. 
 * 参数:sdbname,字符串,数据库名称. 
 * 实例:var conn = OpenDB("database.mdb"); 
 * author:wanghr100(灰豆宝宝.net) 
 * update:2004-5-12 8:18 
 *--------------- OpenDB(sdbname) ----------------- 
 */ 
    var connstr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="+Server.MapPath(sdbname); 
    var conn = Server.CreateObject("ADODB.Connection"); 
    conn.Open(connstr); 
    return conn; 

var oConn = OpenDB("data.mdb"); 
var province = Request("sel"); 
var arrResult = new Array(); 
var sql = "select city from china where province='"+province+"'"; 
var rs = Server.CreateObject("ADODB.Recordset"); 
rs.Open(sql,oConn,1,1); 
while(!rs.EOF) 

    //遍历所有适合的数据放入arrResult数组中. 
    arrResult[arrResult.length] = rs("city").Value; 
    rs.MoveNext(); 

//escape解决了XMLHTTP。中文处理的问题. 
//数组组合成字符串.由","字符串连接. 
Response.Write(escape(arrResult.join(","))); 
%>

数据库设计 
data.mdb 
表china. 
字段 
id  自动编号 
province 文本 
city  文本 
表:china 数据:  
id province city 
1 福建省  福州市 
2 福建省  厦门市 
3 福建省  泉州市 
4 湖北省  武汉市 
5 湖北省  荆州市 
6 湖北省  宜昌市 
7 辽宁省  沈阳市 
8 辽宁省  大连市 
9 辽宁省  盘锦市
回复

使用道具 举报

0

主题

1万

回帖

0

积分

中级会员

Rank: 3Rank: 3

积分
0
发表于 2022-8-20 21:01:01 | 显示全部楼层
哦哦哦哦哦哦哦哦哦
回复 支持 反对

使用道具 举报

2

主题

1万

回帖

99

积分

注册会员

Rank: 2

积分
99
发表于 2022-9-7 14:14:06 | 显示全部楼层
老衲笑纳了
回复 支持 反对

使用道具 举报

7

主题

1万

回帖

288

积分

中级会员

Rank: 3Rank: 3

积分
288
发表于 2023-1-31 17:18:38 | 显示全部楼层
论坛有你更精彩!
回复 支持 反对

使用道具 举报

4

主题

1万

回帖

60

积分

注册会员

Rank: 2

积分
60
发表于 2023-3-29 20:05:14 | 显示全部楼层
而非为吾问无为谓娃娃
回复 支持 反对

使用道具 举报

1

主题

1万

回帖

79

积分

注册会员

Rank: 2

积分
79
发表于 2023-6-20 09:00:17 | 显示全部楼层
管灌灌灌灌灌灌灌灌灌灌
回复 支持 反对

使用道具 举报

0

主题

1万

回帖

0

积分

中级会员

Rank: 3Rank: 3

积分
0
发表于 2023-8-29 20:30:27 | 显示全部楼层
先把创新班才能下班才能下班
回复 支持 反对

使用道具 举报

6

主题

1万

回帖

174

积分

注册会员

Rank: 2

积分
174
发表于 2023-10-15 07:08:30 | 显示全部楼层
飞飞飞飞飞飞飞飞飞飞飞飞飞
回复 支持 反对

使用道具 举报

2

主题

1万

回帖

69

积分

注册会员

Rank: 2

积分
69
发表于 2023-10-15 21:02:23 | 显示全部楼层
还有什么好东西没
回复 支持 反对

使用道具 举报

13

主题

1万

回帖

85

积分

注册会员

Rank: 2

积分
85
发表于 2023-11-22 11:17:45 | 显示全部楼层
有什么好的服务器
回复 支持 反对

使用道具 举报

高级模式
B Color Image Link Quote Code Smilies

本版积分规则

手机版|小黑屋|网站地图|源码论坛 ( 海外版 )

GMT+8, 2024-9-20 20:28 , Processed in 0.080021 second(s), 26 queries .

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表