琥珀無限級(jí)分類聯(lián)動(dòng)菜單AJAX版

更新時(shí)間：2006年11月16日 00:00:00 作者：

我做好琥珀無限級(jí)分類聯(lián)動(dòng)菜單Javascript版后，在藍(lán)色理想和CSDN上發(fā)表了一下，梅花雪兄在CSDN上提出了效率不足的問題，我也認(rèn)識(shí)到了這一點(diǎn)，本打算項(xiàng)目完工后再進(jìn)行完善，但一時(shí)技癢，便在網(wǎng)上尋找了一下資料，最后做出了此AJAX版無限級(jí)分類聯(lián)動(dòng)菜單。因時(shí)間匆忙，做得比較粗糙，但已利用AJAX技術(shù)，實(shí)現(xiàn)無限級(jí)聯(lián)動(dòng)，待過一段時(shí)間再完善此版本。
希望能給大家提供一些幫助，有好的建議或bug可在此帖后回復(fù)或?yàn)g覽http://www.51ajax.com/bbs/發(fā)帖。
運(yùn)行環(huán)境：MS IE 6.0 FireFox 1.0.1
下載地址：請點(diǎn)擊這里
在線Demo：請點(diǎn)擊這里
Bug 反饋：請點(diǎn)擊這里
最后更新：2005-10-20 16:18
共有兩個(gè)文件：
文件ajax.html代碼如下：

