书刊维护管理系统Word文档格式.doc
《书刊维护管理系统Word文档格式.doc》由会员分享,可在线阅读,更多相关《书刊维护管理系统Word文档格式.doc(33页珍藏版)》请在冰豆网上搜索。
书刊阅读是人类获取知识、阅历最普遍的方式,是教师和学生获取知识的重要来源,由于书刊维护管理涉及大小图书馆中所有馆藏的储存和流通。
所以,一直以来,计算机软硬件在书刊维护管理中得到了广泛的应用。
书刊作为一个查阅资料的重要来源,由于数据处理手工操作工作量大,出错率高,出错后不易更改,就要求可以使用计算机对其进行自动化的管理,因此,开发一个书刊维护管理系统尤为重要。
由于目前还处在VF初识阶段,对其性能的实现把握有所欠缺,因而只能够设计一个比较简单的书刊维护管理数据库,该数据库包括了图书信息、读者信息、书刊在库检索等一些简单的基本功能的实现,其框架采用VISUALFOXPRO语言编写,可以较为理想的实现数据路系统。
本维护管理系统围绕书刊的维护管理操作流程为主要考量因素,以方便图书馆管理人员实现对图书馆馆藏的借阅、在库信息的方便、快速查询为主要目的,综合考虑各阶层图书馆的使用,设计了本系统,以提高系统的可适性,操作性。
(二)系统设计的需求分析
书刊维护管理系统的开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。
对于前者要求建立起数据一致性和完整性强.数据安全性好的库。
而对于后者则要求应用程序功能完备,易使用等特点。
经过分析如此情况,我们使用微软公司的VISUALFOXPRO开发工具,利用其提供的各种面向对象的开发工具,尤其是数据窗口这一能方便而简洁操纵数据库的智能化对象,下面对各个模块的功能介绍如下:
1.书刊信息维护:
包括新增、修改、查询等操作,可以实现对书刊编码、书号、书名、作者、图书类别、出版社和出版时间等信息管理维护。
2.读者信息维护:
拥有完善的读者信息管理功能,对读者信息进行新增、修改、查询、打印和导出等操作。
3.书刊借阅维护:
包括书刊借阅记录和书刊丢失记录两大版块。
其中读者借阅记录系统可以完整的记录结束日期、到期日期以及续借次数等信息,随时添加实时更新;
书刊丢失记录系统则对丢失的书刊做类似的记录。
4.书刊在库维护:
实现对在库图书相关信息的记录,包方便读者按照图书类别等相应的索引到指定的图书室及甚至书架进行快速准确的借阅。
5.管理员系统维护:
对管理员相关信息进行管理维护。
二、系统设计实现
(一)系统结构
书刊维护管理系统
书刊在库维护
管理员系统维护
书刊信息维护
读者信息维护
书刊借阅维护
丢失书刊记录
权限设置
查询读者信息
书刊借阅记录
修改读者信息
查询书刊信息
修改书刊信息
修改密码
重新登录
书刊丢失记录
新添读者信息
添加书刊信息
(二)书刊维护管理系统数据库
1.丢失书刊记录表
2.读者登记表
3.读者借阅表
4.管理员登记表
5.书刊信息表
6.书刊在库维护表
(三)系统功能实现
1.系统管理
1.1欢迎界面
TIMER代码:
doform登陆界面
this.enabled=.f.
Thisform.release
1.2登陆界面
表单代码use管理员登记表
locatefor(alltrim(管理员编号)==alltrim(thisform.text1.value)andalltrim(登录密码)==alltrim(thisform.text2.value))
ifnotfound()
messagebox("
用户名或密码错误"
5+64+0,"
提示"
)
else
i=0
yh=alltrim(thisform.text1.value)
thisform.release
doform管理界面
endif
use
确定按钮:
publicyh
publici
取消按钮:
thisform.release
CLEAREVENTS
1.3主界面
激活代码:
thisform.refresh
do管理界面主菜单.mprwiththis,.T.
INIT代码:
do管理界面主菜单.mprwiththis,.T.
2.功能模块
2.1书刊信息维护
新增:
doform新增书刊信息
修改:
doform修改书刊信息
查询:
doform书刊信息查询
刷新:
thisform.list1.refresh
Thisform.refresh
删除:
x=messagebox("
确认删除?
"
1+64+256,"
ifx=1
delete
pack
endif
导出:
doform导出
打印:
doform书刊信息打印
2.1.1文件导出
确定按钮的代码:
ifthisform.optiongroup1.value=1
COPYTOalltrim(thisform.text1.value)sdf
messagebox("
已将文件保存到D:
\书刊维护管理系统"
0+64+256,"
else
COPYTOalltrim(thisform.text1.value)xls
Endif
取消:
Thisform.release
2.1.2书刊信息查询
查询按钮:
docase
casebo1.displayvalue="
图书编码"
locatefor图书编码=alltrim(thisform.text1.value)
iffound()
thisform.text2.value=书名
thisform.text3.value=图书编码
thisform.text4.value=书号
thisform.text5.value=作者
thisform.text6.value=图书类别
thisform.text7.value=出版社
thisform.text8.value=出版时间
thisform.text9.value=单价
thisform.text10.value=入库时间
thisform.text11.value=书架编号
thisform.text12.value=能否借阅
else
没有查找到满足条件的记录"
0+64,"
endif
书名"
locatefor书名=alltrim(thisform.text1.value)
作者"
locatefor作者=alltrim(thisform.text1.value)
图书类别"
locatefor图书类别=alltrim(thisform.text1.value)
otherwise
请选择查询条