毕业设计《网吧收费系统》.docx
- 文档编号:29347574
- 上传时间:2023-07-22
- 格式:DOCX
- 页数:25
- 大小:25.82KB
毕业设计《网吧收费系统》.docx
《毕业设计《网吧收费系统》.docx》由会员分享,可在线阅读,更多相关《毕业设计《网吧收费系统》.docx(25页珍藏版)》请在冰豆网上搜索。
毕业设计《网吧收费系统》
1.前言
2.需求分析
2.1用户定位分析
2.2功能需求分析
2.3性能需求分析
3.系统分析
3.1环境平台分析
3.2程序功能设计
3.3程序流程设计
4.详细设计
4.1程序单元设计
4.2程序单元编码
4.3集成开发
前言
根据自己的爱好和软件编程的能力,我选择用VB编写网吧收费系统的服务器端,只是编写出了基本的功能,比现实生活中使用的要粗略.但是这个系统只是自己的一次实践,我会在以后的学习中继续努力的
编写这个使用程序其意义在于锻炼了我的动手能力和逻辑思维能力,而且以前也从来没有尝试过编写这样综合性的程序,培养了对问题考虑的全面性.
为了编写有实用价值的东西,我还参阅了大量的资料,包括网络资料的选择,当然在程序完成只后,也不能只有编写者才会用,所以要写出对应的帮助文挡,一般的软件都会有,这是我们生活中的常识.只是限于水平,只能编写部分功能,数据库安全方面也不可靠.一直在寻找解决办法,如果能够采用动态数据库,这些问题就能解决了.
科学这东西讲究的就是严谨的态度,建立数学模型有助于完成设计,在设计的时候避免出现思绪混乱,
在经过系统功能需求分析,在大脑中已经有很清晰的的目标,可以画出要进行的流程图,比如先根据功能模块确定好选择数据库,然后根据实际编写数据库表,完成数据库表的关联,可以先保存后,等窗体确定完毕,再连接数据库.
经过代码调试,确定能正常运行.
2.需求分析
2.1用户定位分析
1.合理的工具设置:
用户要求界面简洁容易操作.于是可以使用工具条进行设置,把经常要使用的功能用工具条单独罗列出来,比直接在菜单中选择效率要高.
2.安全要求:
为了避免意外事件或者是人为原因导致数据库信息丢失,要做好数据库的保秘和数据库灾难性恢复.
3.简单的操作方式:
因为需要有的时候需要对客户机进行远程控制,这样管理起来就轻松起来.
4.提供全面的数据查询和统计:
可以任意选择查询条件,而且为了方便可以设置统计报表功能.
5.报表打印导出功能:
要随时可以导出以报表格式存放,打印出来长期备份.
6.会员卡管理:
会员卡较之现金交易比较方便管理,
7.商品管理:
能够对商品进行销售统计,存储查询.
8.网址限制:
现在网络病毒流行,尤其要注意一些不良网页上隐藏病毒,所以要限制一些网站.
2.2功能需求分析
主要功能:
对网吧的人员,资源进行管理。
公布网吧的通知公告等信息,发布网吧内外新闻动态,提供上网人员的意见、建议反馈场所,管理网吧内的计算机,对上机用户的情况进行统计,计时计费等。
具体功能:
被控制机有一个服务器,控制器集中在管理机上。
可以控制登陆,并进行计时,这是两个基本功能;管理机还有上机,下机结帐,开机,关机,重新启动等功能。
网络管理、计费系统:
本网站最重要和最复杂的功能。
又分会员注册,登录,以及会员的审核系统,员工的管理,计时计费,计算机管理等小系统。
资源管理:
分为流行歌曲,影视频道,游戏推荐,动漫Flash,精彩图片几个模块。
交流平台:
提供在线交流的平台,收集上网人员的相关的意见和建议,并及时处理,对有必要的问题进行回复。
以上功能大部份为系统已实现的基本功能,在开发本系统时也为后继系统扩展开发留有接口,使系统更加方便地可以进行升级和扩展。
2.3性能需求分析
强大的安全保障:
网络通讯全面采用数字证书认证体系,具有和网上银行同等的安全级别;基于角色的权限管理允许灵活定制管理权限;具有完备的数据保密、备份、灾难恢复等机制,保证数据高度安全可靠。
严谨和高效的业务流程设计:
网吧计费管理系统业务数据遵循财务准则设计,严谨、规范;众多独到的设计不仅方便顾客使用也大大减轻了服务员的工作强度。
易于使用和维护:
网吧计费管理系统充分考虑了不同层次使用者的接受能力,服务员经过10分钟简单培训就能掌握,管理人员则拥有众多工具和方法用于简化管理和维护。
此外,为了帮助用户尽快熟练掌握网吧计费管理系统的使用,相关软件公司还提供了多种方式的培训和技术支持。
集中管理能力:
将配置、升级等任务集中到服务器处理,使管理工作大量减少,变得高效。
3.系统分析
3.1系统平台分析
系统的开发、运行、测试环境均选用Windows系列的操作系统,因为Windows系统是PC机上普及最广泛的操作系统,它的界面友好、有高效的计算环境、对硬件的支持程度高、支持On-Now设备、有良好的可移植性和可伸缩性、系统运行稳定、可靠性好、维护方便、容易安装;性能经过优化、安全性好、对网络的支持程度好、使网络使用更为方便快捷。
本系统可运行于Windows20000以上操作系统,在这些操作系统上都必须安装IIS,当然最好是在Windows2000AdvancedServer上运行,因为微软开发的Windows2000AdvancedServer是专门用来提供网络服务器的,有微软这个强大的技术支持,并且系统运行稳定、维护方便、性能经过优化、对网络的支持程度好、使网络使用更为方便快捷。
考虑到WindowsXPProfessional是我们平时用得最多的操作系统,比较熟悉,且足够支持开发软件VB和MicrosoftSQLServer2000。
所以在此我选用了它作为开发环境、运行环境以及测试环境.
在选择开发工具的时候,考虑到各种编程软件,我选择VB6.0主要有其特点决定的,VB6.0提供了各种丰富的通信接口,比较适合这种服务器-客户端.
在界面设置上,VB提供可视化编程,可以避免大量的代码编写,需要什么样子的窗口布局,可以直接在工具箱\里面选择,然后调整布局.
采用的是事件驱动方式,代码执行的过程可以直接控制,很方便代码的调试和改写.比起传统的那些编程语言,代码从开始执行到代码结涑
3.2程序功能设计
(1)系统功能设计:
这一部分是整个系统最基本也是最重要的设置,其中系统设置至少包括以下几方面的内容:
计算机设置:
管理员设置
数据备份
数据还原
系统设置
(2)记费用功能设计:
包括下面内容
开始记费
限定时间
结帐
调换计算机
选购计算机
客户机控制
(3)界面设置功能:
主要是对运行中的系统界面设置,不同的工作人员喜欢不同的背景或布局格式,对整个系统没有太大的影响
(4)管理功能:
包括商品资料管理,客户管理,会员卡管理
(5)统计功能:
日报表统计:
商品统计和上机统计
月报表统计:
商品统计和上机统计
3.3程序流程设计
1.数据库设计(采用无源数据库连接)
无源数据库”连接也并不是说不需要数据源,如果没有数据源则连接是纸上谈兵,只是不需要配置ODBC数据源,利用ADO就可通过代码进行连接。
1.1ADO(ActiveXDataObject)
在VisualBasic6.0中,数据访问接口有三种:
ActiveX数据对象(ADO)、远程数据对象(RDO)和数据访问对象(DAO)。
这三种接口的每一种都分别代表该技术的不同发展阶段,最新的是ADO,它比RDO和DAO更加简单,更加灵活。
对于新工程,应使用ADO作为数据访问接口。
ADO是Microsoft数据库使用程序开发的接口,是建立在OLEDB之上的高层数据库访问技术。
它封装了OLEDB所提供的接口,比起OLEDB提供者,ADO的接口可以使程序员在更高级别上进行数据交互。
ADO技术不仅可以使用于关系数据库,也可以使用于非关系数据库。
可以用统一的方法对不同的文件系统进行访问,大大简化了程序编制,增加了程序的可移植性。
1.2建立无源数据库连接
在连接数据库前,首先要在VisualBasic6.0菜单中“工程”—“引用”中选择MicrosoftActiveXDataObjects2.6Library和MicrosoftActiveXDataObjectsRecordset2.6Library这两个组件。
运用ADO对象模型的主要元素:
Connection(连接)中的ConnectionString属性进行连接,ConnectionString为可读写string类型,指定一个连接字符串,告诉ADO如何连接数据库。
实例:
以建立登陆系统为例,介绍无源数据库连接。
在MicrosoftSQLServer2000中建立一个Student的数据库,在Student数据库中建立login_user(name,password)的数据表,MicrosoftSQLServer服务器的名为data_server。
代码如下:
OptionExplicit
PublicLoginSucceededAsBoolean
'引用MicrosoftActiveXDataObjects2.6Library
'定义连接对象和记录集
DimconnAsADODB.Connection
DimrsAsADODB.Recordset
'对取消按钮单击事件的响应
PrivateSubcmdCancel_Click()
'设置全局变量为false
'不提示失败的登录
LoginSucceeded=False
Me.Hide
EndSub
'对登录按钮单击事件的响应
PrivateSubcmdOK_Click()
Setconn=NewADODB.Connection
Setrs=NewADODB.Recordset
'建立无源数据库连接
conn.ConnectionString="driver={sqlserver};server=data_server;uid=sa;pwd=;Database=student"
conn.ConnectionTimeout=50
conn.Open
DimstrAsString
'连接连接对象
Setrs.ActiveConnection=conn
'设置游标类型
rs.CursorType=adOpenDynamic
IfTrim(txtUserName.Text="")Then
MsgBox"用户名不能为空,请重新输入用户名!
",vbOKOnly+vbExclamation,"警告"
txtUserName.SetFocus
Else
'设置查询字符串
str="select*fromlogin_userwherename='"&Trim(txtUserName.Text)&"'"
rs.Openstr
Ifrs.EOF=TrueThen
MsgBox"没有这个用户,请重新输入用户名!
",vbOKOnly+vbExclamation,"警告"
txtUserName.SetFocus
Else
'登录成功,连接主窗口
If(Trim(txtPassword.Text)=Trim(rs.Fields("password")))Then
LoginSucceeded=True
Me.Hide
main.Show
Else
MsgBox"密码不正确,请重输入密码!
",,"警告"
txtPassword.SetFocus
SendKeys"{Home}+{End}"
EndIf
EndIf
EndIf
EndSub
无源数据库连接则不用配置ODBC环境,可以省去手工设置DSN的麻烦,这种方法所编写的软件适应性广,又符合专业软件的要求。
DO封装并且实现了Microsoft强大的数据访问接口OLEDB的所有功能,它具有通用性好,效率高的特点。
通过ADO进行无源数据库连接,省去手工设置DSN的麻烦,使ADO对象模型获得更大的灵活性.
2.界面设置
确定使用程序的功能后,从最基本的界面布局设置,这一步的关键就是熟悉VB控件的基本功能,包括常用控件和其它需要从部件里面添加的控件.界面设置要合理,美观为好.
3.代码编辑
VB采用的是事件驱动方式,可以直接选择控件的事件和属性,在编写代码的时候会自动给予提示,这样当对一个事件进行代码编辑的时候如果没有给予格式提醒,这个时候要考虑是不是出错了,如果没有这种功能,这种错误只能到代码编译运行的时候才会发现,那个时候会浪费很多时间来修改错误代码.
4.模块建立
模块一般是放全局公用的函数、过程、常数、自定义结构、全局变量等等东西的地方,也就是公用部分的集中场所。
当然,模块中也可以定义private的函数或者过程以便公用过程的内部调用。
类模块是定义一个类,类模块中的所有public成员必须在创建了累的实例以后才能够调用,需要和标准模块区分开来。
好的编程习惯是把不同种类的功用模块分类放在不同的标准模块中,便于查阅,所以很多程序中会有多个标准模块存在.
类模块和标准模块的不同点在于存储数据方法的不同。
标准模块的数据只有一个备份。
这意味着标准模块中一个公共变量的值改变以后,在后面的程序中再读取该变量时,它将得到同一个值。
而类模块的数据,是相对于类实例(也就是,由类创建的每一对象)而独立存在的。
同样的,标准模块中的数据在程序作用域内存在,也就是说,它存在于程序的存活期中;而类实例中的数据只存在于对象的存活期,它随对象的创建而创建,随对象的撤消而消失。
最后,当变量在标准模块中声明为Public时,则它在工程中任何地方都是可见的;而类模块中的Public变量,只有当对象变量含有对某一类实例的引用时才能访问
5.运行调试
1.运行程序
运行程序,可用下列方法之一:
(1)选择主窗口的“运行"菜单的“启动”命令。
(2)按快捷键F5。
(3)选择工具栏上的启动按钮。
在程序运行过程中,标题栏显示:
工程1-MicrosoftVisualBasic[运行]
表示进入运行状态。
2.暂停运行
若程序有错误,可用以下任一种方式进入中断状态,对程序进行调试:
(1)选择“运行"菜单的“中断"命令。
(2)按Ctrl+Break键。
(3)选择工具栏上的中断图标。
进人中断状态,标题栏显示:
工程1-MicrosoftVisualBasic[break]
若要继续运行,可直接按F5键,或选取“运行”菜单的“继续"命令。
若要重新运行,按
Shift+F5键或选择“运行”菜单的“重新启动”命令。
3.结束程序运行
结束程序运行返回设计状态的方法为:
(1)选择“运行”菜单的“结束"命令。
(2)选择工具栏上的结束图标。
(3)按程序的结束按钮或程序窗口的关闭按钮
4.详细设计
4.1程序单元设计
1.登陆窗口设计:
登陆系统窗口界面要简单为好,需要两个标签框用来标明用户名和密码,两个文本框用来输入用户名和密码,还有两个命令按扭用来实现登入和取消命令:
根据需要添加ACTIVEXActiveX控件数据输入和函数功能执行都必须通过容器,因此ActiveX控件和容器都必须支持一些特定的接口协议。
根据Microsoft相应的规格标准,ActiveX控件应具备如下的性能机制。
属性和方法:
ActiveX控件必须提供属性的名称、方法的名称及参数,通过这项机制容器可以存取和改变ActiveX控件的属性参数。
事件:
ActiveX控件由这项机制通知容器在ActiveX控件中发生的事件,比如属性参数的改变,用户按下鼠标左键等。
存储:
容器由这项机制通知ActiveX控件存储和提取有关信息数据等。
ActiveX控件只要在Windows的Registry数据库中注册后,就可以像其他Windows使用程序一样发挥各自的功能。
ActiveX控件是一个模块化的灵活对象,如果某个使用程序或网页需要增加一项特殊的功能,无须重写整个程序,只要灵活地插入一个具有此项功能的ActiveX控件即可实现。
ActiveX的优势还在于它的动态可交互性,用户可以动态地在使用过程中,通过改变它的属性和参数,在使用程序中实现自己的特殊要求。
也许有的读者会问:
目前在市面上可以找到各种各样现成的ActiveX控件,还有没有必要自己创建ActiveX控件呢?
关于这个问题很容易解释,现有的控件种类是很多,功能也比较齐全,问题是有许多时候会遇到这种情况:
使用现成的控件虽能完成任务,但自己需要的一些特性(属性、事件或方法)该控件却没有提供,还需要自己手工写代码来实现,而这些特性偏偏在自己的使用系统中又经常会用到,为了避免大量的重复劳动,一劳永逸的办法就是在创建自己的ActiveX控件。
目前可以使用VisualBasic或其它开发工具创建ActiveX控件。
无论按照哪种标准,VisualBasic都是计算机历史上最为成功的(同时也是最流行的)编程语言,其中最令人兴奋的特性就是可以创建用户自己的控件并可以像其他控件一样使用于支持ActiveX控件技术的使用程序中。
下面通过一个具体实例来阐述如何在VisualBasic6.0(中文企业版)下进行ActiveX控件创建。
\4.2.程序单元编码
1.登陆窗口代码:
rivateSubcmdOK_Click()
'检查正确的密码
WithfrmMain.Data8.Recordset
.MoveFirst
Fori=1To.RecordCount
IfCombo1.Text=.Fields("用户名称")AndtxtPassword=.Fields("用户密码")Then
LoginSucceeded=True
UserName=.Fields("用户名称")
UserPass=.Fields("权限")
ExitFor
EndIf
.MoveNext
Nexti
IfLoginSucceededThen
'将代码放在这里传递
'成功到calling函数
'设置全局变量时最容易的
UnloadMe
Else
MsgBox"无效的密码,请重试!
",,"登录"
txtPassword.SetFocus
SendKeys"{Home}+{End}"
EndIf
EndWith
EndSub
PrivateSubForm_Load()
OnErrorResumeNext
WithfrmMain.Data8.Recordset
.MoveFirst
Fori=1To.RecordCount
Combo1.AddItem.Fields("用户名称")
Combo1.ItemData(Combo1.NewIndex)=.AbsolutePosition
.MoveNext
Nexti
EndWith
2.管理员模块代码
DimaaAsLong
PrivateSubCombo1_Click()
Command4.Enabled=True
EndSub
PrivateSubCommand1_Click()
'添加用户
OnErrorResumeNext
IfCommand1.Caption="添加用户"Then
ListView1.Visible=False
Frame1.Visible=True
Text1.Text=""
Text2.Text=""
Text3.Text=""
Text4.Text=""
Combo1.Text=Combo1.List(0)
Command2.Enabled=False
Command3.Enabled=False
Command4.Enabled=True
Command1.Caption="放弃添加"
Else
ListView1.Visible=True
Frame1.Visible=False
Command2.Enabled=True
Command3.Enabled=True
Command4.Enabled=False
Command1.Caption="添加用户"
EndIf
EndSub
PrivateSubCommand2_Click()
'编辑用户
OnErrorResumeNext
WithfrmMain.Data8.Recordset
Text1.Text=.Fields("用户名称")
SelectCase.Fields("权限")
Case"A"
Combo1.Text=Combo1.List(0)
Text2.PasswordChar=""
Text3.PasswordChar=""
Text4.PasswordChar=""
Text2.Text=.Fields("用户密码")
Text3.Text=.Fields("用户密码")
Text4.Text=.Fields("用户密码")
Case"B"
Combo1.Text=Combo1.List
(1)
Text2.PasswordChar=""
Text3.PasswordChar=""
Text4.PasswordChar=""
Text2.Text=.Fields("用户密码")
Text3.Text=.Fields("用户密码")
Text4.Text=.Fields("用户密码")
Case"C"
Combo1.Text=Combo1.List
(2)
Text2.PasswordChar=""
Text3.PasswordChar=""
Text4.PasswordChar=""
Text2.Text=.Fields("用户密码")
Text3.Text=.Fields("用户密码")
Text4.Text=.Fields("用户密码")
Case"D"
Text2.PasswordChar="*"
Text3.PasswordChar="*"
Text4.PasswordChar="*"
Text2.Text=""
Text3.Text=""
Text4.Text=""
Combo1.Text=Combo1.List(3)
EndSelect
EndWith
IfCommand2.Caption="修改用户"Then
ListView1.Visible=False
Frame1.Visible=True
Command1.Enabled=False
Command3.Enabled=False
Command4.Enabled=False
Command2.Caption="放弃修改"
Else
ListView1.Visible=True
Frame1.Visible=False
Command1.Enabled=True
Command3.Enabled=True
Command4.Enabled=False
Comma
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 网吧收费系统 毕业设计 网吧 收费 系统