留言簿框架图
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
Dreamweaver2004序列号:WPD700-52206-61494-40475
留言簿
一、网站规划图
管理所有的留言
二、数据库设计
一个数据库,库命名用学号或拼音缩写,包括三个数据表。表结构如下:
1、用户表:
输入第一条信息是自己的信息
2、管理员表:
管理用户名为个人的姓名拼音、密码随便
3、留言簿
4、建立用户表与留言簿之间的关系,对应一对多的关系
三、网页与数据库连接
数据库存取组件(database access component):采用ADO技术存取符合ODBC(开放式数据库连接)的标准的数据库信息。
连接方法有三种:
1)基于ODBC数据源的方式:
首先定义数据源,方法如下:(书中P151)管理工具—数据源(ODBC),系统DSN,添加。
数据源名称为自己姓名拼音
建立与数据库连接,单独保存在一个网页中,网页名称为自己的学号或姓名的缩写
代码如下:
1)基于ODBC数据源的方式:
dim conn
set conn=server.CreateObject("adodb.connection")
conn.open “dsn=数据源名称”
2)基于ODBC,无数据源的方式:(远程服务器是无法建立数据源的)dim conn
set conn=server.CreateObject("adodb.connection")
conn.open “driver={Microsoft access driver
(*.mdb)};dbq=”&server.mappath(“ly.mdb”)
3)基于ole db的连接方式(ole db数据库驱动程序,推荐使用第三种方法)
dim conn
set conn=server.CreateObject("adodb.connection")
conn.open “provider=Microsoft.jet.oledb.4.0;data
source=”&server.mappath(“ly.mdb”)
四、功能模块的设计
以下所有显示内容的网页中均定义一个常量,常量名为“某某的留言簿”,将此常量添加到标题和文件头的描述中。
1、注册会员的功能模块的程序设计
包括二个页面,一个是注册表单页面,一个是处理表单页面。
涉及到的知识点:request、response、session对象等。(1)Request.form(“参数名”) 读取表单的信息
(2)response.write …在客户端输出信息
(3)response.end 程序结束
(4)response.redirect(“参数名”)跳转到某个网页
(5)session(“参数名”)=变量名
记录某个特定用户的信息(用户的信息存放在服务器端)
读取session对象的信息
变量名= session(“参数名”)
session对象存储用户的信息默认为20分钟。
程序代码提示:
1)读取表单信息:
Request.form(“表单元素名称”)
比如:读取用户名
Dim username
Username=trim(request.form(“username”))
注意第一个username为变量,第二个是表单元素的名称。不要混淆。2)判断是否为空
条件语句
If username=”” or email=”” then
为空:response.write "你输入的信息不全!请返回注册界面"
不为空:执行以下程序
3)建议记录集
Dim sql
以下是查询语句
Sql=”select * from users where username=‟”&username&”‟”
建立记录集
Set rs=conn.execute(sql)
4)判断是否有重复的用户名,即在记录集中是否有记录
如果有:
If not rs.eof and not rs.bof then
Response.write “用户名重复,请返回”Response.end‘程序停止运行
若没有重复,即将信息插入到数据库中。
Sql="insert into users(username,mima,email,submit_date) Values('" & username & "','" & password & "','"& email & "',#"&date()&"#)"
conn.execute(sql)
在此提醒,如果变量为字符串类型需在添加引号,如是日期/时间类型需添加#号。
5) 建立session对象,并跳转到插入留言页面。
Session(“username”)=username
Response.redirect(“ly.asp”)
2、添加留言功能模块的程序设计:共有二个页面,表单页面
界面如图所示:
处理留言页面:
3、登陆功能模块的程序设计
有二个页面构成,一个是表单登陆页面,一个处理登陆信息页面。表单登陆页面:
处理登陆信息页面:
代码提示:
建立记录集
Dim sql,rs
Sql=”select * from users where username=‟”&username&”‟and mima=‟”&password&”‟”
Set rs=conn.execute(sql)
是否有符合条件的记录
If not rs.eof and not rs.bof then
建立session对象,跳转到管理留言页面。
4、管理留言页面(注意:这里是用户管理自己的留言,不能修改或删除其它人的留言)
共包括三个页面:管理留言页面、删除页面、更新页面。
管理留言页面: