留言板系统.docx

1、留言板系统辽 宁 工 业 大 学数据库应用技术课 程 设 计 说 明 书题目： 网络留言板系统 学院（系）： 软件学院 专业班级： 学 号： 学生姓名： 苏 洋 指导教师： 教师职称： 起止时间：2014.12.19-2014.1.31 第一章 概述网络在人们的生活中扮演了越来越重要的角色，各色网站、论坛相应而生，我们在浏览信息的同时也需要及时地交流信息，所以留言板在各类网站中应用广泛。网络中各种留言板系统在DW等工具的编辑美化后和网站融为一体，作为网站的交流平台起到举足轻重的作用。留言板可以提供一个公共的信息发布平台，适用于作为企业内部个人办公助手以及企业与企业之间进行信息交流；在线解决某些

2、客户需求是网站中信息多、人气旺的地方，所以好的留言板可以吸引相当数量的访客，同时也担负着网站对外宣传、发布消息、收集客户反馈的重任，是网站、单位内联网必不可少的一部分。留言板的原理：将留言内容等写入服务器端的文本或数据库,再显示出来。用ASP开发留言板可以很方便的嫁接在网站中运行，所以下面将以此开发一个留言板设计。第二章 问题定义网络留言板系统分为前台管理和后台管理。前台管理包括留言查看、回复留言、注册用户等功能。后台管理包括留言管理、用户管理等模块。后台管理具体功能描述如下：1.留言管理留言管理的主要功能是添加、修改、删除留言信息。2.用户管理用户管理的主要功能是添加、修改、删除用户信息。3

3、.系统用户管理系统用户管理的主要功能是系统用户的录入、修改用户的密码、用户信息查看。4.系统用户管理系统用户管理的主要功能是Admin用户修改自己的密码；Admin用户创建或删除用户；用户修改自己的密码；用户修改自己的用户信息；注册个人用户；个人用户修改自己的密码；个人用户修改自己的用户信息。本系统功能模块划分如图1所示。图1 系统功能模块用户申请流程如图2所示。图2 用户职位申请流程第三章 需求分析一、数据库需求分析数据库是系统的信息保管所，所以，一个有效率高效的系统必定要有一个高效的数据库设计。本系统的数据库设计主要就是针对高效性进行的。数据库基本信息（1） 用户表（2） 留言表（3） 回

4、复表二、数据流程图1.个人用户的数据流程如图4所示。 图4 个人用户的数据流程 2.Admin用户流程如图5所示。图5Admin用户流程图 三、物理实现根据概念结构设计的结果，采用微软公司的SQL Server 2000实现数据库、各个表的创建以及各表约束的添加。第四章 数据库设计一、概念设计：系统ER图采用E-R模型的概念结构设计方法：图6 用户表实体E-R图 图7 留言表实体E-R图 图8 回复表实体E-R图从E-R图到关系表的转化及数据模型的优化。本系统定义的数据库中包含以下3个表：用户表us如表1所示、留言表liuyanbiao如表2所示、回复表answer如表3所示。表1 用户表us

5、列名数据类型长度可否为空说明User_idInt4NOT NULL用户编号（自动编号）Namesvarchar20NOT NULL用户名Pwdvarchar20NULL密码StateInt4NULL权限级别Company varchar100NULL所在公司Address varchar200NULL联系地址Mobile_phonevarchar50NULL联系电话Email varchar50NULL电子信箱表2 留言表liuyanbiao列名数据类型长度可否为空说明IdInt4NOT NULL留言编号（自动编号）Subjectvarchar20NULL留言标题MemoVarchar500N

6、ULL留言内容TimeDatetime8NULL留言时间Homepagevarchar20NULL主页表3 回复表answer列名数据类型长度可否为空说明As_idInt4NOT NULL回复编号（自动编号）Memovarchar500NULL回复内容TimeDatetime8NULL回复时间Namevarchar20NULL用户名第五章 界面设计一、登陆窗口如下所示：系统登入后，首先出现用户登录窗体，用户首先等如用户名然后输入密码。如果用户3次输入密码不正确，将退出程序。登录界面 如图9所示图9 登录界面注册界面 如图10所示。图10 注册界面每个浏览本系统的游客都可以注册成为个人用户。在系

7、统主页中没有登录的用户可以看到“用户注册（如图9所示）”超级链接。单击此链接，将执行userreg.asp。后台用户管理程序设计第六章 代码与注释一、数据库中存储过程源码主要代码如下：Imports System.Data.SqlClientPartial Class login Inherits System.Web.UI.PageProtected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim user As String Dim pwd As

8、 String Dim degree As String user = TextBox1.Text pwd = TextBox2.Text If RadioButton1.Checked = True Then degree = 2 Else degree = 1 End If Dim da As New Class1 Dim dr As SqlDataReader dr = da.ExecuteRead(select * from us where names= & user & and pwd= & pwd & and state= & degree & ) If dr.Read = Tr

9、ue Then dr.Close() If degree = 1 Then Response.Redirect(admin.aspx) Else Response.Redirect(use.aspx) End If Else Label1.Text = 用户名、密码或用户类型选择错误，请重新登录！ TextBox1.Text = TextBox2.Text = TextBox1.Focus() End If End SubEnd ClassImports System.Data.SqlClientPartial Class guestbook Inherits System.Web.UI.Pa

10、ge Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim user_name As String Dim pwd As String Dim company As String Dim adress As String Dim email As String user_name = TextBox1.Text pwd = TextBox2.Text company = TextBox3.Text adress = TextBox4.T

11、ext email = TextBox5.Text Dim da As New Class1 Dim n As Integer n = da.ExecuteSql(insert into us(names,pwd,state,company,adress,email)values( & user_name & , & pwd & ,2, & company & , & adress & , & email & ) If n = 1 Then Label1.Text = 学生数据添加成功 Else Label1.Text = 学生数据添加有错误 End If End SubEnd ClassIm

12、ports System.dataImports System.Data.SqlClientPartial Class userdel Inherits System.Web.UI.Page Protected Sub bind() Dim sql As String sql = select * from us Dim da As New Class1 Dim dset As DataSet dset = da.Executedataset(sql) GridView1.DataSource = dset GridView1.DataMember = dset.Tables(0).ToStr

13、ing GridView1.DataBind() End Sub Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load If Not Page.IsPostBack Then bind() End If End Sub Protected Sub GridView1_PageIndexChanging(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewPageEventArgs

14、) Handles GridView1.PageIndexChanging GridView1.PageIndex = e.NewPageIndex bind() End Sub Protected Sub GridView1_RowCancelingEdit(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewCancelEditEventArgs) Handles GridView1.RowCancelingEdit GridView1.EditIndex = -1 bind() End Sub Protected Sub GridView1_RowDeleting(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewDeleteEventArgs) Handles GridView1.