基于asp+ajax和数据库驱动的二级联动菜单

Ajax 2018-12-30

index.asp 页面代码
<div class="codetitle"><a style="CURSOR: pointer" data="92950" class="copybut" id="copybut92950" onclick="doCopy('code92950')"> 代码如下:

<div class="codebody" id="code92950">

<%
set cmd = conn.execute("select bigclassid,bigclassname from bigclass")
tempid=cmd("bigclassid")
%>
<select name="menu" onChange="getsubcategory(this.value);"> <%
if not cmd.eof then
do while not cmd.eof
bigclassid= cmd("bigclassid")
bigclassname = cmd("bigclassname")
%>
<option value="<%=bigclassid%>"><%=bigclassname%>
<%
cmd.movenext
loop
end if
cmd.close
set cmd = nothing
%>

<div id="subclass">
<select name="submenu"> <%
set cxd = conn.execute("select from smallclass where bigclassid=" & tempid)
if not cxd.eof then
do while not cxd.eof
smallclassid= cxd("smallclassid")
smallclassname = cxd("smallclassname")%>
<option value="<%=smallclassid%>"><%=smallclassname%>
<%
cxd.movenext
loop
cxd.close
set cxd = nothing
else
html = ""
response.write html
end if
%>



ajax.js 代码
<div class="codetitle"><a style="CURSOR: pointer" data="84664" class="copybut" id="copybut84664" onclick="doCopy('code84664')"> 代码如下:
<div class="codebody" id="code84664">
// JavaScript Document
function createxmlhttp()
{
xmlhttpobj = false;
try{
xmlhttpobj = new XMLHttpRequest;
}catch(e){
try{
xmlhttpobj=new ActiveXObject("MSXML2.XMLHTTP");
}catch(e2){
try{
xmlhttpobj=new ActiveXObject("Microsoft.XMLHTTP");
}catch(e3){
xmlhttpobj = false;
}
}
}
return xmlhttpobj;
} function getsubcategory(bigclassid){
if(bigclassid==0){
document.getElementById("subclass").innerHTML="";
return;
};
var xmlhttpobj = createxmlhttp();
if(xmlhttpobj){//如果创建对象xmlhttpobj成功
xmlhttpobj.onreadystatechange=handle;
xmlhttpobj.open('get',"getsubcategory.asp?bigclassid="+bigclassid+"&number="+Math.random(),true);//get方法 加个随机数。
xmlhttpobj.send(null);
}
} function handle(){//客户端监控函数
//if(xmlhttpobj.readystate==4){//服务器处理请求完成
if(xmlhttpobj.status==200){
//alert('ok');
var html = xmlhttpobj.responseText;//获得返回值
document.getElementById("subclass").innerHTML=html;
}else{
document.getElementById("subclass").innerHTML="对不起，您请求的页面有问题...";
}
//}
//else{
//document.getElementById("subclass").innerHTML=xmlhttpobj.readystate;//服务器处理中
//}
//} }

getsubcategory.asp 代码
<div class="codetitle"><a style="CURSOR: pointer" data="62637" class="copybut" id="copybut62637" onclick="doCopy('code62637')"> 代码如下:<div class="codebody" id="code62637">
<%@language="vbscript" codepage="936"%>

<%
response.charset="gb2312"
bigclassid=safe(request.querystring("bigclassid"))
if bigclassid<>"" then
set re=new regexp
re.ignorecase=true
re.global=false
re.pattern = "^[0-9]{1,3}$"
if not re.test(bigclassid) then
response.write "非法参数"
response.end
end if%> <%on error resume next
set p = conn.execute("select from smallclass where bigclassid=" & bigclassid)
if err then
err.clear
response.write "查询出错"
response.end
end if
if not p.eof then
html = ""
else
html = ""
end if
p.close
set p = nothing
conn.close
set conn = nothing
response.write html
html = ""
end if
%>

相关文章

ajax 上传文件项目下载
IE6是一个非常老旧的网页浏览器，虽然现在很少人再使用它，但...
ajax .post()
PHP中的count()函数是用来计算数组或容器中元素的个数。这个...
ajax 不返回值 写法
使用 AJAX（Asynchronous JavaScript and XML）技术可以在不...
ajax 下载文件 blob
Ajax（Asynchronous JavaScript and XML）是一种用于改进网页...
ajax 下载excel文件流
本文将介绍如何通过AJAX下载Excel文件流。通过AJAX，我们可以...
ajax .get .post
Ajax是一种用于客户端和服务器之间的异步通信技术。通过Ajax...