《Access图书馆管理系统》由会员分享，可在线阅读，更多相关《Access图书馆管理系统（22页珍藏版）》请在金锄头文库上搜索。
1、课 程 设 计 报 告 （数据库技术及应用）题目： 图书馆管理系统院 别： 通信与信息工程学院专 业： 通信与信息类姓 名： 王宗义 叶祥吉学 号： 2011210325 2011210330指导教师： 刘伯红重庆邮电大学2012年 12月02日一、课程设计题目图书馆管理系统二、功能描述根据图书管理员在图书借阅管理过程中遇到的实际情况，图书馆管理系统应具有以下功能：（1）系统应允许管理员对管理员信息、图书信息及类型信息、读者信息及其类型信息进行添加、修改和删除操作；（2）系统应允许管理员对图书信息和读者信息进行查询操作；（3）图书借出或归还时，管理员可对借书信息和还书信息进行添加、修改、删除和
2、查询操作；（4）系统能为管理员提供读者信息报表和借书信息报表。三、概要设计根据系统功能的描述，图书馆管理系统主要有系统设置、信息管理、运行管理、信息查询、报表显示五大功能模块，每个模块中又包含几个子模块完成其相应的功能，系统所有功能模块如图一所示。（1） 图书类型设置模块 图书类型设置模块可以实现对图书类型的管理，可进行图书类型信息的添加、修改和删除操作；（2） 读者类型设置模块读者类型设置模块可以实现对读者类型的管理，可进行读者类型信息的添加、修改和删除操作；（3） 图书信息管理模块 图书信息管理模块可以实现对图书的管理，可进行图书信息的添加、修改和删除操作；（4） 读者信息管理模块 读者信
3、息管理模块可以实现对读者的管理，可进行读者信息的添加、修改和删除操作；（5） 图书借阅管理模块 图书借阅管理模块可以实现对借书信息的管理，可进行借书信息的添加、修改和删除操作；（6） 图书归还管理模块 图书归还管理模块可以实现对还书信息的管理，可进行还书信息的添加、修改和删除操作；（7） 图书信息查询模块 图书信息查询模块可根据书籍名称对书籍信息进行查询；（8） 读者信息查询模块 读者信息查询模块可根据读者编号对读者信息进行查询；（9） 按照读者编号查询借书信息模块 按照读者编号查询借书信息模块可以根据读者编号对读者的借书情况进行查询；（10） 按照读者编号查询还书信息模块 按照读者编号查询还
4、书信息模块可以根据读者编号对读者的还书情况进行查询；（11） 按照书籍名称查询借书信息模块 按照书籍名称查询借书信息模块可以根据书籍名称对书籍的借阅情况进行查询；（12） 照书籍名称查询还书信息模块 按照书籍名称查询还书信息模块可以根据书籍名称对书籍的归还情况进行查询；（13） 读者信息报表显示模块 读者信息报表显示模块可以对读者信息进行进行查询，最后生成相应的报表；（14） 书籍报表显示模块 借书报表显示模块可以根据读者编号对读者的借书情况进行查询，最后生成相应的报表。四、详细设计1、数据库所需基本表： （1）图书类别：类别编码、类别名称、关键词、备注4个字段； （2）读者类型：类型编号、类
5、型名称、可借天数、可借数量、有效期限、备注6个字段；（3）图书信息：图书编号、图书名称、图书类别、作者、出版社、出版日期、书籍页数、关键词、登记日期、备注10个字段；（4）读者信息：读者编号、读者姓名、读者类型编号、性别、工作单位、家庭住址、电话号码、电子邮件地址、办证日期、备注10个字段；（5）借书信息：借阅信息编号、读者编号、读者姓名、图书编号、图书名称、借书日期、应还日期、备注8个字段；（6）还书信息：还书编号、读者编号、读者姓名、图书编号、图书名称、借书日期、还书日期、备注8个字段。2、数据库逻辑结构设计图一 图书管理系统的功能模块图表一 图书类别表字段名称数据类型字段大小主键类别编码
6、文本10是类别名称文本50否关键词文本50否备注备注否表二 读者类型表字段名称数据类型字段大小主键类型编号文本10是类型名称文本20否可借天数数字长整型否可借数量数字长整型否有效期限日期/时间长日期否备注备注否表三 图书信息表字段名称数据类型字段大小主键图书编号文本10是图书名称文本30否图书类别文本20否作者文本20否出版社文本20否出版日期日期/时间短日期否书籍页数数字长整型否关键词文本50否登记日期日期/时间短日期否备注文本否表四 读者信息表字段名称数据类型字段大小主键读者编号文本10是读者姓名文本20否密码文本10否读者类型编号文本10否性别文本1否工作单位文本30否家庭住址文本50否
7、电话号码文本15否电子邮件地址文本50否办证日期日期/时间短日期否备注备注否表五 借书信息表字段名称数据类型字段大小主键借阅信息编号自动编号长整型是读者编号文本10否读者姓名文本10否图书编号文本10否图书名称文本20否借书日期日期/时间短日期否应还日期日期/时间短日期否备注备注否表六 还书信息表字段名称数据类型字段大小主键还书编号自动编号10是读者编号文本10否读者姓名文本10否图书编号文本10否图书名称文本20否借书日期日期/时间短日期否还书日期日期/时间短日期否备注备注否据各表的结构，在Access2003中可以完成“图书馆管理系统”数据库及表的创建工作。3、创建表间关系表之间的具体关系
8、如图二所示。图二 表间关系图4、创建查询根据窗体的需要一共创建了6个查询，分别为：（1）读者信息查询：根据读者编号查询读者信息；（2）书籍信息查询：根据书籍的名称查询书籍信息；（3）按照读者编号查询借书信息：根据读者编号查询该读者的借书信息；（4）按照读者编号查询还书信息：根据读者编号查询该读者的还书信息；（5）按照书籍名称查询借书信息：根据书籍名称查询该书的借阅信息；（6）按照书籍名称查询还书信息：根据书籍名称查询该书的归还信息。查询创建的方法采用设计视图创建查询，以“读者信息”查询为例，具体方法见图三。其他查询效果图见第五效果部分。5、窗体设计各窗体的设计方法基本一样，以下仅以“管理员登陆
9、”窗体为例进行设计，其他窗体见第五效果部分。利用“用户登陆”窗体可以进入图书馆管理系统的主界面，其窗体效果如图四所示。图三 读者阅读情况查询 “用户登陆”窗体的创建步骤如下：（1）在数据库窗口中选择窗体对象，然后双击按钮；（2）弹出如图的窗体图四：窗体（3）选择“主菜单”插入图片命令；在窗体的“工具箱”中选择三个指令和一个指令，然后分别在三个label指令窗口中输入“Microsoft Access 2003”、“欢迎使用”、“图书管理系统”，在Command指令窗口输入“用户登陆”，然后设置字体与大小；（4）利用“文本框”控件，在窗体主体区创建两个文本框text0和text3，并把标签标题分
10、别改为“管理员账号”和“密码”；（4）单击右键，选择，会弹出如图的选择发生器图五然后选择“代码生成器”，单击“”，会弹出VB代码编译窗口，然后输入如下代码：Option Compare DatabasePrivate Sub Command4_Click()On Error GoTo Err_Command4_Click Screen.PreviousControl.SetFocus DoCmd.FindNextExit_Command4_Click: Exit SubErr_Command4_Click: MsgBox Err.Description Resume Exit_Command4
11、_ClickEnd SubPrivate Sub Command7_Click()DoCmd.OpenForm 登录窗体DoCmd.MaximizeEnd SubPrivate Sub Command8_Click()Dim intx As Integer Dim intCount As Integer intCount = Forms.Count - 1 For intx = intCount To 0 Step -1 DoCmd.Close acForm, Forms(intx).Name Next End SubPrivate Sub Form_Timer() If Label3.Fon
12、tSize 36 Then Label3.FontSize = Label3.FontSize + 2Else Me.TimerInterval = 0 End IfEnd SubPrivate Sub Command9_Click()On Error GoTo Err_Command9_Click Dim stDocName As String Dim stLinkCriteria As String stDocName = ChrW(27426) & ChrW(-28722) & ChrW(30028) & ChrW(-26782) DoCmd.OpenForm stDocName, ,
13、, stLinkCriteriaExit_Command9_Click: Exit SubErr_Command9_Click: MsgBox Err.Description Resume Exit_Command9_Click End SubPrivate Sub Command10_Click()On Error GoTo Err_Command10_Click Dim stDocName As String Dim stLinkCriteria As String stDocName = ChrW(32467) & ChrW(26463) & ChrW(31383) & ChrW(20307) DoCmd.OpenForm stDocName, , , stLinkCriteriaExit_Command10_Click: Exit SubErr_Command10_Click: MsgBox E
