没有合适的资源?快使用搜索试试~ 我知道了~
首页图书阅览室管理系统——详细设计说明书.doc
资源详情
资源评论
资源推荐
工学院图书阅览室管理系统详细设计说明书
1、引言
1.1 编写目的
编写详细设计说明书的目的在于与开发人员与用户之间达成系统开发的共识,使开发人
员所考虑的系统在功能(系统能做什么)、简单操作,良好界面,个人信息保密性,系统
安全与稳定,良好帐户管理,友好信息返回模式(如报表及打印功能)。同时,编写详细
设计分析报告可以使让后期软件编辑人员了解本软件的编写目的,帮助后期工作人员更好
的完成编程工作,同时为后期的维护提供便利,使软件开发过程规格化。
1.3 项目背景及内容概要
电脑技术将对今天世界上的商业产生深远的影响,鼠标只要点一下就可以将数据入库
或对其进行访问。制造商的国外订货单可以立即接受并执行。随着信息量的不断增大,我
们对数据的科学处理和管理的需求变得日益紧迫。图书馆是存放大量不同时期,不同作者
不同学科书籍的地方,如果不能有一套科学的数据库管理系统,就会使借书,还书,冻结
等工作的效率大大降低,为此,我需要开发了一个图书馆数据库管理系统,使图书馆的书
籍管理变得简单有序。开发这个数据库系统设计到很多技术,包括 VB 开发工具,Access
2003,以及数据库设计,数据库连接等技术。图书馆数据库管理系统,使管理员管理图书
的有效工具。随着科技的日益发展,越来越多的新兴数据库系统应运而生,我们必须紧跟
时代的脚步,开发出更多,更快捷方便的数据库管理系统。
本系统的操作人员为图书馆的管理人员,并且对非法操作有相应的消息框提示。为了保
证安全性,不允许删除未还图书的信息,不允许删除未还清书的读者的信息,借书量已满
的读者不允许再借书。
1、系统特点:
1) 基本需求:读者图书借阅与还书处理;读者借阅信息管理;图书信息查阅,其中读者
信息分学生、教师和管理员三类进行管理。
2) 数据处理:支持批量处理。
3) 运行环境要求:该系统运行于单机环境。
2、作用:
1) 作为图书馆管理读者借阅信息的工具;
2) 帮助图书馆掌握各读者的书刊借阅信息;
3) 帮助图书馆掌握各类书目的馆藏数目;
帮助图书馆分析学生主要兴趣所在,从而购进更多受到读者欢迎的书籍;
1.4 参考资料。
1.此《详细设计说明书》的规格参考了老师的软件工程大作业示例中相关示例的文档说明
书的写法。
2.《软件工程》教材。
2、程序系统的结构
3、用户登陆模块设计说明
3.1 登录模块
功能:用户进行登录验证
输入项目:用户名,密码
输出项目:进入系统页面
代码:Private Sub cmdCancle_Click()
Unload Me
End Sub
Private Sub cmdOK_Click()
Dim sql As String
Dim rs_login As New ADODB.Recordset
Dim conn As New ADODB.Connection
conn.Open
"provider=Microsoft.Jet.OLEDB.4.0; data
source=" & App.Path & "\database.mdb"
If Trim(text1.Text) = "" Then
MsgBox " 用户名不能 为 空, 请 重 新输
入!"
text1.SetFocus
Else
sql = "select * from 用 户 表 where
user_ID='" & Trim(text1.Text) & "'"
rs_login.Open sql, conn, adOpenKeyset,
adLockPessimistic
If rs_login.EOF = True Then
MsgBox "没有这个用户,请重输入!",
vbOKOnly + vbExclamation, ""
text1.Text = ""
text1.SetFocus
Else
username = text1.Text
If Trim(rs_login.Fields(1)) =
Trim(text2.Text) Then
Unload Me
图书馆理系统.Show
Else
MsgBox "密码不正确,请重输入!",
vbOKOnly + vbExclamation, ""
text2.SetFocus
text2.Text = ""
End If
End If
End If
cnt = cnt + 1
If cnt = 3 Then
Unload Me
End If
End Sub
Private Sub Form_Load()
cnt = 0
End Sub
3.2 添加图书类别模块
功能:添加图书类别
输入项目:图书类别、类别编号
输出项目:添加图书类别成功
代码:Private Sub Command1_Click()
Dim sql As String
Dim conn As New ADODB.Connection
Dim rs_bookstyle As New
ADODB.Recordset
If Trim(Text1.Text) = "" Then
MsgBox "图书种类不能为空 ", vbOK0nly
+ vbExclamation, ""
Text1.SetFocus
Exit Sub
End If
If Trim(Text2.Text) = "" Then
MsgBox "种类编号不能为空", vbOK0nly
+ vbExclamation, ""
Text2.SetFocus
Exit Sub
End If
Provider =
"Microsoft.Jet.OLEDB.3.5.1 ;Persist Security
Info=false;data source=D:\ 图 书 管 理 系 统 \
database.mdb"
conn.Open
"provider=Microsoft.Jet.OLEDB.4.0; data
source=" & App.Path & "\database.mdb"
sql = "select * from 图书类别 where 类别名
称='" & Text1.Text & "'"
rs_bookstyle.Open sql, conn, adOpenKeyset,
adLockPessimistic
If rs_bookstyle.EOF Then
rs_bookstyle.AddNew
rs_bookstyle.Fields(0) = Trim(Text1.Text)
rs_bookstyle.Fields(1) = Trim(Text2.Text)
rs_bookstyle.Update
MsgBox "添加图书类别成功!", vbOKOnly,
""
rs_bookstyle.Close
Else
MsgBox "图书类别重复!", vbOKOnly +
vbExclamation, ""
Text1.SetFocus
Text1.Text = ""
rs_bookstyle.Close
Exit Sub
End If
End Sub
Private Sub Command2_Click()
Unload Me
End Sub
3.3 图书类别管理模块
功能:对图书类别进行修改、删除
输入项目:类别名称、类别编号
输出项目:修改成功、删除成功
代码:Private Sub cmdcancel_Click()
rs_reader.CancelUpdate
DataGrid1.Refresh
DataGrid1.AllowAddNew = False
DataGrid1.AllowUpdate = False
cmddel.Enabled = True
cmdmodify.Enabled = True
cmdupdate.Enabled = False
cmdcancel.Enabled = False
End Sub
Private Sub cmddel_Click()
Dim answer As String
'On Error GoTo cmddel
answer = MsgBox(" 确 定 要 删 除 吗 ? ",
vbYesNo, "")
If answer = vbYes Then
DataGrid1.AllowDelete = True
rs_reader.Delete
rs_reader.Update
DataGrid1.Refresh
Else
Exit Sub
End If
'cmddel:
'MsgBox Err.Description
End Sub
Private Sub cmdmodify_Click()
Dim answer As String
On Error GoTo cmdmodify
cmddel.Enabled = False
cmdmodify.Enabled = False
cmdupdate.Enabled = True
cmdcancel.Enabled = True
DataGrid1.AllowUpdate = True
Exit Sub
cmdmodify:
If Err.Number <> 0 Then
MsgBox Err.Description
End If
End Sub
Private Sub cmdupdate_Click()
If Not IsNull(DataGrid1.Bookmark) Then
rs_reader.Update
End If
剩余27页未读,继续阅读
lc196311
- 粉丝: 1
- 资源: 9
上传资源 快速赚钱
- 我的内容管理 收起
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
会员权益专享
最新资源
- 2023年中国辣条食品行业创新及消费需求洞察报告.pptx
- 2023年半导体行业20强品牌.pptx
- 2023年全球电力行业评论.pptx
- 2023年全球网络安全现状-劳动力资源和网络运营的全球发展新态势.pptx
- 毕业设计-基于单片机的液体密度检测系统设计.doc
- 家用清扫机器人设计.doc
- 基于VB+数据库SQL的教师信息管理系统设计与实现 计算机专业设计范文模板参考资料.pdf
- 官塘驿林场林防火(资源监管)“空天地人”四位一体监测系统方案.doc
- 基于专利语义表征的技术预见方法及其应用.docx
- 浅谈电子商务的现状及发展趋势学习总结.doc
- 基于单片机的智能仓库温湿度控制系统 (2).pdf
- 基于SSM框架知识产权管理系统 (2).pdf
- 9年终工作总结新年计划PPT模板.pptx
- Hytera海能达CH04L01 说明书.pdf
- 数据中心运维操作标准及流程.pdf
- 报告模板 -成本分析与报告培训之三.pptx
资源上传下载、课程学习等过程中有任何疑问或建议,欢迎提出宝贵意见哦~我们会及时处理!
点击此处反馈
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功
评论0