(完整word版)数据库实验报告图书管理系统.doc 立即下载
2024-09-09
约7.6千字
约23页
0
2.5MB
举报 版权申诉
预览加载中,请您耐心等待几秒...

(完整word版)数据库实验报告图书管理系统.doc

(完整word版)数据库实验报告图书管理系统.doc

预览

免费试读已结束,剩余 18 页请下载文档后查看

10 金币

下载文档

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

(完整word版)数据库实验报告图书管理系统
(完整word版)数据库实验报告图书管理系统
(完整word版)数据库实验报告图书管理系统
图书馆管理系统的设计
一、实验背景:
在数据库应用系统的编程中,管理人员需要经常从数据库中查询数据。复杂组合查询,特别是多种数据类型的复杂条件动态组合查询是一个设计难度大,但很能方便用户的功能模块,在系统开发时要尽量满足用户的需要,就必须考虑多类型-多条件综合模糊查询功能,提高应用系统的智能性。消费者在选择市场产品时往往面临数据量大、删选难、数据不全面等问题,多类型-多条件综合模糊查询正式基于此设计的。
二、实验内容:
以SQLSERVER2008为后台数据库,以VisualBasic为前台开发工具,完成一个以人事管理系统为实例或结合相关专业方向的查询界面友好的多类型-多条件综合模糊查询应用模块的设计与开发,以满足用户复杂查询的需求,具体内容包括:1)数据库概念结构和逻辑结构的设计;
2)通过SQL语句创建数据库;3)设计通用模块;4)设计窗体,达到界面简洁,友好的要求;5)编写代码,使程序能正确执行;6)调试美化,提高查询效率。


三、需求分析
图书馆是这样的部门,馆中收藏大量图书供读者借阅,其中图书可分成不同的类别,如自然科学类、社会科学类等;借阅者可分为老师和学生。不同的借阅者最多可借书的数量和期限不同,如教师最多可借10本,期限为3个月,学生最多可借2本,期限为1个月,无论是老师还是学生,借阅超期都要进行罚款处理。以上就是图书管理系统所要完成的主要功能。

四、概念结构设计
经分析,本系统涉及到的实体只有读者和图书,二者之间存在借阅和罚款的联系,据此可画出此系统的E-R图。
罚款金额

读者
借出日期

p
m
超期天数
罚款
借阅




处罚日期
图书
归还日期
q
N



图书馆管理系统的E-R图

其中读者与其属性关系,图书与其属性关系如下图


读者类别
读者姓名

性别


是否有超期
借书证号



读者









读者实体与其属性




书名
条形码号

作者

图书编号


出版社


图书

借阅次数
借阅状态
类别
出版日期










图书实体与其属性







五、数据库表格
图书表的结构




读者表的结构



借阅表的结构



罚款表的结构


密码表的结构



六、用VB开发应用程序
1配置数据源
利用ODBC数据源管理器配置一个连接到“图书馆”数据库的数据源,名为“图书管理”。
2设计各个窗体
设计MDI主窗体
从主窗体中可以打开各个功能的窗口,其中图书馆管理系统的主窗体如下图

设计登陆窗体
设计界面如下图


编写程序
PrivateSubCommand1_Click()
DimstrAsString
DimmicountAsInteger
str="select密码from密码表的结构where用户名='"&Text1.Text&"'"
Adodc1.RecordSource=str
Adodc1.Refresh
IfAdodc1.Recordset.EOF=TrueThen
MsgBox"用户名错误,请重新输入",vbExclamation,"警告"
Text1.Text=""
Text1.SetFocus
Else
IfAdodc1.Recordset.Fields("密码")=Text2.TextThen
MDIForm1.Show
UnloadMe
Else
MsgBox"密码错误,请重新输入",vbExclamation,"警告"
Text2.Text=""
Text2.SetFocus
EndIf
EndIf
micount=micount+1
Ifmicount>=3ThenUnloadMe
EndSub

PrivateSubcmdcancel_Click()
UnloadMe
EndSub
设计读者管理窗体
设计界面







编写程序
PrivateSubcmdadd_Click()
Adodc1.Recordset.AddNew
cmdadd.Enabled=False
cmddel.Enabled=False
cmdok.Enabled=False
cmdcnacel.Enabled=True

EndSub

PrivateSubcmdcancel_Click()
Adodc1.Refresh
cmdadd.Enabled=True
cmddel.Enabled=True
cmdok.Enabled=False
cmdcancel.Enabled=False
EndSub

PrivateSubcmddel_Click()
X=MsgBox("确实要删除当前记录吗?",vbYesN
查看更多
单篇购买
VIP会员(1亿+VIP文档免费下)

扫码即表示接受《下载须知》

(完整word版)数据库实验报告图书管理系统

文档大小:2.5MB

限时特价:扫码查看

• 请登录后再进行扫码购买
• 使用微信/支付宝扫码注册及付费下载,详阅 用户协议 隐私政策
• 如已在其他页面进行付款,请刷新当前页面重试
• 付费购买成功后,此文档可永久免费下载
全场最划算
12个月
199.0
¥360.0
限时特惠
3个月
69.9
¥90.0
新人专享
1个月
19.9
¥30.0
24个月
398.0
¥720.0
6个月会员
139.9
¥180.0

6亿VIP文档任选,共次下载特权。

已优惠

微信/支付宝扫码完成支付,可开具发票

VIP尽享专属权益

VIP文档免费下载

赠送VIP文档免费下载次数

阅读免打扰

去除文档详情页间广告

专属身份标识

尊贵的VIP专属身份标识

高级客服

一对一高级客服服务

多端互通

电脑端/手机端权益通用