Asp三级联动下拉菜单数据库版(含源程序)_ASP教程
教程Tag：暂无Tag,欢迎添加,赚取U币!
推荐：关于阻止灌水留言的一个方法(随机生成的4位认证码)原理:在每次提交留言的时候,要输入随机生成的4位认证码. 以下代码用在ASP 生成随机4位数: % dim key randomize timer key=Int((8999)*Rnd +1000) % 在表单里显示: 认证码：%=key% input type=text name=rekey size=8 maxlength=4 input value=%=key
<%Option Explicit
’数据库：
’location
’表1 loaction 所在的市 表
’ 字段
’ loactionid （主键）
’ loactionname 名字
’表2 district 所在的县 表
’ 字段
’ locationid （主键）
’ districtid
’ districtname
’表3 village 所在的乡镇 表
’ 字段
’ districtid （主键）
’ villageid
’ villagename
%>
<html>
<head>
<title>List</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<%
dim conn
dim rs
dim sql
dim count
dim rs1
dim sql1
dim rs2
dim sql2
dim count2
dim connstr
connstr="DBQ="+server.mappath("db11.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
sql = "select * from district order by locationid asc"
set rs = conn.execute(sql)
%>
<script language = "JavaScript">
var onecount;
onecount=0;
subcat = new Array();
<%
count = 0
do while not rs.eof
%>
subcat[<%=count%>] = new Array("<%=trim(rs("districtname"))%>","<%= trim(rs("locationid"))%>","<%= trim(rs("districtid"))%>");
<%
count = count + 1
rs.movenext
loop
rs.close
set rs=nothing
%>
分享：asp生成HTM静态列表分页(含代码，已测试成功)!--#include file=conn.asp-- htmlheadTITLE分页测试/TITLELINK href=inc/style.css type=text/css rel=stylesheet/head %strHead=strHeadhtml strHead=strHeadhead strHead=strHeadTITLE分页测试/TITLE strHead=strHeadLINK href=inc/style.cs
相关ASP教程：
- 相关链接：
- 教程说明：
ASP教程-Asp三级联动下拉菜单数据库版(含源程序)
。