第一篇：学用asp+access制作留言簿
学用asp+access制作留言簿
前言：这是一篇asp+access的留言簿教程，运行测试环境：win2000+IE5.0。此篇教程适合对asp有一定了解的人，如果是初学者，建议先看点asp方面的书籍，或者本站XML＋ASP的一些文章和论坛的一些贴子，至少能对变量、语法、函数、对象等有一个大概的了解。
一、总体思路
留言簿虽小，但对asp知识的要求还是挺全面的。首先对留言簿要完成的功能做一个大体的介绍。在设计一个项目时，最好能够构思出大体轮廓并写出来，这样就不会越做越乱，到最后自己都不知道自己要做什么！
1、单用户版：这篇教程中所要完成的留言簿只有一个管理员，所有人不需要注册就可留言。
2、留言者必须填写用户名、QQ号、邮箱、主页、留言内容、留言时间、可以使用悄悄话功能、可以获取用户IP地址，其中留言内容可以使用简单的UBB功能。
3、可以实现一定的管理功能：删除留言、编辑留言、自定义页头和页低、定义留言数、写公告、对留言簿进行一些最简单的配置等。
4、主要用asp+access2000完成
5、如果必要大家可以加搜索功能。
6、在程序设计中，尽量使用模块化，减少大量无用代码。
二、数据库构造
1、数据库名： data.mdb
说明：在设计留言簿的过程中，可以保持此名，设计完毕后可以改为data.asp,以保证数据库的安全性。
2、数据库表：总共有三个表：
(1)admin 主要记录管理员的用户名和密码以及一些基础信息。
(2)content 用来记录用户留言内容
(3)gbfined 用来记录留言簿的一些基本配置，如题头图片地址、图片长度高度、留言簿每页的留言条数，公告内容等等。
3、数据库表的具体设计：
(1)admin表
字段名
类型
长度
说明
admin_name
文本
默认
存储管理员的名字 admin_password
文本
默认
存储管理员的密码 admin_qq
文本
默认
存储管理员的oicq号 admin_email
文本
存储管理员的邮箱
admin_homepage
文本
150
存储管理员的主页地址 admin_webname
文本
150
存储管理员的主页名称
说明：A、“常归”项中的“允许空字符串”最好填“是” B、表格设计完后最好能够填入数据： admin_name：admin admin_password: admin admin_qq: 57146
admin_email: daifo@5dmeng.com
admin_homepage: http://www.xiexiebang.com“> ,asp教程,织梦帝国,织梦帝国留言簿,呆佛,daifo,code,download,articles,guestbook,源代码“>
sub bottom(gb_editioner)%>
|
然后在index.asp中加入下面代码：
<%call bottom(gb_editioner)%>
把所有文件保存到guestbook文件夹中，然后在浏览器是软件入http://localhost/guestbook/index.asp.数据库文件的扩展名还能改的。为了数据库的安全性，建议你在设计完一个项目后，改动的你数据库文件名为：****.asp。
现摘录一网友对数据库（表）的几段语句，在本教程中并未用到这些语句，但是很有帮助，大家可以和我对数据库的操作比较一下：
'******************************************************************* '打开数据库
sub opendb(connect)set connect=server.CreateObject(”ADODB.connection“)
connect.ConnectionString=”DRIVER={Microsoft Access Driver(*.mdb)};DBQ=“ & server.MapPath(databasename)connect.Open strconn end sub
'******************************************************************* '关闭数据库
sub closedb(connect)connect.close set connect=nothing end sub '******************************************************************* '打开单个表读
sub opentable(connect,tbname,myrs)set myrs=server.createobject(”ADODB.recordset“)rssql=”select * from “ & tbname myrs.open rssql,connect,1,1 end sub
'******************************************************************* '关闭临时表 sub closetable(rs)rs.close set rs=nothing end sub
'******************************************************************* '查询数据库
sub searchtable(connect,sql,rs)set rs=server.createobject(”ADODB.recordset“)rs.open sql,connect,1,1 end sub
'******************************************************************* '查询并更改数据库
sub changetable(connect,sql,rs)set rs=server.createobject(”ADODB.recordset“)rs.open sql,connect,1,3 end sub
********************************************************************
好了，我们接着来。
3、下面给出，我的 index.asp的内容，然后按这些来设计留言簿！
<%'调用函数库inc.asp文件 '函数库中的form参数action值 action=request(”action“)select case action '检查登录
case ”chklogin“
chklogin
'删除留言，由于，代码不是很多，所以不例为函数，大家可以试着将其做成函数
case ”delete“
if session(”adminpress“)<>”“ then
'如果管理员登录了，那么删除留言
我用的是spl语句，很简单的语句！
strsql=”delete * from content where user_id=“&request.querystring(”id“)
conn.execute(strsql)'关闭数据库
conn.close
set conn=nothing
'删除成功，回留言簿
response.write”
response.write”删除成功，,正回留言簿.......
<%'结束代码的执行，回首页面
response.end
else
'如果未登录，进入登录界面
response.redirect”index.asp?action=login“
end if
case ”w_r_add“
if session(”adminpress“)<>”“ then
w_r_add '留言簿配置修改入库
else
response.redirect”index.asp?action=login“
end if
case ”w_p_add“
if session(”adminpress“)<>”“ then
w_p_add '版主信息修改入库
else
response.redirect”index.asp?action=login“
end if
case ”inputadd“
recadd
'留言内容入库
case ”editadd“
if session(”adminpress“)<>”“ then
editadd '编辑或回复留言入库
else
response.redirect”index.asp?action=login“
end if
case ”logout“ '管理员退出登录
session(”adminpress“)=”“
response.redirect”index.asp“ end select %>
select case action
case ”“
listrec '显示留言信息
case ”serguest“
serrec
'搜索留言
case ”login“
login
'登录界面
case ”input“
input
'输入留言界面
case ”chklogin“
chklogin '检查登录，此函数可以放在顶部，但为了显示错误信息的工整性，我放到了此处
case ”editrec“
editrec '修改信息界面
case ”manage“ '验证管理者是否
if session(”adminpress“)=”“ then
login
else
listrec
end if
case ”m_write“ '修改配置界面
if session(”adminpress“)<>”“ then
m_write
else
login
end if
case ”m_person“ '修改版主信息界面
if session(”adminpress“)<>”“ then
m_person
else
login
end if end select call bottom(gb_editioner)'调用页低信息
%>
最后我们一起来看看inc.asp文件内容，此文件中全部是index.asp文件调用的函数。
首先在文件头加上：来调用定义的变量。
1、首先我们写出引号和空格的转换函数，主要是为了解决数据与sql函数相冲突。
<% Function ChkString(string)if string = ”“ then string = ” “ ChkString = server.htmlencode(Replace(string, ”'“, ”''“))End Function
Function ChkUserString(string)string = ChkString(string)ChkUserString = server.htmlencode(Replace(string, ” “, ”“))End Function %>
2、关于页面头和页面低部函数，在第二讲中已经写出，这里不再重写。
3、登录界面 <%sub login%>
4、验证管理员密码是否正确 <%end sub '验证登录密码 sub chklogin()
admin_name=chkstring(request(”username“))'取得表单数据 admin_password=chkstring(request(”password“))
strsql=”select admin_name,admin_password from admin“
set rs = conn.Execute(strsql)
'读取数据库中用户和密码
if not(rs.bof and rs.eof)then
if admin_name=rs(”admin_name“)and admin_password=rs(”admin_password“)then
session(”adminpress“)=chkstring(request(”username“))
'如果管理员名字和密码输入正确存取session变量，以便管理员对留言簿的维护。
rs.close
set rs=nothing
conn.close
set conn=nothing '关闭数据库和表
response.redirect ”index.asp“ '回到首页
response.end '结束后面代码的操作
else
'验证用户名和密码输入错误的处理
response.write ”
response.write ”
返回上一页
rs.close
set rs=nothing
end if
else
response.write ”登录出现错误或者数据库被破坏！“
end if
end sub %>
5、输入留言界面。思路：用户不用注册就可以留言，管理员留言时一些基本信息自动调用。<%sub input%>
end sub%>6、留言内容入库 sub recadd '读取表单数据
user_name=request(”username“)
user_email=request(”email“)
user_qq=request(”oicq“)
user_address=request(”address“)
user_homepage=request(”homepage“)
user_webname=request(”webname“)
user_image=request(”images“)
user_ip=request.servervariables(”remote_addr“)
user_content=chkuserstring(request(”content“))
user_silent=request(”silent“)
user_time=now()'将读取数据写入库
strSql = ”insert into content(user_name, user_qq,user_email,user_address,user_homepage,user_webname,user_image,user_ip,user_content,user_silent,user_time)Values('“
strSql = StrSQl & user_name & ”', '“
strSql = StrSQl & user_qq & ”', '“
strSql = StrSQl & user_email & ”', '“
strSql = StrSQl & user_address & ”', '“
strSql = StrSQl & user_homepage & ”', '“
strSql = StrSQl & user_webname & ”', '“
strSql = StrSQl & user_image & ”', '“
strSql = StrSQl & user_ip & ”', '“
strSql = StrSQl & user_content & ”', “
strSql = StrSQl & user_silent & ”, '“
strsql = strsql & now()&”')“
conn.Execute(StrSql)'关闭数据库
conn.close
set conn=nothing '返回留言簿首页
response.write”
response.write”留言成功，,正回留言簿.......
response.end end sub %>
第二篇：留言簿的制作过程
动态站点（留言簿）的制作过程
一、安装调试ASP环境
安装IIS或将NetBox测试服务器复制到你的站点根文件夹中。
1、打开“控制面板”—选择“添加或删除WINDOWS组件”
2、选择IIS信息服务的复选框，单击“下一步”（注意：需有WINDOWS的安装光盘或其备份）
3、若IIS组件安装完毕，打开控制面板的“管理工具”，选择“Internet信息服务”---双击
4、右击“默认网站”—“属性”—选择“网站”选项卡的“IP地址”为127.0.0.1
5、选择“主目录”为本地站点根文件夹
6、选择“文档”为index.asp
至此，IIS服务器配置完毕。
二、打开ACCESS , 建立数据库。
三、建立动态站点
1、配置本地信息
2、测试服务器
3、新建动态网页index.asp，并设计静态显示部分。
四、打开应用程序面板，选择“数据库”，检查前三步设置是否完成。
若已完成，单击“+”，添加数据源名称（DSN），见课本。
五、继续选择应用程序面板的“绑定”，单击“+”，添加记录集，见课本插图。
六、将动态内容添加到静态页面中
七、继续选择应用程序面板的“服务器行为”，单击“+”，添加“重复区域”、“记录集分页”
八、若要添加留言，须制作添加留言界面如insert.asp,只要在此页面中添加一个一行一列的表格，再选择“应用程序工具栏”中的“插入记录表单向导”，进行设置即可。
九、若要添加管理员登陆页面，须在页面中先添加表单元素，再添加服务器行为“用户身份验证---登录用户”
第三篇：留言簿的制作步骤
留言簿的制作步骤: 1> ACCESS中的数据表的建立：文件名：
表中必有字段：ID——自动编号；姓名——文本；性别——文本（值为01或02）；留言主题——文本；留言——备注（255）；发表时间——时间或日期（默认值为函数NOW）
保存位置：站点根目录。
2> 创立动态站点 3> 数据源的连接
A：自定义Provider=Microsoft.Jet.OLEDB.4.0;Data Source=“&server.mappath(”db1.mdb“)B：（尝试）数据源：管理工具中数据源的设置。（系统DSN）
4> liuyanban.asp文件的建立
界面设计（略）
应用程序——绑定
姓名——{Recordset1.xinming}；发表时间——{Recordset1.fbshijian}；留言主题——{Recordset1.liuyanhuti}；留言——{Recordset1.liuyan} 重点（难点）：头像（根据性别输出头像）插入图像（来自数据源）images/<%=(Recordset1.Fields.Item(”xinbie“).Value)%>.jpg
(在站点下建有images文件夹，内有01.jpg 和02.jpg)应用程序——服务器行为——重复区域；记录集分页 5> charuliuyan.asp文件的制作
界面设计（略）
表单元素（性别用单选按钮组，值分别为01或02）
应用程序——服务器行为——插入记录
6> 功能——删除记录
liuyanban.asp——选中文本（删除）转到详细页面： ID shachuly.asp忽略： 界面设计（略）
表单元素绑定（性别）移至特定记录 删除记录
7> 功能——修改记录
liuyanban.asp——选中文本（修改）转到详细页面： ID xiugaily.asp忽略： 界面设计（略）
表单元素绑定（性别）移至特定记录ID 修改记录
补充功能：计数器（访问次数）——liuyanban.asp
这是你第 {Application.count}次访问这张网页了！!应用程序——绑定——应用程序变量count
<%Application(”count“)= Application(”count")+1 %>
练习：通讯录系统
第四篇：制作一个商品宣传与购物网站 asp+access
北京联合大学
实训报告
课程（项目）名称：专业综合训练---动态网站设计与建立
任务1 网站总体规划设计
一、任务与目的
1.实验任务
(1)要求设计制作一个商品宣传与购物网站，网站必须包括以下功能： 用户登录与注册 商品宣传展示 商品搜索 网上购物
(2)完成网站的需求分析。
(3)设计网站的内容、风格与功能。
(4)划网站的结构（目录结构、页面层次结构）。(5)完成网站后台数据库的设计。2.实验目的
(1)掌握网站功能与结构的规划和设计方法。
(2)掌握网站后台数据库的设计方法。
二、原理（条件）
1.相关知识：
(1)网站的规划设计原则与设计方法。
(2)数据库的设计与建立方法。2.实验条件：
局域网环境，其中包含Windows 2000 Server计算机一台以上。
三、内容与步骤
1．网站的需求分析。
要求设计制作一个商品宣传与购物网站，网站必须包括以下功能：用户登录与注册、商品宣传展示、商品搜索、网上购物。
2．网站的内容、风格与功能设计。
经过考察，apple的电子产品在市场上的销售效果比较好，并加上自己的喜好，决定对apple产品进行宣传和销售。网站的风格定位为简单清新，便于浏览，功能模块清楚，操作简单易行。其中功能包括：用户登录与注册、商品宣传展示、商品搜索、网上购物，留言与回复。
3.网站结构的规划。
网站包括:数据库——yonghuinf.mdb主页——index.Asp
登陆：
留言： 商品订购：4.网站后台数据库的设计。
四、现象分析
网站的主页设计基本如下图，每个功能模块清晰易见。
五、结论
通过本次任务，我知道在制作网页之前的，进行必要的功能分析和结构规划是很有必要的。不然的话，即使每个网页做的很漂亮也关联不起来，只能像无头苍蝇一样，乱做，结果想要的效果不能很好的达到。
任务2 网站页面的设计与制作
一、任务与目的
1.实验任务
(1)设计各网页的内容、功能和布局。
(2)利用Dreamweaver、Photoshop等完成网页的制作。(3)实现网页间的链接。
2.实验目的
(1)掌握网页的设计原则。
(2)掌握网页的制作方法。
二、原理（条件）
1.相关知识：
(1)网页的设计原则与设计方法。
(2)Dreamweaver、Photoshop等软件的相关知识。
2.实验条件：局域网环境，其中包含Windows 2000 Server计算机一台以上。
三、内容与步骤
1.设计各网页的内容、功能和布局。管理员部分：
登陆和注册部分：
留言部分：
订单部分：
2.利用Dreamweaver、Photoshop等完成网页的制作。3.为网页添加多媒体内容，包括图像、动画、声音等。4.实现网页间的链接。
四、现象分析
在完成网站的需求分析，内容、风格与功能的设计，网站的结构（目录结构、页面层次结构）的规划，网站后台数据库的设计和总体规划之后，开始对每一个独立的网页进行设计，并实现网页间的链接。
五、结论
在实训的过程中会遇到网页之间测试不通的现象，也会经常遇到代码调试不通过的现象。很多时候，是因为命名的问题，不管是网页的命名还是元素的命名都是在实训过程中需要注意的。在网页之间链接同样会涉及到相对路径与绝对路径的东西，如果这个没掌握好也是无法成功进行的。
任务3 ASP动态站点的建立
一、任务与目的
1.实验任务
(1)设计各网页的动态内容。
(2)实现网页与后台数据库的连接与访问。(3)使用ASP技术添加动态网页效果。
2.实验目的
(1)掌握网页与后台数据库的连接方法。(2)掌握ASP技术的应用方法。
二、原理（条件）
1.相关知识：
(1)数据库连接与访问技术。
(2)ASP动态编程方法。
2.实验条件：局域网环境，其中包含Windows 2000 Server计算机一台以上。
三、内容与步骤 1．网页动态内容设计。
通过表单、记录集、重复区域等的设置，实现网站的动态规划，实现网站之间参数的传递。
2．网页与后台数据库的连接。
3．添加网页动态效果。
4.动态网页的测试。
通过浏览器的验证，基本实现了任务一规划的功能和目标，可以完整的进行购物和商品的展示。
四、现象分析
通过本次实验，包括数据库的链接，网站的参数的传递，网站的动态交互功能的设计。让本来不想链接的或者是简单链接的独立网页，之间有了联系。使用到了很多比如记录集，数据库，重复区域，表单等一系列的asp功能，并对session变量进行应用。
五、结论
经过两个星期的实训，在老师和同学的帮助下。商品网页在功能和效果上均达到预期的效果，能合适的进行操作。在整个过程中，对一个网页设计项目的全貌和细节能有一个很好的把握。不仅巩固了asp+dreamweaver的基础知识，也使他的高级技巧得到应用，收获不小。
第五篇：留言簿系统
留言簿系统一、系统概述
本系统是一个简单的留言簿系统，可以用于发表留言、查看已发表留言、管理留言等功能，具有以下特点：
1、无需FSO、无需数据库支持，高速运行；
2、具有强大的分页功能，并且具有自动对新留言排序功能；
3、具有回复功能，回复留言没有任何权限限制；
4、具有留言阅读总数统计功能；
5、具有回复留言总数统计功能；
6、同时采用了数据岛显示所有留言功能；
7、可以在任意IIS版本中运行，对浏览器无任何要求；
8、界面美观，无需美化即可使用；
9、类似BBS风格，可以作为小型论坛使用。
二、系统设计
本系统分为：
1、首页
首页中显示所有留言，以及每条留言的具体信息，如：发表人、留言标题、发表日期、阅读次数和回复次数。
2、新增留言
新增留言中可以编辑要增加的留言，包括发表人基本信息、留言标题以及留言内容等，编辑完成后即可提交，还可消除重填。
3、查看留言
在首页中点击要查看的留言即可查看有关该留言的详细信息，包括留言内容、标题、日期、回复和浏览次数等。
4、回复留言
查看某一留言的时候，若想回复即可单击页面中的“回复留言”按钮，编辑回复内容。编辑完成后提交，可查看回复内容和所回复的留言。
三、界面设计
本系统界面设计简洁、美观。
1、留言簿首页
2、新增留言
3、回复留言
4、查看留言
四、功能实现
本系统是一个简单的留言簿系统，可以用于发表留言、查看已发表留言、管理留言等功能，具体可以实现以下功能：
1、分页功能
2、新增留言功能；
3、自动对新留言排序功能；
4、查看留言功能；
5、回复留言功能，回复留言没有任何权限限制；
6、留言阅读总数统计功能；
7、回复留言总数统计功能；
8、显示所有留言功能；
点击咨询 