数据库课程设计报告8736345Word格式.docx

1、2.3系统的功能性需求功能序号功能名称功能说明1图书管理包含图书类别、信息管理、查询图书信息等2读者管理管理包含读者类别、读者信息、查询读者信息等3图书借阅管理包含借书管理、还书管理4系统管理系统退出2.4系统的非功能性需求2.4.1用户界面需求简洁、易用、易懂，美观、大方、标准，具备一定的兼容性。2.4.2系统开发平台前台：Microsoft Visual Basic6.0后台：Microsoft SQL 2000 Server2.4.3软件质量需求易用、健壮、兼容性好、运行稳定、有一定安全保障。2.5技术可行性系统的性质为MIS或财务软件，因而数据库的设计与操纵是系统设计的核心。我们经过一

2、个学期对数据库原理、VB6.0以及专业知识的学习，具备一定的系统分析与设计能力，熟悉数据库的设计与操纵；因而该系统的实现在技术上是可行的。2.6项目规划项目开发可分为两个阶段： 第一阶段 用时约2周，进行系统初步调查、系统分析、需求分析、详细设计，画出系统流程图，数据流程图，数据字典，程序流程图。 第二阶段 用时约1周，进行程序的编写。利用VB进行程序的实际编写、测试及程序打包。第三章 总体结构设计数据库主要着重于数据对象的属性和数据对象之间的关系的分析。一般采用E-R图，即实体-关系模型来分析数据对象的属性和数据对象之间的关系。3.1 E-R模型设计3.1.1 实体列表实 体描 述读 者所有

3、借阅者，由读者号标识图 书图书馆所有图书，由图书编号标识借 阅姓名、书名 、借书日期等属性,由图书编号和读者号标识管 理 员系统管理人员3.1.2 系统的E-R模型有关实体及其属性图如下： 实体集 实体属性 实体之间的联系该图书管理系统的E-R模型，如下图所示3.2 设计数据库3.2.1创建数据库（1）在企业管理器中的数据库上右击。（2）执行“新建数据库”命令,并在打开的“创建数据库”对话框中输入数据库名“图书馆数据库”。（3）单击“确定”按钮，则新建的数据库就会出现在企业管理器上。3.2.2创建数据表创建数据库后，为“图书馆数据库”添加数据表，步骤如下。（1）在企业管理器中右击“图书馆数据库

4、”下的“表”文件夹。在弹出的快捷菜单中执行“新建表”命令，出现表设计器。（2）添加表的字段和其他详细资料。3.2.3各表设计详解说明：空缺位置表示无要求，主键在约束栏注明。视图表名类型说明读 者 表基本表读者信息图 书 表图书信息借 阅 表借阅读者、书籍信息用户管理登陆账号、密码基本表：读者表字 段长度约束借书证号int主键姓 名char10性 别班 级20年 龄图书表字段图书编号varchar25书 名作 者出 版 社出版时间50类 别24用户管理用户名密 码所在部门datetime备 注借出表8借书证编号读者姓名所借图书借出时间第四章 DB的详细设计4.1数据库环境说明考虑该系统的定位与现

5、有技术力量,决定采用Microsoft SQL 2000 Server作为系统的后台数据库开发环境。4.2 DB逻辑设计图4.1数据库逻辑结构图43程序流程图的设计程序流程图的代号如下：本系统的流程分析图如图4.2所示图4.2 系统流程分析图44 原代码设计4.4.1 系统主界面代码Private Sub Command1_Click（）登陆界面.Show 1End SubPrivate Sub Command2_Click（）Unload MePrivate Sub Command3_Click（）图书管理.Show 1Private Sub Command4_Click（）借阅管理.Sho

6、w 1Private Sub Command5_Click（）还书管理.Show 1Private Sub Command6_Click（）系统管理.Show 1Private Sub Form_Load（） Command3.Enabled = False Command4.Enabled = False Command5.Enabled = False Command6.Enabled = False Skin1.LoadSkin App.Path & green.skn Skin1.ApplySkin Me.If Text1.Text = name And Text2.Text = pa

7、ssword Thenr = MsgBox（欢迎进入湖南工学院图书借阅管理系统!, , 恭喜，登陆成功！Print r主页mand3.Enabled = True主页mand4.Enabled = True主页mand5.Enabled = True主页mand6.Enabled = True主页mand1.Caption = 已登陆主页mand1.Enabled = FalseElseMsgBox 帐号或密码错误，请重新登陆！登陆失败 End If If Combo1.Text = 普通用户 ThenIf Text1.Text = name And Text2.Text = password

8、 And Adodc1.Recordset.Fields（权限） = 普通用户 Then主页mand6.Enabled = False Adodc1.RecordSource = select * from 图书表 where 书名= & Text1.Text & Adodc1.Refresh请输入所借图书的书名, 提示End IfAdodc1.RecordSource = select * from 图书表Adodc1.RefreshAdodc2.RecordSource = select * from 读者表Adodc2.RefreshAdodc3.RecordSource = select * from 借出表Adodc3.RefreshIf Not Text1.Text = And Not Text2.Text = select * from 读者表 where 借书证编号= Text2.TextAdodc3.Recordset.AddNewAdodc3.Recordset.Fields（图书编号） = Adodc1.Recordset.Fields（所借图书书名读者姓名） = Adodc2.Recordset.Fields（姓名Adodc3.Recordset.Fie