一个强健一个强健 实用的实用的asp+ajax二级联动菜单二级联动菜单(有演示和附源程序打有演示和附源程序打
包下载包下载)
一个强健 实用的ajax二级联动菜单(有演示和附源程序打包下载)
前些天在搞后台的时候要用到二级联动的菜单,到网上去找了半天也没找到满意的,不是这错就是那错,在选择的时候有时候不能
返回.真是郁闷.
后来就看到有人用ajax写了无限级分类(牛,呵呵,本人看不懂.).就想到我那个后台不也可以用ajax试试,虽然比用javascript的
慢点,但我这个实用.强健..不会出错,也不会选择某个大类后再返回无选择状态小类为空的状态.呵呵.
文件目录:如图
主要代码如下:
index.asp
代码如下:
<%@LANGUAGE=”VBSCRIPT” CODEPAGE=”936″%>
<!DOCTYPE html PUBLIC “-//W3C//DTD XHTML 1.0 Transitional//EN” “http://www.w3.org/TR/xhtml1/DTD/xhtml1-
transitional.dtd”>
<html xmlns=”http://www.w3.org/1999/xhtml”>
<head>
<meta http-equiv=”Content-Type” c />
<title>Ajax的二级联动by啊峰</title>
<script language=”javascript” src=”js.js”></script>
</head>
<body>
<h2><a href=”http://yeahdown.com/”>Ajax的二级联动by啊峰</a></h2>
<!–#include file=”iconn.asp”–>
<%
Set afeng = Conn.Execute(“select bigclassid,bigclassname from bigclass”)
%>
<form id=”form1″ name=”form1″ method=”post” action=””>
<div id=”bigclass” style=”float:left”>
<select name=”select” >
<option value=”0″>选择一级分类</option>
<%If Not afeng.Eof then
Do While Not afeng.Eof
bigclassid= afeng(“bigclassid”)
bigclassname = afeng(“bigclassname”)%>
<option value=”<%=bigclassid%>”><%=bigclassname%></option>
<%afeng.Movenext
Loop
End If
afeng.Close
Set afeng = Nothing
Conn.Close
Set Conn = Nothing%>
</select>
</div>
<div id=”subclass” style=”float:left”><select name=”select2″>
<option value=”0″>选择二级分类</option>
</select>
</div>
</form>
</body>
</html>
getsubcategory.asp文件:
代码如下:
<%
Response.Charset=”GB2312″ ‘设置字符集 原默认为utf-8
bigclassid=safe(request.QueryString(“bigclassid”)) ‘非法字符过滤
If bigclassid<>”” Then
Set Re=New RegExp
Re.IgnoreCase=true
资源评论
