Asp三级联动下拉菜单数据库版(含源程序)_ASP教程

2024-05-04 11:04:22

字体：大中小

来源：转载

供稿：网友

推荐：关于阻止灌水留言的一个方法(随机生成的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编程中15个非常有用的例子(一)_ASP教程

下一篇：asp生成HTM静态列表分页(含代码，已测试成功)_ASP教程

学习交流

硬盘分区如何设置准确的分区空间

硬盘分区如何设置准确的分区空间...

热门图片

猜你喜欢的新闻

猜你喜欢的关注