航空公司管理信息系统.doc

xxx职业技术学院毕 业 论 文论文名称_航空公司管理信息系统_学生姓名_xxx_ 学号_ 2008090111_专 业_计算机应用技术_班 级_08级计算机应用_指导老师_ xxx_2011 年5月目 录摘 要2Abstract31.系统设计42.数据库设计53.数据库结构的实现94.航空公司管理信息系统主窗体的创建115 系统用户管理模块的创建146 舱位信息管理模块的创建147 系统的实现19后 记23参考文献241摘 要随着信息时代的到来,计算机技术的飞速发展,市场竞争的日趋激烈,企业的管理水平要求也必须不断地提高。采用日趋成熟的数据库技术和管理信息系统理论建立管理信息系统,对于企业就显得日益迫切和必要。一个正常营运的航空公司需要管理所拥有的飞机、航线的设置、客户的信息等,更重要的还要提供票务管理。面对各种不同种类的信息,需要合理的数据库结构来保存数据信息以及有效的程序结构支持各种数据操作的执行。本论文设计的是航空公司管理信息系统,讲述如何建立一个航空公司管理信息系统,它是航空部门机票管理系统的一部分,其作用是对所有待售机票和已售机票进行有效的管理。通过本系统不仅可以进行售票工作,而且还可以对和机票相对应的旅客情况和航班情况进行查询,并可随时进行增加,修改,删除,打印等工作,使售票人员能够有效地对机票进行有效的控制和管理。本论文从机票管理出发介绍了系统开发的背景,阐述了系统的设计思路和设计方法,并对系统中遇到的问题及应用前景作了阐述。一般而言,航空公司的管理信息系统应该包括人事、工资管理模块。关键词：票务管理；信息系统；管理模块AbstractAs the information era, the rapid development of computer technology,the increasingly fierce market competition, enterprise management requirements must continue to improve. Using increasingly sophisticated database technology and management information systems management information systems theory,the enterprise becomes increasingly urgent and necessary.Normal operation of the airline needs a management-owned aircraft, route setting, customer information and, more importantly, also provide ticketing. Face different kinds of information, a logical database structure to store data and program structure to support effective implementation of a variety of data manipulation. In this thesis, the airline management information system, about how to build a carrier management information system, which is the aviation sector as part of ticket management system, its role is for sale tickets and sold all the tickets for effective management. This system not only through ticket sales can work, but can also correspond to the passenger and ticket information and flight status inquiries, and are free to add, modify, delete, print, etc., so that ticket sales staff to effectively carry out effective on airline tickets control and management. This paper describes the departure from the ticket management system development background, describes the system design and design methods, and system problems and prospects are described. In general, the airlines management information system should include personnel, payroll module. Keywords: Ticket management、information systems、management module航空公司管理信息系统1.系统设计1.1 系统功能分析系统开发的总体任务是实现各种信息的系统化、规范化和自动化。系统功能分析是在系统开发的总体任务的基础上完成。本例子中的航空公司管理信息系统需要完成功能主要有：l 舱位信息的输入和修改,包括舱位等级编号、舱位等级名称、提供的各种服务类别,以及备注信息等。l 客机信息的输入、修改和查询,包括客机编号、客机型号、购买时间、服役时间、经济舱座位数量、公务舱座位数量、头等舱座位数量以及备注信息等。l 航线信息的输入、修改和查询,包括航线编号、出发城市、到达城市、航班日期、出发时间、到达时间、客机编号、经济舱价格、公务舱价格、头等舱价格和备注信息等。l 客户等级信息的输入、修改,包括客户等级编号、客户等级名称、折扣比例和备注信息等。l 客户信息的输入、修改和查询,包括客户编号、客户姓名、客户性别、身份证号码、联系电话、客户类型和备注信息等。l 订票信息的输入、查询和修改,包括订票编号、客户编号、客户姓名、客户类型、折扣比例、航线编号、出发城市、到达城市、出发时间、舱位类型、票价、结算金额和备注信息等。 1.2 系统功能模块设计对上述各项功能进行集中、分块,按照结构化程序设计的要求,得到如图1-2所示的系统功能模块图。图1-2 系统功能模块图2.数据库设计数据库在一个信息管理系统中占有非常重要的地位,数据库结构设计的好坏将直接对应用系统的效率以及实现的效果产生影响。合理的数据库结构设计可以提高数据存储的效率,保证数据的完整和一致。设计数据库系统时应该首先充分了解用户各个方面的需求,包括现有的以及将来可能增加的需求。数据库设计一般包括如下几个步骤：l 数据库需要分析。l 数据库概念结构设计。l 数据库逻辑结构设计。2.1 数据库需求分析用户的需求具体体现在各种信息的提供、保存、更新和查询,这就要求数据库结构能充分满足各种信息的输出和输入。收集基本数据、数据结构以及数据处理的 流程,组成一份详尽的数据字典,为后面的具体设计打下基础。仔细分析调查有关航空公司管理信息需求的基础上,将得到如图2-1所示的本系统所处理的数据流程。图2-1 航空公司管理信息系统数据流程图针对一般航空公司管理信息系统的需求,通过对航空公司管理工作过程的内容和数据流程分析,设计如下面所示的数据项和数据结构：l 舱位等级信息,包括的数据项有：舱位等级编号、舱位等级名称、是否有礼品、是否有报纸、是否有饮料、是否有午餐、是否有电影、是否可以改签、是否可以退票、是否可以打折、备注信息等。l 客机信息,包括的数据项有：客机编号、客机型号、购买时间、服役时间、经济舱座位数量、公务舱座位数量、头等舱座位数量、备注信息等。l 航线信息,包括的数据项有：航线编号、出发城市、到达城市、航班日期、出发时间、到达时间、客机编号、经济舱价格、公务舱价格、头等舱价格、备注信息等。l 客户类型信息,包括的数据项有：客户类型编号、客户类型名称、折扣比例、备注信息等。l 客户信息,包括的数据项有：客户编号、客户姓名、客户性别、身份证号码、联系电话、客户类型、备注信息等。l 订票信息,包括的数据项有：订票编号、顾客编号、顾客姓名、顾客类型、折扣比例、航线编号、出发城市、到达城市、舱位类型、机票价格、结算金额、备注信息等。有了上面的数据结构、数据项和数据流程,我们就能进行下面的数据库设计。2.2 数据库概念结构设计得到上面的数据项和数据结构以后,就可以设计出能够满足用户需求的各种实体,以及它们之间的关系,为后面的逻辑结构设计打下基础。这些实体包含各种具体信息,通过相互之间的作用形成数据的流动。本实例根据上面的设计规划出的实体有：舱位等级信息实体、客机信息实体、航线信息实体、客户类型信息实体、客户信息实体、订票信息实体。各个实体具体的描述E-R图如下。图2-2 舱位等级信息实体E-R图客机信息实体E-R图如图2-3所示。图2-3 客机信息实体E-R图航线信息实体E-R图如图2-4所示。图2-4 航线信息实体E-R图客户类型信息实体E-R图如图2-5所示。图2-5 客户类型信息实体E-R图客户信息实体E-R图如图2-6所示。图2-6 客户信息实体E-R图订票信息实体E-R图如图2-7所示。图2-7 订票信息实体E-R图实体之间关系的E-R图如图2-8所示。图2-8 实体之间关系的E-R图2.3 数据库逻辑结构设计现在需要将上面的数据库概念结构转化为SQL Server 2000数据库系统所支持的实际数据模型,也就是数据库的逻辑结构。航空公司管理信息系统数据库中各个表格的设计结果如下面表格所示。每个表格表示在数据库中的一个表。表2-1为供应商信息表。表2-1 serviceInfo 舱位等级信息表列 名数据类型可否为空说 明serviceNOcharNOT NULL舱位等级编号serviceNamenvarcharNULL舱位等级名称noPresentcharNULL是否有礼物noNewsPapercharNULL是否有报纸noDrinkcharNULL是否有饮料noFoodcharNULL是否有午餐noMoviecharNULL是否有电影canChangecharNULL是否可以改签canCancelcharNULL是否可以退票canDiscountcharNULL是否可以打折serviceMemotextNULL备注信息3.数据库结构的实现经过前面的需求分析和概念结构设计以后,得到数据库的逻辑结构。现在就可以在SQL Server 2000数据库系统中实现该逻辑结构。这是利用SQL Server 2000数据库系统中的SQL 查询分析器实现的。下面给出创建这些表格的SQL语句。3.1 创建系统用户表CREATE TABLE dbo.user_Info1 (user_ID char (10) COLLATE Chinese_PRC_CI_AS NOT NULL ,user_PWD char (10) COLLATE Chinese_PRC_CI_AS NULL ,user_Des char (10) COLLATE Chinese_PRC_CI_AS NULL ) ON PRIMARY3.2 创建舱位等级信息表CREATE TABLE dbo.serviceInfo (serviceNO char (4) COLLATE Chinese_PRC_CI_AS NOT NULL ,serviceName nvarchar (20) COLLATE Chinese_PRC_CI_AS NULL ,noPresent char (2) COLLATE Chinese_PRC_CI_AS NULL ,noNewsPaper char (2) COLLATE Chinese_PRC_CI_AS NULL ,noDrink char (2) COLLATE Chinese_PRC_CI_AS NULL ,noFood char (2) COLLATE Chinese_PRC_CI_AS NULL ,noMovie char (2) COLLATE Chinese_PRC_CI_AS NULL ,canChange char (2) COLLATE Chinese_PRC_CI_AS NULL ,canCancel char (2) COLLATE Chinese_PRC_CI_AS NULL ,canDiscount char (2) COLLATE Chinese_PRC_CI_AS NULL ,serviceMemo text COLLATE Chinese_PRC_CI_AS NULL ) ON PRIMARY TEXTIMAGE_ON PRIMARY3.3 创建客机信息表CREATE TABLE dbo.planeInfo (planeNO char (18) COLLATE Chinese_PRC_CI_AS NOT NULL ,planeType char (20) COLLATE Chinese_PRC_CI_AS NULL ,buyDate datetime NULL ,serveDate datetime NULL ,isCommon nvarchar (20) COLLATE Chinese_PRC_CI_AS NULL ,isCommercial nvarchar (20) COLLATE Chinese_PRC_CI_AS NULL ,isFirst nvarchar (20) COLLATE Chinese_PRC_CI_AS NULL ,planeMemo text COLLATE Chinese_PRC_CI_AS NULL ) ON PRIMARY TEXTIMAGE_ON PRIMARY3.4 创建航线信息表CREATE TABLE dbo.airlineInfo (airlineNO char (14) COLLATE Chinese_PRC_CI_AS NOT NULL ,departCity nvarchar (50) COLLATE Chinese_PRC_CI_AS NULL ,arrivalCity nvarchar (50) COLLATE Chinese_PRC_CI_AS NULL ,departDate char (10) COLLATE Chinese_PRC_CI_AS NULL ,departTime char (10) COLLATE Chinese_PRC_CI_AS NULL ,arrivalTime char (10) COLLATE Chinese_PRC_CI_AS NULL ,planeNO char (18) COLLATE Chinese_PRC_CI_AS NULL ,commonPrice numeric(18, 2) NULL ,commercialPrice numeric(18, 2) NULL ,firstPrice numeric(18, 2) NULL ,airlineMemo text COLLATE Chinese_PRC_CI_AS NULL ON PRIMARY TEXTIMAGE_ON PRIMARY3.5 创建客户类型信息表CREATE TABLE dbo.customerType (ctypeNO char (14) COLLATE Chinese_PRC_CI_AS NOT NULL ,ctypeName char (20) COLLATE Chinese_PRC_CI_AS NULL ,discount numeric(2, 0) NULL ,ctypeMemo text COLLATE Chinese_PRC_CI_AS NULL ) ON PRIMARY TEXTIMAGE_ON PRIMARY3.6 创建客户信息表CREATE TABLE dbo.customerInfo (customerNO char (14) COLLATE Chinese_PRC_CI_AS NOT NULL ,customerName char (50) COLLATE Chinese_PRC_CI_AS NULL ,customerSex char (2) COLLATE Chinese_PRC_CI_AS NULL ,customerID char (18) COLLATE Chinese_PRC_CI_AS NULL ,customerTele char (20) COLLATE Chinese_PRC_CI_AS NULL ,customerType char (14) COLLATE Chinese_PRC_CI_AS NULL ,customerMemo text COLLATE Chinese_PRC_CI_AS NULL ) ON PRIMARY TEXTIMAGE_ON PRIMARY4.航空公司管理信息系统主窗体的创建上面的SQL语句在SQL Server 2000中查询分析器的执行,将自动产生需要的所有表格。有关数据库结构的所有后台工作已经完成。现在将通过航空公司管理信息系统中各个功能模块的实现,讲解如何使用Visual Basic来编写数据库系统的客户端程序。4.1 创建工程项目MIS_Ticket启动Visual Basic后,单击File|New Project菜单,在工程模板中选择Standard EXE,Visual Basic将自动产生一个Form窗体,属性都是缺省设置。这里我们删除这个窗体,单击File|Save Project菜单,将这个工程项目命名为MIS_Ticket。4.2 创建航空公司管理信息系统的主窗体这个项目我们使用多文档界面,单击工具栏中的ADD MDI Form按钮,产生一个窗体。在这个窗体上添加所需的控件,窗体和控件的属性设置见表2-7。创建好的窗体如图2-10所示。表2-7 主窗体及其控件属性设置控 件属 性属性取值frmMain(Form)NameFrmMainCaption大唐航空公司信息管理系统StartUpPositonCenterScreenWindowStateMaximizedSbStatusBar(StatusBar)NameSbStatusBarPanels(1)StyleSbrTextPanels(2)StyleSbrDatePanels(3)StyleSbrTime图2-10 航空公司管理信息系统主窗体在主窗体中加入状态栏控件,可以实时反映系统中的各个状态的变化。状态栏控件需要在通常的属性窗口中设置一般属性,还需要在其特有的弹出式菜单中进行设置。选中状态栏控件,单击鼠标右键,选中Property菜单,然后设置属性。面板1用来显示各种文本信息,面板2用来显示当前日期,面板3用来显示当前时间。4.3 创建主窗体的菜单在如图2-10所示的主窗体中,单击鼠标右键,选择弹出式菜单中的Menu Editor,创建如图2-11所示的菜单结构：图2-11 主窗体中的菜单结构4.4 创建公用模块在Visual Basic中可以用公用模块来存放整个工程项目公用的函数、过程和全局变量等。这样可以极大地提高代码的效率。在项目资源管理器中为项目添加一个Module,保存为Module1.bas。下面就可以开始添加需要的代码了。由于系统中各个功能模块都将频繁使用数据库中的各种数据,因此需要一个公共的数据操作函数,用以执行各种SQL语句。添加函数ExecuteSQL,代码如下：Public Function ExecuteSQL(ByVal SQL _ As String, MsgString As String) _ As ADODB.Recordset执行SQL语句,并返回记录集对象 声明一个连接 Dim cnn As ADODB.Connection 声明一个数据集对象 Dim rst As ADODB.Recordset Dim sTokens() As String异常处理 On Error GoTo ExecuteSQL_Error sTokens = Split(SQL) Set cnn = New ADODB.Connection cnn.Open ConnectString If InStr(INSERT,DELETE,UPDATE, _ UCase$(sTokens(0) Then cnn.Execute SQL MsgString = sTokens(0) & query successful Else Set rst = New ADODB.Recordset rst.Open Trim$(SQL), cnn, _ adOpenKeyset, _ adLockOptimistic rst.MoveLast get RecordCount Set ExecuteSQL = rst MsgString = 查询到 & rst.RecordCount & End IfExecuteSQL_Exit: Set rst = Nothing Set cnn = Nothing Exit Function ExecuteSQL_Error: MsgString = 查询错误: &Err.Description Resume ExecuteSQL_ExitEnd Function5 系统用户管理模块的创建用户管理模块主要实现：l 用户登录。l 添加用户。l 修改用户密码。6 舱位信息管理模块的创建舱位信息管理模块主要实现如下功能：l 添加舱位信息。l 修改舱位信息。l 删除舱位信息。6.1 显示舱位信息窗体的创建选择“航线信息管理|舱位信息”菜单,将出现如图2-12所示的窗体。图2-12 舱位等级信息窗体这个窗体用来显示舱位等级信息,并且可以对各条记录进行操作。在载入窗体时,程序将自动载入所有记录,代码如下：Private Sub menuCarbin_Click() frmService.txtSQL = select * from serviceInfo frmService.Show 0End Sub窗体的Show方法后面加上0或者1,可以得到不同的窗体显示方式。参数为0时,显示的窗体为无模式形式,窗体切换时不需要进行其他操作；参数为1时,显示的窗体为有模式形式,窗体切换时必须进行相关操作。载入窗体时将自动显示各条记录,代码如下：Private Sub Form_Load() ShowTitle ShowDataEnd Sub函数ShowTitle用来显示表头,代码如下：Private Sub ShowTitle() Dim i As Integer With msgList .Cols = 12 .TextMatrix(0, 1) = 等级编号 .TextMatrix(0, 2) = 机舱等级 .TextMatrix(0, 3) = 是否有礼品 .TextMatrix(0, 4) = 是否有报纸 .TextMatrix(0, 5) = 是否有饮料 .TextMatrix(0, 6) = 是否有午餐 .TextMatrix(0, 7) = 是否提供电影 .TextMatrix(0, 8) = 是否可以改签 .TextMatrix(0, 9) = 是否可以退票 .TextMatrix(0, 10) = 是否可以打折 固定表头 .FixedRows = 1 设置各列的对齐方式 For i = 0 To 11 .ColAlignment(i) = 0 Next i 表头项居中 .FillStyle = flexFillRepeat .Col = 0 .Row = 0 .RowSel = 1 .ColSel = .Cols - 1 .CellAlignment = 4 设置单元大小 .ColWidth(0) = 1000 .ColWidth(1) = 1000 .ColWidth(2) = 2000 .ColWidth(3) = 1000 .ColWidth(4) = 1000 .ColWidth(5) = 1000 .ColWidth(6) = 1000 .ColWidth(7) = 1000 .ColWidth(8) = 1000 .ColWidth(9) = 1000 .ColWidth(10) = 1000 .Row = 1 End WithEnd Sub6.2 添加舱位信息窗体的创建在舱位信息显示窗体中单击“添加”按钮,将出现如图2-13所示的窗体。图2-13 添加舱位等级信息窗体载入窗体时,首先根据标志变量判断状态,然后决定是添加还是修改,代码如下：Private Sub Form_Load() Dim intCount As Integer Dim MsgText As String Dim i As Integer 判断是否为添加 If gintSmode = 1 Then Me.Caption = Me.Caption & 添加 For i = 0 To 7 Combo1(i).AddItem 否 Combo1(i).AddItem 是 Combo1(i).ListIndex = 0 Next I 载入当前选择记录内容 ElseIf gintSmode = 2 Then Set mrc = ExecuteSQL(txtSQL, MsgText) 判断记录是否为空 If mrc.EOF = False Then With mrc For intCount = 0 To 1 txtItem(intCount) = .Fields(intCount) Next intCount txtItem(2) = .Fields(10) For i = 0 To 7 Combo1(i).AddItem 否 Combo1(i).AddItem 是 Combo1(i).ListIndex = 0 Next i End With txtItem(0).Enabled = False End If Me.Caption = Me.Caption & 修改 End If mblChange = FalseEnd Sub6.3 修改舱位等级信息在舱位等级信息列表中选择需要修改的记录,然后单击“修改”按钮,将出现如图2-13所示的窗体。选择记录的内容将显示在窗体中,可以进行修改,最后保存修改后的记录。代码如下：Private Sub cmdModify_Click() Dim intCount As Integer 判断列表中是否有记录 If frmService.msgList.Rows 1 Then 改变状态变量 gintSmode = 2 记录选择记录位置 intCount = msgList.Row If intCount 0 Then frmService1.txtSQL = select * from serviceInfo where serviceNO = & Trim(msgList.TextMatrix(intCount, 1) & frmService1.Show 1 ElseMsgBox 警告, vbOKOnly + vbExclamation, 请首先选择需要修改的记录！ End If End IfEnd Sub6.4 删除舱位等级信息在舱位等级信息列表中选择需要删除的记录,然后单击“删除”按钮,将删除当前记录,代码如下：Private Sub cmdDelete_Click() Dim txtSQL As String Dim intCount As Integer Dim mrc As ADODB.Recordset Dim MsgText As String 判断信息列表中内容是否为空 If msgList.Rows 1 Then 提示信息 If MsgBox(真的要删除机舱等级为 & Trim(msgList.TextMatrix(msgList.Row, 2) & 的记录吗？, vbOKCancel + vbExclamation, 警告) = vbOK Then 记录选择记录位置 intCount = msgList.Row 删除重复记录 txtSQL = delete from serviceInfo where serviceNO = & Trim(msgList.TextMatrix(intCount, 1) & Set mrc = ExecuteSQL(txtSQL, MsgText) 卸载窗体 Unload frmService 重新载入记录并显示 frmService.txtSQL = select * from serviceInfo frmService.Show End If End IfEnd Sub7 系统的实现现在已经完成了程序各个功能模块的创建,现在来运行整个系统。运行程序,出现如图2-28所示的登录窗口。图2-28 用户登录窗口输入用户名和密码后,进入系统。选择“航线信息管理|舱位信息”菜单,出现如图2-29所示的窗体。图2-29 显示舱位信息窗体选择“航线信息管理|客机信息”菜单,将显示所有客机信息,如图9-30所示。图2-30 显示客机信息的窗体在客机信息列表中单击“添加”按钮,出现如图2-31所示的窗体,在其中输入客机信息。图2-31 添加客机信息选择“航线信息管理|航线信息”菜单,出现如图2-32所示的航线信息列表。图2-32 航线信息列表在航线信息列表中单击“添加”按钮,并输入航线内容,如图2-33所示。图2-33 添加航线信息在航线信息列表中单击“查询”按钮,并设置查询内容,如图2-34所示。图2-34 查询航线信息窗体航线查询结果如图2-35所示。图2-35 航线信息查询结果选择“客户信息管理|客户信息”菜单,并输入客户信息,如图2-36所示。图2-36 添加客户信息选择“