《计算机信息管理专业毕业论文--娱乐休闲型酒店管理信息系统设计（开题报告 源代码）》由会员分享，可在线阅读，更多相关《计算机信息管理专业毕业论文--娱乐休闲型酒店管理信息系统设计（开题报告 源代码）（62页珍藏版）》请在金锄头文库上搜索。
1、计算机信息管理专业毕业论文-娱乐休闲型酒店管理信息系统设计开题报告+源代码 开题报告综述计算机在旅游餐饮和娱乐休闲行业的应用现已十分普遍但相应的管理信息软件却不象财会软件那样成熟稳定和标准为群众所知晓在这很大程度上是由于使用主体日新月异的经营方式和多变的运行模式所造成的无论是业内人士还是计算机系统开发者都难免被这类行业开展变化之快所困扰在计算机业务管理信息系统的建设和选择上目的不太明确盲目照搬国外的大型软件花钱不少但效果不好临时拼凑一些软件模块勉强使用缺乏之处用手工作业来祢补总之都没有充分发挥出高新技术在降低运营本钱提高管理水平和综合经济效益中的积极作用实际上该行业面向市场在竞争中不断变化的特
2、点已经决定了其管理信息系统软件是一个与管理对象密切相关的有机组成局部需要经过认真的和长期的调查分析并以次为根底去定制去磨合在设计和开发的进程中寻找规律以逐步完善因此其系统开发建设本身所遇到的问题和解决问题的方法也表达了一个比拟复杂的管理信息系统的开发特点二 研究方向随着改革开放的步伐人民生活水平得到了极大的提高人们对效劳业的需求也越来越高特别是对娱乐休闲型酒店的娱乐方式要求很高为此娱乐休闲型酒店也采取了很多方式进行改革加快步伐与西方的娱乐休闲型酒店接轨进入二十一世纪信息管理系统在各行各业取得了突飞猛进的开展如银行、车辆运输、学校、酒店等等开发娱乐休闲型酒店的目的是打破以前的管理方式实现全自动化
3、办公管理方式在系统开发的全过程始终要采取用户至上的观点一切从用户利益考虑在加强调查研究和系统分析的根底上通过分步骤的不断反应的讨论式方法确定出新系统的最正确方按各阶段可在局部上使用结构化模块化的方法严格按照有效阶段进行开发具体手段上尽量采用面向对象的开发形式使形成的应用软件模块具有很强的独立性适应性和扩展性实现方法及预期目标在针对实际系统进行关系定义和逻辑设计过程中我们发现采用移植的方法虽然在模块设计阶段进展较快但后来就会被两类不同运行模式中的复杂关系所纠缠而影响了开发进度甚至会造成大面积返工相反按照娱乐休闲型酒店的实际业务流程重新进行系统设计到开发后期就会发现这种淡化了住宿功能而以洗浴效劳为
4、主线的接待和消费方式还有一些规律性系统的设计开发过程采用了快速原形法结构化方法和讨论法相结合的混合方式鉴于这类新酒店的应用需求是不标准的和分批提出的系统分析的深度和广度只能在开发过程中逐步增加和完善所以在开发初期一般无法完整确实定其总体设计方按为此我们从用户对应用系统的粗略描述开始现在计算机上搭建起一个简单的应用模型并以次模型为基准根据用户的意见和要求对系统进一步细化通过不断的建模演示交流和讨论使系统一步步地接近实际在开发后期开发人员同用户已经有了充分的沟通因此在一些后台模块的开发上也遵循了结构化的生命周期法在程序设计方式上主要是利用了一些高效率的面向对象的开发工具通过这些工具对快速原形法和讨
5、论法实施有效的支撑进一步提高了系统的易扩展性和灵活性本系统采用网络数据库程序的开发方法前端开发工具采用Microsoft公司的专用数据库应用程序开发工具VISIUAL BASIC 60版本后端的数据库采用微软公司的SQL Server2000版本本系统开发的重点有1数据库的开发com的开发是本系统开发的难点弄清管理信息系统的功能模块了解功能模块之间的关联和次序是关键3通过各程序的模块直接控制数据库的信息最终实现娱乐休闲型酒店管理系统的应用目标四系统的开发进度具体安排由于时间有限具体工作安排如下 第13周完成课题调研开题报告及系统开发第14周完成总体方案设计数据库设计第15周完成模块设计输入输出
6、设计第16周完成具体实现comserver中创立数据库的连接3程序的开发第17周完成系统各模块的测试修改及验收系统同时上交毕业论文五参考文献?信息系统开发教程 第三辑? 出版社清华大学出版社 作者张基温 ?信息系统开发教程 第四辑? 出版社清华大学出版社 作者张基温 SQL Server70设计实务 出版社人民邮电出版社 作者施威铭VB程序设计教程 第二版 出版社电子工业出版社 作者刘瑞新指导老师 监督老师 签署意见并签字 签署意见并签字领导小组审查意见 审查人签字 年 月 日程序设计翻开VB程序出现VB主界面单击窗体下的frmlogin控件单击运行出现一个登录界面请输入用户名称和用户密码双击
7、确定按钮代码如下Option ExplicitPublic LoginCount As Integer 定义此变量的目的是为了判断登录的次数Private Sub CmdOk_Click If LoginCount 3 Then With DbCommand Set ActiveConnection DbConn CommandType adCmdText CommandText Select usernameuserpassword from hotellogin where username txtUersNameText Set DbTempSet Execute End With If
8、 DbTempSetEOF And DbTempSetBOF Then MsgBox 用户不存在请重新输入用户ID vbOKOnly frmLogintxtUersNameText frmLogintxtUersNameSetFocus Else If RTrim LTrim DbTempSetFields 1 Value txtPasswordText Then MsgBox 输入的该用户的密码错误请重新输入 vbOKOnly frmLogintxtPasswordText frmLogintxtPasswordSetFocus LoginCount LoginCount 1 Else Us
9、erId txtUersNameText LoginSucceeded True Unload Me End If End If Else If Not AppRun Then LoginSucceeded False Unload Me Else Unload frmMain Unload Me End If End IfEnd SubPrivate Sub cmdPasswork_Click If Not AppRun Then LoginSucceeded False Unload Me Else Unload frmMain Unload Me End End IfEnd SubPri
10、vate Sub Form_Activate frmLogintxtUersNameSetFocus frmLogintxtUersNameText frmLogintxtPasswordText End SubPrivate Sub Form_Load On Error GoTo ProErr frmLoginLeft 3900 调整窗体的位置靠左面的距离 frmLoginTop 3200 调整窗体的位置 靠顶部的距离 Call get_text With DbConn If State adStateClosed Then Close End If End With If DbConn I
11、s Nothing Then End If DbConnOpen Exit SubProErr MsgBox ErrDescription vbOKOnly AppTitleEnd Sub此段程序的目的是当按回车键的时候光标自动跳入txtpasswordtext中 Private Sub txtUersName_Keydown KeyCode As Integer Shift As Integer If KeyCode 13 Then frmLogintxtPasswordSetFocus End IfEnd Sub此段程序目的是当按回车键的时候光标自动跳入到确定按扭上准备开始验证输入的用户名
12、称和用户密码private Sub txtPassword_KeyDown KeyCode As Integer Shift As Integer If KeyCode 13 Then cmdOKSetFocus End IfEnd Sub进入主界面主界面代码如下Private Sub AboutSystem_Click FrmAboutSysShow vbModalEnd Sub Private Sub AboutSystem_Click FrmAboutSysShow vbModalEnd SubPrivate Sub backrestore_Click FrmBakResShow vbM
13、odalEnd SubPrivate Sub clearbkg_Click Set CTRLMachineLVPicture NothingEnd SubPrivate Sub ExitSystem_Click FrmExitSysShow vbModal Exit SubEnd SubPrivate Sub Form_Load frmMainTop 0 frmMainLeft 0End SubPrivate Sub roomcondition_Click FrmDayFluxShow vbModalEnd SubPrivate Sub roomdengjiruzhu_Click frmdengjiShow vbModalEnd SubPrivate Sub roomtypeprice_Click frmroompriceShow vbModalEnd SubPrivate Sub setbkg_Click On Error GoTo ErrHandler With BmpOpenDlg CancelError True Flags cdlOFNHideReadOnly Filter 所有图片 FilterIndex 0 End With BmpOpenDlgShowOpen CTRLMachineLVPic
