這是繼 "利用XMLHTTP無(wú)刷新獲取數據" 的另一篇關(guān)于XMLHTTP的應用.
關(guān)于XMLHTTP.可以說(shuō),是一個(gè)很好的接合劑.把客戶(hù)端和服務(wù)端的距離拉近了.
利用XMLHTTP.我們可以實(shí)現很多好的想法.
這文章.實(shí)現了二級連動(dòng)Select.
傳統二級連動(dòng)是把所有的數據都傳到有客戶(hù)端..
利用XMLHTTP.我們可以實(shí)時(shí)地返回我們所需要的數據.
select.htm
<script language="javascript">
function GetResult(str)
{
/*
*--------------- GetResult(str) -----------------
* GetResult(str)
* 功能:通過(guò)XMLHTTP發(fā)送請求,返回結果.
* 參數:str,字符串,發(fā)送條件.
* 實(shí)例: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();
//服務(wù)器端處理返回的是經(jīng)過(guò)escape編碼的字符串.
//通過(guò)XMLHTTP返回數據,開(kāi)始構建Select.
BuildSel(unescape(oBao.responseText),document.all.sel2)
}
function BuildSel(str,sel)
{
/*
*--------------- BuildSel(str,sel) -----------------
* BuildSel(str,sel)
* 功能:通過(guò)str構建Select.
* 參數:str,字符串,由服務(wù)端返回的.有特定結構"字符串1,字符串2,字符串3"
* 參數:sel,要構建的Select
* 實(shí)例:BuildSel(unescape(oBao.responseText),document.all.sel2)
* author:wanghr100(灰豆寶寶.net)
* update:2004-5-27 19:02
*--------------- BuildSel(str,sel) -----------------
*/
//先清空原來(lái)的數據.
sel.options.length=0;
var arrstr = new Array();
arrstr = str.split(",");
//開(kāi)始構建新的Select.
for(var i=0;i<arrstr.length;i++)
{
sel.options[sel.options.length]=new Option(arrstr[i],arrstr[i])
}
}
</script>
<select name="sel" onChange="GetResult(this.value)">
<option value="">請選擇
<option value="福建省">福建省
<option value="湖北省">湖北省
<option value="遼寧省">遼寧省
<select>
<select name="sel2"></select>
server.asp 服務(wù)器端處理.
<% @Language="javascript" %>
<%
function OpenDB(sdbname)
{
/*
*--------------- OpenDB(sdbname) -----------------
* OpenDB(sdbname)
* 功能:打開(kāi)數據庫sdbname,返回conn對象.
* 參數:sdbname,字符串,數據庫名稱(chēng).
* 實(shí)例: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。中文處理的問(wèn)題.
//數組組合成字符串.由","字符串連接.
Response.Write(escape(arrResult.join(",")));
%>
數據庫設計
data.mdb
表china.
字段
id 自動(dòng)編號
province 文本
city 文本
表:china 數據:
id province city
1 福建省 福州市
2 福建省 廈門(mén)市
3 福建省 泉州市
4 湖北省 武漢市
5 湖北省 荊州市
6 湖北省 宜昌市
7 遼寧省 沈陽(yáng)市
8 遼寧省 大連市
9 遼寧省 盤(pán)錦市
聯(lián)系客服