航空公司管理系统论文.doc

航空公司管理系统13应用一班 张贵钱 1316010151第一章 概述【摘要】在当今社会，计算机占据了非常重要的位置，这些大部门都是通过使用软件而提高生产、管理效率来体现的。票务管理信息系统正好就是这样性质的一个软件。一个正常营运的航空公司需要管理所拥有的飞机、航线的设置、客户的信息等，更重要的还要提供票务管理。面对各种不同种类的信息，需要合理的数据库结构来保存数据信息有效的程序结构支持各种数据操作的执行。交通运输一直都是我国重要的经济命脉，而且由于我国是内陆国家，这交通运输的意义就显得更加突出了，对于这样重要的一件事，当然需要良好的管理了。经过几十年的发展，事实早就证明了使用计算机软件来辅助自己比单纯的人工处理手段高明的多。在以前，像飞机售票这样的事，都是人工处理的，人工处理的缺点是显而易见的，成本大、处理的速度慢、出错的几率比较大，效率是很低的。现在，在世界各国，售票使用的基本上都是员工操作计算机的模式，在这里，计算机主要是借助软件用来存储、更新数据的，并有统计账目的功能。由于计算机是一种高精度的机器，所以使用计算机软件辅助后，出错的几率也就变得非常低了。一般而言，航空公司的管理信息系统应该包括人事、工资管理模块 。本系统的系统开发平台采isual Basic 6.0，数据库管理平台采用SQL Server2000数据库管理软件。第二章 问题定义航空公司的工作人员：航空公司管理系统信息的录入人员，主要是管理系统内的各种档案的工作人员，需要通过密码才能进入。他们拥有对系统内航班仓位、客机信息、航线信息等数据的录入、修改、查询、删除等操作权限。但不可以更改系统的密码。普通用户：拥有最低权限的登入人员，他们只有对航班信息和客户信息等相关数据的查询权限，但不能对这些数据进行修改和删除。系统管理人员：是航空公司管理系统的内部管理人员，他们拥有最高的权限，包括对航空公司管理系统数据的录入、修改、查询、删除等操作权限而且还可以对这个系统的密码进行更改，能够管理其他用户的信息和权限。第三章 需求分析3.1数据库需求分析针对一般航空公司管理信息系统的需求，通过对航空公司管理工作过程的内容和数据流程分析，设计如下面所示的数据项和数据结构：舱位等级信息，包括的数据项有：舱位等级编号、舱位等级名称、是否有礼品、是否有报纸、是否有饮料、是否有午餐、是否有电影、是否可以改签、是否可以退票、是否可以打折、备注信息等。客机信息，包括的数据项有：客机编号、客机型号、购买时间、服役时间、经济舱座位数量、公务舱座位数量、头等舱座位数量、备注信息等。航线信息，包括的数据项有：航线编号、出发城市、到达城市、航班日期、出发时间、到达时间、客机编号、经济舱价格、公务舱价格、头等舱价格、备注信息等。客户类型信息，包括的数据项有：客户类型编号、客户类型名称、折扣比例、备注信息等。客户信息，包括的数据项有：客户编号、客户姓名、客户性别、身份证号码、联系电话、客户类型、备注信息等。订票信息，包括的数据项有：订票编号、顾客编号、顾客姓名、顾客类型、折扣比例、航线编号、出发城市、到达城市、舱位类型、机票价格、结算金额、备注信息等。3.2数据库的概念结构设计概念设计是由分析用户需求到生成概念产品的一系列有序的、可组织的、有目标的设计活动，它表现为一个由粗到精、由模糊到清晰、由具体到抽象的不断进化的过程。我的设计规划出的实体有：舱位等级信息实体、客机信息实体、航线信息实体、客户类型信息实体、客户信息实体、订票信息实体。3.3数据库的逻辑结构设计 各个实体具体的描述E-R图如下：图3.1 舱位等级信息实体E-R图图3.2客机信息实体E-R图图3.3航线信息实体E-R图图3.4客户类型信息实体E-R图图3.5客户信息实体E-R图图3.6订票信息实体E-R图3.3.1数据字典舱位等级信息表=舱位等级编号+舱位等级名称+是否有礼品+是否有报纸+是否有饮料+是否有午餐+是否有电影+是否可以改签+是否可以退票+是否可以打折+备注信息。客机信息表=客机编号+客机型号+购买时间+服役时间+经济舱座位数量+公务舱座位数量+头等舱座位数量+备注信息等。航线信息表=航线编号+出发城市+到达城市+航班日期+出发时间+到达时间+客机编号+经济舱价格+公务舱价格+头等舱价格+备注信息等。客户类型信息表=客户类型编号+客户类型名称+折扣比例+注信息等。客户信息表=客户编号+客户姓名+客户性别+身份证号码+联系电话+客户类型+备注信息等。订票信息表=订票编号+顾客编号+顾客姓名+顾客类型+折扣比例+航线编号+出发城市+到达城市+舱位类型+机票价格+结算金额+备注信息等。3.3.2程序流程图图3.7航空公司管理信息系统程序流程图3.3.3功能结构图图3.8系统功能结构图第四章 数据库设计4.1概念设计图4.1实体之间关系的E-R图4.2逻辑设计下面列出几个主要的数据库表设计：表4.1舱位等级信息表列 名数据类型可否为空说 明serviceNOcharNOT NULL舱位等级编号serviceNamenvarcharNULL舱位等级名称noPresentcharNULL是否有礼物noNewsPapercharNULL是否有报纸noDrinkcharNULL是否有饮料noFoodcharNULL是否有午餐noMoviecharNULL是否有电影canChangecharNULL是否可以改签canCancelcharNULL是否可以退票canDiscountcharNULL是否可以打折serviceMemotextNULL备注信息表4.2客机信息表格列 名数据类型可否为空说 明planeNOcharNOT NULL客机编号planeTypecharNULL客机型号buyDatedatetimeNULL购买日期serveDatedatetimeNULL服役日期isCommonnvarcharNULL经济舱座位数量isCommercialnvarcharNULL公务舱座位数量isFirstnvarcharNULL头等舱座位数量planeMemotextNULL备注信息表4.3航线信息表列 名数据类型可否为空说 明airlineNOcharNOT NULL航线编号departCitynvarcharNULL出发城市arrivalCitynvarcharNULL到达城市departDatecharNULL航班日期departTimecharNULL出发时间arrivalTimecharNULL到达时间planeNOcharNULL客机编号commonPricenumericNULL经济舱价格commercialPricenumericNULL公务舱价格firstPricenumericNULL头等舱价格airlineMemotextNULL备注信息表4.4客户类型信息表列 名数据类型可否为空说 明ctypeNOcharNOT NULL客户类型编号ctypeNamecharNULL客户类型名称discountnumericNULL折扣比例表4.5客户信息表列 名数据类型可否为空说 明customerNOcharNOT NULL客户编号customerNamecharNULL客户姓名customerSexcharNULL客户性别customerIDcharNULL身份证号码customerTelecharNULL客户联系电话customerTypecharNULL客户类型customerMemotextNULL备注表4.6订票信息表列 名数据类型可否为空说 明ticketNOcharNOT NULL订票编号customerNOcharNULL客户编号customerNamecharNULL客户姓名customerTypecharNULL客户类型discountnumericNULL折扣比例airlineNOcharNULL航线编号departCitynvarcharNULL出发城市arrivalCitynvarcharNULL到达城市ticketDatedatetimeNULL出发日期serviceTypecharNULL舱位类型ticketPricenumericNULL机票价格ticketSumnumericNULL结算金额customerMemotextNULL备注4.3物理设计据特定数据库管理系统所提供的多种存储结构和存取方法等依赖于具体计算机结构的各项物理设计措施，对具体的应用任务选定最合适的物理存储结构、存取方法和存取路径等。这一步设计的结果就是所谓“物理数据库”。（1）索引舱位等级信息表 选定的索引：serviceNO 类型：主键 索引名：舱位等级编号航线信息表 选定的索引：airlineNO 类型：主键 索引名：航线编号（2）存储结构数据文件 文件名：Ticke 位置：E:数据库Ticket_Data.MDF分配的空间(MB)：1文件组：PRIMARY 文件属性：文件自动增长 文件增长：按被百分比10 最大文件大小：文件增长不受限制事务日志 文件名：Ticket_log 位置：E:数据库Ticket_log.LDF分配的空间(MB)：1 文件属性：文件自动增长 文件增长：按被百分比10 最大文件大小：文件增长不受限制（3）存储文件：数据存储：机票舱位信息说明：记录机票舱位的信息，如舱位等级编号、舱位等级名称、是否有礼品、是否有报纸、是否有饮料、是否有午餐、是否有电影、是否可以改签、是否可以退票、是否可以打折、备注信息等。输入数据流：舱位数据量：待定存取方式：顺序存取数据存储：航线信息说明：记录机场的航班信息，如航线编号、出发城市、到达城市、航班日期、出发时间、到达时间、客机编号、经济舱价格、公务舱价格、头等舱价格、备注信息等。输入数据流：航班数据量：待定存取方式：顺序存取第五章 界面设计5.1登陆窗口 运行程序，出现如图5.1所示的登录窗口图5.1用户登录窗口5.2主界面 输入用户名和密码后，进入系统，出现如图所示的窗体。图5.2系统主窗体5.3舱位信息窗体 在主窗体选择“航线信息管理舱位信息”菜单，出现如图所示的窗体。图5.3显示舱位信息窗体5.4客户信息窗体 在主窗体选择“客户信息管理客户信息”菜单，出现如图所示的窗体。图5.4显示客户信息窗体5.5机票信息窗体 在主窗体选择“票务信息管理机票信息”菜单，出现如图所示的窗体。图5.5显示机票信息窗体第六章 代码与注释登录代码Private Declare Function GetUserName Lib advapi32.dll Alias GetUserNameA (ByVal lpbuffer As String, nSize As Long) As LongPublic OK As BooleanPrivate Sub Form_Load() Dim sBuffer As String Dim lSize As Long sBuffer = Space$(255) lSize = Len(sBuffer) Call GetUserName(sBuffer, lSize) If lSize 0 Then txtUserName.Text = Left$(sBuffer, lSize) Else txtUserName.Text = vbNullString End IfEnd SubPrivate Sub cmdCancel_Click() OK = False Me.HideEnd SubPrivate Sub cmdOK_Click() ToDo: create test for correct password check for correct password If txtPassword.Text = Then OK = True Me.Hide Else MsgBox Invalid Password, try again!, , Login txtPassword.SetFocus txtPassword.SelStart = 0 txtPassword.SelLength = Len(txtPassword.Text) End IfEnd Sub二、主界面代码Private Sub MDIForm_Load() Me.Left = GetSetting(App.Title, Settings, MainLeft, 1000) Me.Top = GetSetting(App.Title, Settings, MainTop, 1000) Me.Width = GetSetting(App.Title, Settings, MainWidth, 6500) Me.Height = GetSetting(App.Title, Settings, MainHeight, 6500)End SubPrivate Sub MDIForm_Unload(Cancel As Integer) If Me.WindowState vbMinimized Then SaveSetting App.Title, Settings, MainLeft, Me.Left SaveSetting App.Title, Settings, MainTop, Me.Top SaveSetting App.Title, Settings, MainWidth, Me.Width SaveSetting App.Title, Settings, MainHeight, Me.Height End IfEnd SubPrivate Sub menuAirline_Click() frmAirline.txtSQL = select * from airlineInfo frmAirline.Show 0End SubPrivate Sub menuBookticket_Click() frmTicket.txtSQL = select * from ticketInfo frmTicket.Show 0End SubPrivate Sub menuCarbin_Click() frmService.txtSQL = select * from serviceInfo frmService.Show 0End SubPrivate Sub menuCtype_Click() frmcType.txtSQL = select * from customerType frmcType.Show 0End SubPrivate Sub menuCustomer_Click() frmCustomer.txtSQL = select * from customerInfo frmCustomer.Show 0End SubPrivate Sub menuPlane_Click() frmPlane.txtSQL = select * from planeInfo frmPlane.Show 0End Sub三、修改客户信息代码Private Sub cmdModify_Click() Dim intCount As Integer If frmCustomer.msgList.Rows 1 Then gintCmode = 2 intCount = msgList.Row If intCount 0 Then frmCustomer1.txtSQL = select * from customerInfo where customerNO = & Trim(msgList.TextMatrix(intCount, 1) & frmCustomer1.Show 1 Else MsgBox 警告, vbOKOnly + vbExclamation, 请首先选择需要修改的纪录！ End If End IfEnd Sub第七章 设计总结本次创建了一个完整的航空管理信息系统。其中详细地描述了航空管理信息系统的系统设计部分，包括功能模块设计、数据库结构设计等。系统设计为整个程序构建了框架，各个功能模块实现各个细节部分。在开发系统和写论文的过程中，我学到了很多东西；一是深刻领阅Basic软件的设计开发方法，充实了我的理论水平；二是增强了我的实际动手能力，使我基本掌握了软件开发的一般方法步骤和技巧，能够参与完成中小型软件系统的开发；三是