<html>   <head>     <meta http-equiv="Content-Type" content="text/html; charset=gb2312">     <meta content="琥珀[hopesoft],[url]http://www.10090.com[/url]" name="author">     <title>琥珀網(wǎng) - 無限級(jí)聯(lián)動(dòng)菜單[AJAX版]</title>     <style type="text/css">     body, td     {       font-family: 宋體;       font-size: 12px;     }     </style> <script language="JavaScript"> function GetResult(str,classid) { /* *--------------- GetResult(str,classid) ----------------- * GetResult(str)  * 功能:通過XMLHTTP發(fā)送請求,返回結(jié)果. * 參數(shù):str,字符串,發(fā)送條件;classid,數(shù)字,菜單級(jí)別 * 實(shí)例:GetResult(document.all.userid.value,1); *--------------- GetResult(str,classid) ----------------- */ //定義菜單級(jí)數(shù)，菜單ID數(shù)組，菜單對應(yīng)字段數(shù)組 var MenuIdArr,MenuFieldArr,MenuClass MenuIdArr= new Array() MenuFieldArr=new Array() MenuClass=4 MenuIdArr[1]="sel1" MenuIdArr[2]="sel2" MenuIdArr[3]="sel3" MenuIdArr[4]="sel4" MenuFieldArr[1]="name" MenuFieldArr[2]="name" MenuFieldArr[3]="name" MenuFieldArr[4]="name" if (window.XMLHttpRequest) { // Mozilla, Safari, ...     http_request = new XMLHttpRequest(); } else if (window.ActiveXObject) { // IE     http_request = new ActiveXObject("Microsoft.XMLHTTP"); } var linkurl="http://www.10090.com/demo/hpmenu/ajax_server.asp?classid="+classid+"&sel="+str+"&fieldname="+MenuFieldArr[classid+1] http_request.open("GET",linkurl,false); http_request.send(null); //服務(wù)器端處理返回的是經(jīng)過escape編碼的字符串. //在頁面顯示服務(wù)器查詢結(jié)果 var returntxt=unescape(http_request.responseText) if(returntxt.length>0) {document.all,ajax.innerHTML="服務(wù)器返回結(jié)果：<font color='red'>"+returntxt+"</font>   [Powered by AJAX]"} else {document.all,ajax.innerHTML=""} //通過XMLHTTP返回?cái)?shù)據(jù),開始構(gòu)建Select. BuildSel(returntxt,eval("document.all."+MenuIdArr[classid+1])) //============更改下下級(jí)以下菜單為空============== var kkk for(kkk=classid+2;kkk<=MenuClass;kkk++)     {             submenu=eval("document.all."+MenuIdArr[kkk])         submenu.length=1     submenu.options[0].selected=true     } } function BuildSel(str,sel) { /* *--------------- BuildSel(str,sel) ----------------- * BuildSel(str,sel)  * 功能:通過str構(gòu)建Select. * 參數(shù):str,字符串,由服務(wù)端返回的.有特定結(jié)構(gòu)"字符串1|,字符串2,字符串3" *          也可為"字符串1序號(hào)|字符串1文本,字符串2序號(hào)|字符串2文本,字符串3序號(hào)|字符串3文本",如本例 * 參數(shù):sel,要構(gòu)建的Select * 實(shí)例:BuildSel(unescape(oBao.responseText),document.all.sel2) *--------------- BuildSel(str,sel) ----------------- */ //先清空原來的數(shù)據(jù). sel.options.length=0; var arrstr = new Array(); arrstr = str.split(","); //開始構(gòu)建新的Select. sel.options.add(new Option( "-----請選擇-----",""));   if(str.length>0)    { for(var i=0;i<arrstr.length;i++) { //分割字符串 var subarrstr=new Array subarrstr=arrstr[i].split("|") //生成下級(jí)菜單 sel.options.add(new Option(subarrstr[1],subarrstr[0]));  } sel.options[0].selected=true } } </script>     <form name="form1" method="post" action="">         <table width="90%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#CCCCCC">           <tr bgcolor="F1F1F1">             <td height="24" colspan="2" align="center">琥珀無限級(jí)聯(lián)動(dòng)菜單-AJAX版 [HPMenu_AJAX V1.0]</td>           </tr>           <tr bgcolor="#FFFFFF">             <td width="12%" height="24" align="center">所 在 洲:</td>             <td><select name="sel1" id="sel1" onChange="GetResult(this.value,1)">                <option value="" selected>-----請選擇-----</option>               <option value="10">亞洲</option>               <option value="11">歐洲</option>             </select></td>           </tr>           <tr bgcolor="#FFFFFF">             <td height="24" align="center">國　　家:</td>             <td><select name="sel2" onChange="GetResult(this.value,2)">                <option value="" selected>-----請選擇-----</option>             </select></td>           </tr>           <tr bgcolor="#FFFFFF">             <td height="24" align="center">城　　市:</td>             <td><select name="sel3" id="sel3" onChange="GetResult(this.value,3)">                <option value="" selected>-----請選擇-----</option>             </select></td>           </tr>           <tr bgcolor="#FFFFFF">             <td height="24" align="center">地　　區(qū):</td>             <td><select name="sel4" id="sel4">                <option value="" selected>-----請選擇-----</option>             </select></td>           </tr>           <tr bgcolor="F1F1F1">             <td height="24" colspan="2" align="center" id="ajax">&nbsp;</td>           </tr>       </table>                  <table width="90%"  border="0" align="center" cellpadding="0" cellspacing="0">           <tr>             <td height="25" align="left">下載地址：<a  target="_blank">請點(diǎn)擊這里</a></td>           </tr>           <tr>             <td height="25" align="left">在線Demo：<a  target="_blank">請點(diǎn)擊這里</a></td>           </tr>           <tr>             <td height="25" align="left">Bug 反饋：<a  target="_blank">請點(diǎn)擊這里</a></td>           </tr>           <tr>             <td height="25" align="left">最后更新：2005-10-20 16:18</td>           </tr>           <tr>             <td height="25" align="left">聯(lián)系方式：MSN:hopesoft@msn.com</td>           </tr>           <tr>             <td height="50" align="center">copyright(c) 2005 <a >Hopesoft Studio</a> </td>           </tr>         </table>         <script language="javascript">         GetResult(document.getElementById("sel1").value,1)                 </script> </form> </body> </html>

[Ctrl+A 全選注:引入外部Js需再刷新一下頁面才能執(zhí)行]

文件ajax_server.asp代碼如下：

<% @Language="JavaScript" %> <% function OpenDB(sdbname) { /* *--------------- OpenDB(sdbname) ----------------- * OpenDB(sdbname)  * 功能:打開數(shù)據(jù)庫sdbname,返回conn對象. * 參數(shù):sdbname,字符串,數(shù)據(jù)庫名稱. * 實(shí)例:var conn = OpenDB("database.mdb"); *--------------- 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("ajax_data.mdb"); var sel = Request("sel"); var classid = Request("classid") var fieldname = Request("fieldname") var arrResult = new Array(); //var sql = "select "+fieldname+" from Demo where parentid='"+sel+"' and classid="+classid; var sql = "select id,"+fieldname+" from Demo where parentid='"+sel+"'"; //Response.Write("alert("+sql+")") var rs = Server.CreateObject("ADODB.Recordset"); rs.Open(sql,oConn,1,1); while(!rs.EOF) { //遍歷所有適合的數(shù)據(jù)放入arrResult數(shù)組中. arrResult[arrResult.length] = rs(0).Value+"|"+rs(1).Value; rs.MoveNext(); } //escape解決了XMLHTTP。中文處理的問題. //數(shù)組組合成字符串.由","字符串連接. Response.Write(escape(arrResult.join(","))); %>

[Ctrl+A 全選注:引入外部Js需再刷新一下頁面才能執(zhí)行]