毕业设计 11.docx
- 文档编号:18424335
- 上传时间:2023-08-16
- 格式:DOCX
- 页数:15
- 大小:219.53KB
毕业设计 11.docx
《毕业设计 11.docx》由会员分享,可在线阅读,更多相关《毕业设计 11.docx(15页珍藏版)》请在冰点文库上搜索。
毕业设计11
编号:
南京森林警察学院
毕业论文
论文题目机房管理信息系统
专业
班级
姓名
指导教师
年月
机房管理信息系统
()
摘要:
本系统使用VisualBASIC编程语言,利用VisualBASIC和sql数据库技术,从软件设计和开发的角度提出了系统的总体设计目标和基本原则,阐述了系统的总体结构设计,机房计费系统具有一定的实用性,将理论和实践结合起来,为从学校到社会的转换做好过渡准备。
系统采用服务器(Server)形式,既方便实现动植物信息的查询,而且也大大提高了程序的可维护性和重复利用性。
关键字:
机房管理信息,查询,系统,vb
一、绪论
随着社会的发展,经过本院全体师生的共同努力,学校的规模不断的扩大,校园网的普及,学校机房的硬件设施越来越好,如何充分发挥校园计算机机房的效能,开放机房,最大限度的为机房管理服务,既要提高机房的科学管理水平,又要减轻机房管理员工作,使机房管理更加规范、有序。
使用计算机可以高速,快捷地完成以上工作。
在计算机联网后,数据在网上传递,可以实现数据共享,避免重复劳动,从而提高了管理效率和水平。
机房管理信息系统以计算机为工具,通过对上机管理所需的信息管理,把管理人员从繁琐的数据计算处理中解脱出来,使其有更多的精力从事其它管理政策的研究实施,机房上机计划的制定执行监督检查,从而全面提高管理质量。
机房上机管理系统是一个实时人机系统,它要求要有较高的可靠性、可适应性、扩充能力。
二、系统需求分析
(一)系统目标
客户端采用硬件模式,通过硬件级的底层网络登录与身份验证相结合,达到安全性。
管理端采用软件模式,主要管理学校计算机机房的上机业务,它的主要功能模块包括,系统管理、用户结帐管理、电脑与计算机信息管理、无卡通管理、日常管理、新会员办理管理、用户信息的维护管理、管理员信息的维护管理、机房预约与排课管理、上机考勤管理、学生付费管理、用户权限管理以及实行跨平台管理等。
本系统是一个运行在局域网上的子系统,能够直观、方便、有效、可靠地管理通过局域网联在一起的所有机器。
(二)系统分析
1.计算机登陆管理
在这一套机房管理信息系统中将对计算机登陆进行一种人性化的管理设计。
我们的这套系统是利用客户器服务/服务器服务(c/s),所谓C/S就是两个应用程序的逻辑系统及其各逻辑组件之间复杂的关系的协同。
在这个系统中我们将要对客户机(机房内的机子)进行应用程序的开发与安装,又要在服务器中进行应用程序的编写。
两个应用程序逻辑系统通过调用服务器的后台数据库中的数据来共同实现计算机界面登陆的管理。
这一功能的实现是系统中具有人性化的一个功能之一。
2.学生会员结帐管理
对于这个功能实施的必要性是因为会员在登陆使用计算机一段时间后想立即退出,会员卡的形式来是不想在上机了这是会员就可以使用结帐菜单来实现结帐功能.这个功能为什么能给管理者带来方便呢?
这就在于机房管理采用的是会员卡的形式来管理的所以呢,我们设计开发的这个功能就能很好的解决对于在遇到上机人员很多的时候管理员管理混乱的局面.
3.学生会员注册
在这套系统中我们还将对会员的注册这一功能在系统中进行开发.其主要的内容是当某一个人他以前已经注册过会员了但是却把卡号和密码给忘记了这是此人可以到管理员那里去说出自己的名字然后管理员查询有无此人,如果没有记录则帮助此人注册.注册的工作和以前一样.
4.无卡通
我们还将要实现一项功能就是对学校的整个班级来到机房上机的情况进行某一功能的管理,即是进行无卡开通管理进行无卡开通这一功能的开发是因为在学校对于一个个的班级一起来上机的话那么人数是比较会员上机来说是比较多的。
这样我们在对这中情况进行管理是时候是不能像因为会员那样来实施管理的。
因为会员是单个的个体比叫班级来说是很好管理的。
所以为了能让班级来机房上机的时候同时进行计算机的开关我们就进行了开通这项功能的开发。
5.查询功能
我们想到能让系统的管理在查询方面有一定的功能。
我们将在系统中开发查询这一功能。
这一功能将完成两方面的大的工作就是对机房内的机子状态进行查询还就是对会员进行查询。
对会员的记录的查询可以根根据用户提供的证件进行查询。
比如说如一个人要办理会员业务的他不知道自己是不是已经办理过了这是我们的管理员就可以用查询功能进行查询。
管理员还可以对某一个用户进行查询以后对他的记录进行删除、修改、充值等操作。
6.硬件管理
除以上所说的功能以外我们还将对计算机的硬件设备进行管理。
这是怎么样的一回事情呢。
也就是说我们将要对每一台机子CPU网卡显卡等等的硬件设备进行统计存入数据库中去。
进行这方面的统计管理是为了在以后对机子的维护提供一些信息,这样就对今后的计算机的维护提供了方便。
三、系统设计
(一)软件模块结构设计
如图1所示。
图1
(二)数据库设计
1.基本表如图2所示。
图2
2.基本表:
[PERSONAL]如图3所示。
图3
3.基本表:
[电脑]如图4所示。
图4
4.基本表:
[上机记录]如图5所示。
图5
(三)系统开发环境
操作系统平台:
WindowsXP操作系统
软件:
VisualBasic、SQLServer2000
本系统开发时采用了windowsXP操作平台,利用SQLServer2000建立相关数据库、再利用VisualBasic进行界面设计,本系统在windowsXP平台上运行。
四、实施概况
(一)系统功能介绍
1.用户登录
对于本系统的开发是采用的C/S模式的开发方式,所以对于这一功能的实现,就必须采取对用户端进行程序开发安装。
我们通过在服务端进行数据库的建立,把已经注册可以进行计算机登录的用户的信息存入库中。
在用户登录时,把用户登时所输入的用户名和密码,与服务器中的数据进行比较,得出是否允许其登录。
2.学生会员结账
学生会员结账功能是在客户端使用的一项功能,其实现是的方式是在用户端有个下拉列表框,在列表框中有一栏是结账下机,此时用户可以用鼠标单击就可以实现结账下机。
此功能的实现是在用户单击的时候,在客户端就会给服务端一个标记的信息,此时服务端就会停止对用户上机的记费,从而来实现结账这一功能的。
3.学生会员注册
学生会员的注册是指来上机的人员在管理员那里进行登记注册的过程。
在这里有两中情况:
一是已经注册过的会员,已经很久没有来上过机了,不知道自己注册的会员号是否还存。
在这时管理员就可对其所提供的信息进行查询,如果在就不用在进行注册,如果没有了这时候在对其进行注册登记。
二是上机的是个没有进行过注册的人,此时就要用户提供相应的证件进行注册登记。
此功能的实现就是在管理界面上,输入相关字段的信息,在输入完毕后向后台数据库提交即可。
4.无卡通
对于无卡通这一个功能来说,是一个管理界面上来实现的功能。
所谓的无卡通,也就是在正班级来机房上机的时候,管理员对多台计算机同时开通的管理。
对于这一功能的实现,就是在管理员在管理界面上,通过对一个子菜单的单击。
这时就会出现一个界面,在界面上输入所需要开通的计算机的数量在点确定,这样就可以实现无卡开通这个功能了。
5.信息查询.
对于查询功能来说,都会根据一定的条件来进行查询。
所以我们在进行开发的时候,都是采用的在菜单中选择已经设定好的条件来进行查询。
无论用户单击哪个,都是使用界面查询的方式来进行信息的查询。
6.硬件管理
硬件管理功能主要的目的,就是为维护人员在进行维护工作时提供方便。
因为硬件管理,所管理的是计算机上所安装的一些硬件设备的信息。
这个功能的实现也是采用的界面的形式来完成的。
当维护人员把所要维护的计算机的编号输入进行查询后,在使用界面的形式反馈出来。
(二)系统模块
1.建立系统会员登录的界面如图6所示:
图6
2.立虚拟会员操作界面如图7所示
图7
3.立学生会员注册界面如图8所示
图8
4.学生会员信息查询界面性如图9所示
图9
5.立管理员信息查询界面如图10所示
图10
(二)系统的不足之处以及解决方法
1.由于数据库的各个表格连接的不紧密,所以,当一些信息发生变动而其他信息并未发生变动。
这样在各信息表中的信息就会发生混乱;解决方法,当信息发生变化后在数据库其他表中修改相应的信息。
2.程序代码不够精简,没有很好地利用公用函数的方法,导致程序代码臃肿。
往往是为了达到某一个效果而不惜一切地增加一些没有必要的代码;解决方法,更好地学习程序设计语句。
附录
部分代码
编写代码如下:
1
PrivateSubwh_Click()
DimaAsString
a=InputBox("请输入你要进行维护的计算机的编号,以便于了解其所安装的硬件情况。
")
DimdbAsNewADODB.Connection
DimrsAsNewADODB.Recordset
DimsqlAsString
DimkkAsNewADODB.Recordset
DimbAsString
db.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=I:
\机放上机管理信息系统\会员表.mdb;PersistSecurityInfo=False"
db.Open
Ifa=""Then
系统主界面.Show
Else
sql="select*from硬件表"
rs.Opensql,db,adOpenStatic,adLockReadOnly
b="select*from硬件表where计算机编号='"&a&"'"
kk.Openb,db,adOpenStatic,adLockReadOnly
If维护界面.Text2.Text="text2"And维护界面.Text3.Text="text3"And维护界面.Text4.Text="text4"And维护界面.Text5.Text="text5"And维护界面.Text6.Text="text6"Then
MsgBox"没有此条记录!
"
Else
维护界面.Text1.Text=kk.Fields(0).Value
维护界面.Text2.Text=kk.Fields
(1).Value
维护界面.Text3.Text=kk.Fields
(2).Value
维护界面.Text4.Text=kk.Fields(3).Value
维护界面.Text5.Text=kk.Fields(4).Value
维护界面.Text6.Text=kk.Fields(5).Value
维护界面.Show
EndIf
EndIf
EndSub
PrivateSubCommand1_Click()
维护界面.Hide
系统主界面.Show
EndSub
2
PrivateSubhyxxcx_Click()
系统主界面.Hide
c=InputBox("请输入卡号!
")
DimdbAsNewADODB.Connection
DimrsAsNewADODB.Recordset
DimjjAsNewADODB.Recordset
DimsqlAsString
db.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=I:
\机放上机管理信息系统\会员表.mdb;PersistSecurityInfo=False"
db.Open
sql="select*from会员表"
rs.Opensql,db,adOpenStatic,adLockReadOnly
Ifc=""Then
系统主界面.Show
Else
d="select*from会员表where卡号='"&c&"'"
jj.Opend,db,adOpenStatic,adLockReadOnly
会员删修界面.Text1.Text=jj.Fields
(1).Value
会员删修界面.Text2.Text=jj.Fields
(2).Value
会员删修界面.Text3.Text=jj.Fields(3).Value
会员删修界面.Text4.Text=jj.Fields(4).Value
会员删修界面.Text5.Text=jj.Fields(5).Value
会员删修界面.Text6.Text=jj.Fields(6).Value
会员删修界面.Text7.Text=jj.Fields(7).Value
会员删修界面.Text8.Text=jj.Fields(8).Value
会员删修界面.Show
EndIf
EndSub
PrivateSubxg_Click()
MsgBox"你是否确定要进行修改?
"
Frame1.Visible=True
Command1.Visible=True
MsgBox"请杂文本框中填写你要修改的项后单击提交"
EndSub
PrivateSub提交_Click()
DimdbAsNewADODB.Connection
DimrsAsNewADODB.Recordset
DimsqlAsString
DimzAsString
db.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=I:
\机放上机管理信息系统\会员表.mdb;PersistSecurityInfo=False"
db.Open&打开库
sql="select*from会员表"
rs.Opensql,db,adOpenStatic,adLockReadOnly
rs.Close
z=InputBox("请在确认一下卡号")
a="update会员表set卡号='"&Text1.Text&"',密码='"&Text2.Text&"',姓名='"&Text3.Text&"',性别='"&Text4.Text&"',证件号='"&Text5.Text&"',类型='"&Text6.Text&"',剩余='"&Text7.Text&"',状态='"&Text8.Text&"'where卡号='"&z&"'"
rs.Opena,db,adOpenStatic,adLockReadOnly
MsgBox"你已经提交成功!
"
Adodc1.Refresh
1.Refresh
DataGrid1.Visible=True
Frame1.Visible=False
EndSub
PrivateSub删除_Click()
Dimj,xAsString
x=InputBox("请在确认一下卡号")
j=MsgBox("你确定要删除这条记录吗?
")
DimdbAsNewADODB.Connection
DimrsAsNewADODB.Recordset
DimsqlAsString
db.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=I:
\机放上机管理信息系统\会员表.mdb;PersistSecurityInfo=False"
db.Open
sql="delete*from会员表where卡号='"&x&"'"删除卡号等于InputBox值的记录
rs.Opensql,db,adOpenStatic,adLockReadOnly
MsgBox"你已经成功删除记录"
Adodc1.Refresh
DataGrid1.Refresh
DataGrid1.Visible=True
EndSub
PrivateSub返回系统主界面_Click()
会员删修界面.Hide
系统主界面.Show
EndSub
参考文献:
[1]宋漪.SQLServer数据库管理与开发[M].北京:
电子工业出版社,2005.
[2]赵明生.公安计算机应用教程[M].南京:
东南大学出版社,2008.
[3]李春葆.赵丙秀.数据库系统开发教程[M].北京:
清华大学出版社,2005
[4]刘奎.SQLServer数据库配置[M].北京:
清华大学出版社,2004
[5]美)斯坦里克(Staned,W.R.).SQLServer2005管理员必备[M].北京:
清华大学出版社,2008
[6]杨章伟.精通SQL语言与数据库管理[M].北京:
人民邮电出版社,2010
[7]杨中科.程序员的SQL金典[M].北京:
电子工业出版社,2011
[8]刘志成.SQLServer2005实例教程[M].北京:
电子工业出版社,2010
[9]管西京.ASP+SQLServer动态网站案例[M].北京:
电子工业出版社,2008
[10]周峰.SQL结构化查询语言速学宝典[M].北京:
中国铁道出版社,2010
[11]李樱.ASP+SQLServer2005从入门到精通[M].北京:
人民邮电出版社,2007
[12]屈喜龙.ASP+SQLServer开发动态网站实例荟萃[M].北京:
机械工业出版社,2006
[13]顼宇峰.asp+sqlserver网站系统开发项目案例[M].北京:
清华大学出版社,2007
[14]龙马工作室.asp+sqlserver组建动态网站实例精讲:
网站通用模块篇[M].北京:
人民邮电出版社,2005
[15]数码全方位研究室.Dreamweaver8网页设计实务[M].北京:
中国铁道出版社,2007
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 毕业设计 11