光盘管理系统论文.docx
《光盘管理系统论文.docx》由会员分享，可在线阅读，更多相关《光盘管理系统论文.docx（56页珍藏版）》请在冰豆网上搜索。
光盘管理系统论文
天津工程职业技术学院
2003届
毕业设计（论文）说明书
课题名称：
___________________________
______________________________________
学生姓名___________________
班级_______________专业_______________
指导教师___________职称_______________
完成日期年月日
目录
内容摘要………………………………………………………………1第一章前言…………………………………………………………21.1问题的提出………………………………………………………31.2本文研究路线……………………………………………………3第二章光盘管理系统研究概述…………………………………32.1光盘管理系统的发展历史………………………………32.2光盘管理系统发展现状…………………………………42.3本文的目标及相关专业理论 …………………………………4第三章光盘管理系统分析与设计…………………………………43.1光盘管理系统功能需求简介………………………………………4
3.2功能需求描述…………………………………………………4 3.3目标系统要求…………………………………………………53.4系统平台选择…………………………………………………53.5数据库设计…………………………………………………53.5.1数据词典分析…………………………………………………53.5.2数据库介绍…………………………………………………6第四章光盘管理系统的功能实现…………………………………64.1光盘管理…………………………………………………7 4.2管理员管理………………………………………………………94.3会员管理………………………………………………………104.4系统配置………………………………………………………124.5发布应用程序………………………………………………………124.5.1编译应用程序……………………………………………………124.5.2打包应用程序……………………………………………124.5.3发布应用程序的步骤……………………………………………12第五章结论及体会……………………………………………………14参考文献………………………………………………………………14
附录………………………………………………………………14
毕业论文内容摘要
光盘管理系统是用VB6.0开发出来用于管理光盘的出租和出售的MIS系统。
该系统用于光盘出租或销售店，方便出售光盘、租盘、还盘、查找等操作,是出租销售光盘店的最佳助手。
可以自定义光盘，方便添加新盘、管理光盘、管理会员。
提供完善的租盘和还盘操作，完全独立的数据库系统，数据管理为您提供：
光盘管理，会员管理.数据查询为您提供：
租借情况，光盘查询，会员查询。
本系统具有安全的数据库备份方案，简单易用，仿WINDOWS操作方式，可以使您很快上手，根据需要自行设置光盘类别和相应的借出时间、借出册数。
本系统采用ADO编程，程序中包含了许多编程技巧。
注解：
MIS：
管理信息系统（ManagementInformationSystem,简称MIS）是70年代开始发展的一个新兴的应用研究领域。
VB6.0:
微软公司1998年开发出来用于编写WIN32程序的高级编程软件，经过1.0,2.0,3.0,4.0,5.0的几个版本的不断更新，VB的功能不断强大，它已成功当今开发速度最快的高级编程软件系统。
ADO：
（ActiveDataObject）微软的一种新数据访问模型，支持用于建立基于客户端/服务器和WEB应用程序的主要功能。
其主要优点是易于使用、高速度、低内存支出和占用磁盘较少。
第一章前言
目前，出租或销售光盘的商店很多，他们大部分是用人工的方式对其进行管理，在盘少的情况下还可以应付，但一旦盘量增多再用这样方式就会给管理者带来诸多的不便，比如查询，统计之类的事务。
而这套光盘管理软件解决了这个问题，使您从出租销售业务摆脱繁重混乱的手工时代，进入科学高效的信息管理世纪！
模块功能：
1、光盘的管理
2、管理员的管理
3、会员的管理
4、系统配置
5、锁机系统
6、身份认证功能
7、帮助功能
其中“管理员的管理”由王新娟编写，“会员的管理”由张伟编写。
本论文分为五章：
第一章前言主要阐明选题的背景和选题的意义。
本课题的研究意义。
本论文的目的、内容及作者的主要贡献，或担任的主要工作。
第二章光盘管理系统研究概述阐述：
课题来源、用户需求；当前同类系统存在的问题及解决办法，本课题要达到的设计目标及所依据的专业理论知识。
第三章光盘管理系统分析与设计主要有系统结构、模块划分、数据库结构的设计。
第四章光盘管理系统的功能实现开发环境：
包括软件和硬件环境。
开发工具：
要求写明选择该工具的目的。
模块说明、流程设计。
关键技术（代码）分析。
第五章结论及体会主要包含系统运行效果、自我评价、测试结果、改进意见；对整个毕业设计的感受、收获或提出问题和希望。
论文撰写：
王迪，张伟，王新娟
论文程序：
王迪，张伟，王新娟
2003年5月30日
1.1问题的提出
光盘出租与销售的管理是一个常见的问题，其特点是数据之间的关系简单，但数据量较大。
若用人工进行管理，刚不便于数据的汇总统计及各种数据分析。
例如，若每天有有1000条记录，则要进行1000次加法才能计算出每天的租金总额，当然要进行每个月的统计工作就更复杂了。
此时这对于光盘的管理就更难了。
例如，要查看哪些光盘是顾客最喜欢看的，哪些光盘被损坏，哪些光盘超期未还等，这些问题用人工管理方式是难以解决的。
所以本软件就是为了解决这个问题而开发的，它能方便得进行各种管理事务，软件设计综合了具有一定代表性多家光盘出租销售店的业务处理模式。
能自动计算押金、租金、会员剩余天数与可观看影片部数等等数据；能对会员及光盘信息进行方便有效的科学管理；界面设计大方、简洁、实用；操作简单方便。
让你摆脱繁重混乱的手工时代，进入科学高效的信息管理世纪！
1.2本文研究路线
光盘管理是一个常见的问题,最主要的问题是对光盘和会员的管理不方便，例如，要查看哪些光盘是顾客最喜欢看的，哪些光盘被损坏，哪些光盘超期未还等，这些问题用人工管理方式是难以解决的。
开发本软件的目的就是让管理者减少重复工作，提高信息管理的效率和准确度。
它能方便得进行各种管理事务，软件设计综合了具有一定代表性多家光盘出租销售店的业务处理模式。
能自动计算押金、租金、会员剩余天数与可观看影片部数等等数据；能对会员及光盘信息进行方便有效的科学管理；界面设计大方、简洁、实用；操作简单方便。
让你摆脱繁重混乱的手工时代，进入科学高效的信息管理世纪！
第二章光盘管理系统研究概述
2.1光盘管理系统的发展历史
以前大多数管理者管理光盘的时候都是使用人工的方式来管理，一开始的时候大家都觉得没有问题，还都可以应付得过来。
可是随着光盘的增多，经营业务也不断得增加，便使得经营者不得不雇越来越多的店员来管理这些事务，这样作得代价毫无疑问是成本的增加，这也是经营者最不愿意看到的情况。
之后又出现了EXCEL作为数据库的管理系统，但其缺点很快就显示出来，那就是数据管理的不便与灵活性较差。
随着软件的发展成熟，许多在OFFICE上开发的项目都成功移植到了软件上，这便使得项目的灵活性更大，用户更容易接受这种方式。
2.2光盘管理系统系统发展现状
现在随着科技的发展，尤其是计算机的进步，给人们带来诸多的便利，而这样的发展却是经营者最愿意看到的，因为它可以代替那些店员来替他分担这些事务，它可以比那些店员更认真，更卖力，犯错率更低，而更要紧的是它替经营者降低了成本。
2.3本文的目标及相关专业理论
本文的目标就是让经营光盘业务的管理者利用时下的科技技术，来更好的帮助自己解决管理上的问题。
然而目前经营光盘出租或销售的软件这么多，质量也参差不齐，这反而却成为困绕管理者的最大的问题。
所以我们开发的这套管理软件不仅包括了光盘的出租业务也包括光盘的销售业务，这样作的目的是为了更好的统一管理，业者也不用为了解决事务上的问题而去购买两套软件，从而降低了成本。
另一方面本软件采用VB编写，由于它和数据库有很好的融合性，便 它编出来的软件速度更快，数据更安全，业者可以更放心得使用。
第三章 光盘管理系统分析与设计
3.1光盘管理系统功能需求简介
本软件的主要功能有：
8、光盘的管理
9、管理员的管理
10、会员的管理
11、系统配置
12、锁机系统
13、身份认证功能
14、帮助功能
3.2功能需求描述
1、光盘管理:
主要是对光盘的基本操作，如添加，修改，删除、查询。
2、管理员管理：
对管理员操作有添加，修改，删除。
3、会员管理：
对会员操作有添加，修改，删除。
4、系统配置：
可以预设置光盘的类型等资料，同时可以备份和恢复数据库，使其更安全。
5、锁机系统：
这个功能可以便管理员暂时离开电脑，而其数据不被其它人更改。
6、身份认证功能：
可以阻止没有受权人非法试图登陆系统。
7、帮助功能：
使你可以更清楚的了解本系统。
3.3目标系统要求
一台微机处理器为486、50MHz以上的微机；内存容量16MB以上；一个鼠标；硬盘的最小空间为15MB，用户自定义安装需要100MB硬盘空间；推荐使用VGA或更高分辨率的显示器。
3.4系统平台选择
本系统适用于Windows9x/windows2000。
3.5数据库设计
3.5.1数据词典分析
1、管理员
1、姓名1{字符}10
2、密码1{字符}10
3、销售总数1{数字}8
4、级别1{字符}10
5、解屏密码1{字符}10
2、客户
1、客户姓名1{字符}10
2、客户号1{数字}8
3、电话1{数字}8
4、OICQ1{数字}8
5、Email1{字符}10
3、客户日志
1、客户姓名1{字符}10
2、影片编号1{数字}8
3、借盘时期1（日期/时间）
4、演员
1、影片编号1{数字}8
2、演员1{字符}10
5、影片格式
1、影片格式1{字符}10
6、影片类型
1、影片类型1{字符}10
7、影片语言
1、影片语言1{字符}10
8、影片资料
1、影片编号1{数字}8
2、影片名称1{字符}10
3、时间长度1{数字}8
4、导演1{字符}10
5、发行年度1{字符}10
6、影片介绍1{字符}50
7、购买价格1{数字}8
8、出租价格1{数字}8
9、影片类型1{字符}10
10、影片格式1{字符}10
11、影片语言1{字符}10
12、总数1{数字}8
3.5.2数据库介绍
本系统采用得是ACCESS2000为后台数据库。
数据库名为CD.MDB,其中数据库包含得表为：
管理员、客户、客户日志、演员、影片格式、影片类型、影片语言、影片资料、自定义.
第四章光盘管理系统的功能实现
该软件的开发环境是VB6.0+Windows98，采用得是ACCESS2000为后台数据库，从而使得系统更加安全，操作更加方便。
总体设计：
4.1光盘管理
1、添加模块
功能：
能方便得添加光盘，其中采用了预设方式。
输入项目：
鼠标或键盘事件。
输出项目：
无。
界面如图所示：
2、修改光盘
功能：
完成了修改功能，同样也采用了预设得方式。
输入项目：
鼠标或键盘事件。
输出项目：
无。
界面如图所示：
3、删除光盘
功能：
完成了删除光盘功能，其设置资料为不可选方便了用户。
输入项目：
鼠标或键盘事件。
输出项目：
无。
界面如图所示：
4、查询光盘
功能：
完成了查询光盘功能，并设置了多项查询条件的选择。
输入项目：
鼠标或键盘事件。
输出项目：
无。
界面如图所示：
4.2管理员管理
1、添加管理员
功能：
完成添加管理员功能,采用了预设得方式。
输入项目：
鼠标或键盘事件。
输出项目：
无。
界面如图所示：
2、修改管理员
功能：
完成修改管理员功能，采用了预设得方式。
输入项目：
鼠标或键盘事件。
输出项目：
无。
界面如图所示：
3、删除管理员
功能：
完成删除管理员功能，采用了预设得方式。
输入项目：
鼠标或键盘事件。
输出项目：
无。
界面如图所示：
4.3会员管理
1、添加会员
功能：
添加会员功能。
输入项目：
鼠标或键盘事件。
输出项目：
无。
界面如图所示：
2、修改会员
功能：
修改会员功能。
输入项目：
鼠标或键盘事件。
输出项目：
无。
界面如图所示：
3、删除会员
功能：
删除会员功能。
输入项目：
鼠标或键盘事件。
输出项目：
无。
界面如图所示：
4.4系统配置
功能：
查询光盘功能,采用了预设得方式。
输入项目：
鼠标或键盘事件。
输出项目：
无。
界面如图所示：
4.5发布应用程序
4.5.1编译应用程序
选择[文件]-------[生成光盘管理系统.exe]
4.5.2打包应用程序
选择[Package&Deployment向导]
4.5.3发布应用程序的步骤
1、选择[Package&Deployment向导]
2、选择[打包]
3、选择[下一步]
4、一直选择[下一步]直到
5、选择[完成]。
第六章结论及体会
整个程序的编写已经完成，经过这次的实践让我们对如何利用VB开发数据库程序有了一个更深得理解。
在此期间我们遇到了许多困难，但经过我们反复的查阅资料和不断调试下，这些难题还是终究被我们一一克服了，比如数据库的加密、如何访问加密的数据库之类的，在这场实践中我们一起调研、开发、调试，从中我们也得到了团队开发的经验。
虽然该系统还并不是很完美，有些功能因条件和自身能力的关系没有设计出来，比如打印之类的管理，所以使得我们今后要不断学习更多的东西来完善它，使其真正成为功能完备的光盘管理系统。
参考文献
软件工程原理、方法与应用史济民著高等教育出版社
软件工程实验陈明、王智广、赵鹏翔著高等教育出版社
VB程序设计基础郎洪、段银田、陈勇孝著高等教育出版社
VB程序设计教程习题及习题解答刘瑞新、李树东、王为东著电子工业出版社
附录：
1、光盘管理cdm.frm
DimynAsNewyn'定义yn为yn类
OptionExplicit
PrivateSubCombo1_Click（）
Me.PopupMenulist'弹出LIST菜单
EndSub
PrivateSubCombo1_KeyDown（KeyCodeAsInteger,ShiftAsInteger）
IfKeyCode=13Then'如果按回车键就添加一个记录
Me.Combo1.AddItemMe.Combo1.Text
Me.Combo1.SelStart=0
Me.Combo1.SelLength=Len（Me.Combo1.Text）
EndIf
EndSub
PrivateSubcomsel_KeyPress（IndexAsInteger,KeyAsciiAsInteger）
IfKeyAscii=13Then'如果按回车键就执行查询功能
Callsearch_Click（0）
EndIf
EndSub
PrivateSubdele_Click（）
Me.Combo1.RemoveItemMe.Combo1.ListIndex'单击后删除指定记录
EndSub
PrivateSubdelecd_Click（）
msg="删除光盘"
Me.TabStrip1.Tabs（4）.Selected=True'4被选中
DimaAsString
a=Me.MSHFlexGrid1.Text
Me.MSHFlexGrid1.Row=0
Me.MSHFlexGrid1.Col=Me.MSHFlexGrid1.Col'-1
Msel（0）.Text=Me.MSHFlexGrid1.Text
Me.txtselect（0）.Text=a'赋值方便查询
IfMsel（0）.Text="影片编号"OrMsel（0）.Text="影片名称"OrMsel（0）.Text="导演"OrMsel（0）.Text="影片类型"OrMsel（0）.Text="影片格式"OrMsel（0）.Text="影片语言"Then
db="select*from影片资料where"&Msel（0）.Text&"='"&Me.txtselect（0）.Text&"'"
Callyn.opendb（db）
IfNotyn.myrec.EOFThen
Callyn.myrec.Delete
Callyn.myrec.Update
MsgBox"此光盘记录已成功删除！
！
！
",vbInformation
Callyn.closedb
db="select*from影片资料where"&Msel（0）.Text&"='"&Me.txtselect（0）.Text&"'"
Callyn.opendb（db）
SetMe.MSHFlexGrid1.DataSource=yn.myrec
Callyn.closedb
Else
Me.MSHFlexGrid1.Visible=False
Me.Frame1.Visible=True
Callyn.closedb
EndIf
Else
db="select*from影片资料where"&Msel（0）.Text&"="&Me.txtselect（0）.Text&""
Callyn.opendb（db）
Callyn.myrec.Delete
Callyn.myrec.Update
MsgBox"此光盘记录已成功删除！
！
！
",vbInformation
Callyn.closedb
db="select*from影片资料where"&Msel（0）.Text&"="&Me.txtselect（0）.Text&""
Callyn.opendb（db）
SetMe.MSHFlexGrid1.DataSource=yn.myrec
Callyn.closedb
EndIf
EndSub
PrivateSubForm_Load（）
OnErrorResumeNext
Me.Caption=Me.Caption&msg
SelectCasemsg
CaseIs="添加光盘"
Me.TabStrip1.Tabs
（2）.Selected=True
Fori=0To8
Me.txtinfo（i）.BackColor=vbWhite
Next
Me.Combo1.BackColor=vbWhite'设置白色代表有效
Me.Combo2.BackColor=vbWhite
Me.Combo3.BackColor=vbWhite
Me.Combo4.BackColor=vbWhite
Me.txtselect（0）.Visible=False
Me.Labinfo
（1）.Visible=False
Msel（0）.Visible=False
Me.search（0）.Visible=False
Me.Combo1.Clear
Me.Combo2.Clear
Me.Combo3.Clear
Me.Combo4.Clear
Callyn.opendb（"select*from影片类型"）
DoWhileyn.myrec.EOF=False
Me.Combo2.AddItemyn.myrec.Fields（"影片类型"）
yn.myrec.MoveNext
Loop
Callyn.closedb
Callyn.opendb（"select*from影片格式"）
DoWhileyn.myrec.EOF=False
Me.Combo3.AddItemyn.myrec.Fields（"影片格式"）
yn.myrec.MoveNext
Loop
Callyn.closedb
Callyn.opendb（"select*from影片语言"）
DoWhileyn.myrec.EOF=False
Me.Combo4.AddItemyn.myrec.Fields（"影片语言"）
yn.myrec.MoveNext
Loop
Callyn.closedb
Callyn.opendb（"select*from自定义"）
Me.txtinfo（6）.Text=yn.myrec.Fields（"购买价格"）
Me.txtinfo（5）.Text=yn.myrec.Fields（"出租价格"）
Callyn.closedb
CaseIs="修改光盘"
Me.txtselect（0）.TabIndex=0
Msel（0）.TabIndex=1
Me.TabStrip1.Tabs（3）.Selected=True
Fori=0To8
Me.txtinfo（i）.BackColor=vbWhite
Next
Me.Combo1.BackColor=vbWhite'设置白色代表有效
Me.Combo2.BackColor=vbWhite
Me.Combo3.BackColor=vbWhite
Me.Combo4.BackColor=vbWhite
Me.Combo1.Clear
Me.Combo2.Clear
Me.Combo3.Clear
Me.Combo4.Clear
Callyn.opendb（"select*from影片类型"）
DoWhileyn.myrec.EOF=False
Me.Combo2.AddItemyn.myrec.Fields（"影片类型"）
升级会员 