三级联动数据库添加html,Asp三级联动下拉菜单数据库版(含源程序)

推荐：关于阻止灌水留言的一个方法(随机生成的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

%>

List

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)

%>

var onecount;

onecount=0;

subcat = new Array();

count = 0

do while not rs.eof

%>

subcat[] = new Array("","","");

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