机票预定系统.

广东技术师范学院天河学院数据库原理及应用课程设计报告题目：机票预定系统设计者：吴嘉豪梁家豪专业班级：计科131学号：************* *************指导教师：***所属系部：计算机科学与技术系2014年 12月5日目录1 引言----------------------------------------22 设计简介------------------------------------23 设计内容与分析------------------------------24 E-R图分析----------------------------------55 表格信息------------------------------------76 创建表格------------------------------------87 表格展示------------------------------------98 系统展示------------------------------------109 相关代码------------------------------------1210 总结---------------------------------------151．引言1.1题目简介课程设计题目：机票预定系统为方便旅客出行，急需开发一个机票预定系统。

该系统能为便于旅客于随时随地定票，旅客在预定机票的时候提供自己的信息，包括姓名、性别、工作单位、身份证号码、旅行时间、旅行目的地，输入机票预定系统的用户端程序，系统经过查询航空公司内的航班数据服务器后，即可预定航班。

从课程设计的角度来说：这次系统的制作过程，无疑加深了自身对数据库原理及应用这门课理论知识的理解，大大提高了理论知识的应用水平，而且增强动手能力，可以说是为毕业设计做了很好准备。

面对以后强大的就业压力，没有熟练的动手能力，光有满脑袋的理论是不行的，因此本次课程设计显得十分重要。

1.2编写说明：本文包含七个部分：第一部分：题目简介，简要介绍机票预定系统名称、开发意义、课题背景等；第二部分：机票预定系统的前期的需求分析；第三部分：机票预定系统的总体设计，包括功能模块图；第四部分：整体数据库进行设计包括概念设计、逻辑设计、物理设计；第五部分：界面设计及VB编程代码；第六部分：总结分析；2．需求分析2.1系统目标：设计机票预定系统，能实现航线信息的查询航线信息的查询，用户注册，用户订票，用户退票，住户修改自己注册信息，管理员管理航线信息、用户信息等。

并要求系统的界面要简单明了，易于操作，服务器程序利于维护。

2.2 系统功能建立用户信息、航线信息、订票信息；完成航线信息、订票信息、用户信息；用户包括：管理员和用户；对用户进行分级管理，用户可查询航线信息，查询和更改自己的注册信息，查询客机信息，订票，退票；管理员除具有用户的所有权限外，可以对全部航线信息进行添加和更改，并可以添加、更改和删除用户信息与订票信息要求系统能有效、快速、安全、可靠和无误的完成上述操作。

具体功能如下：l 航线信息操作要求：查询输出内容必需是只读的，2 航线查询/订票系统操作要求：输入目的地，能根据目的地查询出两地航班之间的航班号，目的地3订票信息操作要求：查询客机信息，订票，退票。

2.3 数据分析根据上述2.2的具体功能，总结出数据字典，用户信息（姓名，性别，身份证号码，电话）；航线信息（航班号，出发地，目的地，离地时间，落地时间，班期，机型）；订票信息（ID，用户名，已定航班号，已定目的地，购买日期，起飞日期，起飞时间，降落时间）。

通过数据字典进行分析，可以得到形成如下数据库的表：3．1概念结构图设计啊E-R图设计：（1）:航班E-R图，如图所示（2）飞机E-R图，如图所示(3)机票E-R图，如图所示（4）客户E-R图，如图所示（5）业务员E-R图，如图所示由上得总E-R图：4.1.1 涉及的表用户信息属性类型大小能否为空约束订票信息航线信息5.1 系统实施1）Create Database机票预订2）创建飞机表Create table飞机(飞机编号char(10)not null,座位数int not null,primary key(飞机编号))3）创建航班表Create table航班(航班编号char(10)primary key,飞机编号char(10)not null,起飞地char(10)not null,目的地char(10)not null,起飞时间datetime,到达时间datetime,Foreign key(飞机编号)references飞机(飞机编号))4）创建机票表Create table机票(航班编号char(10)not null,机舱等级char(10)not null,票价float(2)not null,当前预售状态char(10)not null,Constraint c1 check(机舱等级in('头等舱','公务舱','经济舱')),Foreign key(航班编号) references航班(航班编号),)5）创建旅客表Create table旅客(旅客编号intprimary key,姓名char(10)not null,性别char(10)not null,身份证号char(20)not null,联系电话char(15)not null)6）创建购买表Create table购买(旅客编号char(10)not null,座位号char(10)not null,primary key(旅客编号,座位号),折扣float(1),实付款float(2)not null,购买数量int not null,付款状态char(10)not null,Foreign key(旅客编号)references旅客(旅客编号),Foreign key(座位号)references机票(座位号)) 5.2 数据展示1飞机表2 购买表3航班表4 机票表5旅客表6系统展示1 根据起飞地和目的地查询航班信息2 输入你要坐的航班号，点击购票3 填写个人信息，并选择机舱等级4单击购买，显示购买信息5 单机显示机票信息，显示所购买的航班信息6 退票功能7 相关代码7.1 前台代码7.11 第一个页面 index 代码Imports System.Data.SqlClient Imports System.Data Partial Class indexInherits System.Web.UI.PageProtected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.ClickDim cn As New SqlConnection订?;integrated security=true"cn.Open() If cn.State = ConnectionState.Open Then End IfDim aa As String = "exec_p_1 '" + TextBox1.Text + "','" + TextBox2.Text + "'"Dim ad As New SqlDataAdapter(aa, cn)Dim dset As New DataSet ad.Fill(dset, "abc")GridView1.DataSource = dset.Tables("abc") GridView1.DataBind() End SubProtected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.ClickDim cn As New SqlConnectioncn.ConnectionString = "server=PC-20141024QHWX;database=机¨²票¡À预¡è订?;integrated security=true"cn.Open() If cn.State = ConnectionState.Open Then Application("abc") = TextBox3.TextEnd IfDim bb As String= "p_2 '"+ TextBox3.Text + "'"Dim ab As New SqlDataAdapter(bb, cn)Dim dset As New DataSet ab.Fill(dset, "aaa")GridView2.DataSource = dset.Tables("aaa") GridView2.DataBind() End SubProtected Sub GridView2_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles GridView2.SelectedIndexChangedEnd Sub End Class7.12 第二个页面 index1 代码Imports System.Data.SqlClient Imports System.DataPartial Class index1Inherits System.Web.UI.PageProtected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.ClickDim cn As New SqlConnectioncn.ConnectionString = "server=PC-20141024QHWX;database=机¨²票¡À预¡è订?;integrated security=true"cn.Open() If cn.State = ConnectionState.Open Then End IfDim cc As String = "p_a '" + TextBox1.Text + "','" + TextBox2.Text + "','" + TextBox3.Text + "','" + TextBox4.Text + "','" + Application("abc") + "','" + DropDownList1.SelectedItem.Text + "'"Dim ac As New SqlDataAdapter(cc, cn) Dim dset As New DataSetac.Fill(dset, "aaa") GridView3.DataSource = dset.Tables("aaa")GridView3.DataBind() End SubProtected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.ClickDim cw As New SqlConnection订?;integrated security=true"cw.Open() If cw.State = ConnectionState.Open Then End IfDim bb As String = "p_b'" + Application("abc") + "'"Dim ab As NewSqlDataAdapter(bb, cw) Dim dset As New DataSet ab.Fill(dset,"aad") GridView4.DataSource = dset.Tables("aad") GridView4.DataBind() End Sub End Class7.13 第三个页面 index2 代码Imports System.Data.SqlClient Imports System.Data Partial Class index2Inherits System.Web.UI.PageProtected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.ClickDim cn As New SqlConnectioncn.ConnectionString = "server=PC-20141024QHWX;database=机¨²票¡À预¡è订?;integrated security=true" cn.Open() If cn.State = ConnectionState.Open ThenEnd If Dim bb As String= "p_3 '"+ TextBox5.Text + "'"Dim ab As New SqlDataAdapter(bb, cn) Dim dset As New DataSet ab.Fill(dset, "acc") GridView1.DataSource =dset.Tables("acc") GridView1.DataBind() End Sub End Class7．2 SQL 相关代码（储存过程）7.21 exec_p_1ALTER proc [dbo].[exec_p_1] @a char(12),@b char(12)As if exists(select* from航班where起飞地=@a and目的地=@b) begin select* from航班where起飞地=@a and目的地=@b end else select警告='无此班次'7.22 p_2ALTER proc [dbo].[p_2] @c char(8)as if exists(select*from机票where航班编号=@c) b gin select*from机票where航班编号=@c end else select警告='无此航班'7.23 p_3ALTER proc [dbo].[P_3] @a char(20)as if exists(select*from旅客where身份证号=@a)begin declare @ii int select @ii=旅客编号from旅客where身份证号=@a delete from购买where旅客编号=@ii delete from旅客where身份证号=@a select成功='退票成功'endelse select警告='无此旅客'7.24 p_aALTER proc [dbo].[p_a]@d char(10),@e char(10),@f char(20),@g char(15),@a char(10),@c char(10) As declare @h real,@q int if exists(select @f from旅客 where 身份证号=@f) select警告='您已购票' insert旅客 values(@d,@e,@f,@g) select @h=票价from机票where航班编号=@a and机舱等级=@cselect @q=旅客编号from旅客where姓名=@d and身份证号=@finsert购买values(@q,null,@h,1,'y')select*from购买where旅客编号=@q and实付款=@h select*from航班where航班编号=@a7.25 p_bALTER proc [dbo].[p_b] @a char(10)As select* from航班 where航班编号=@a8 总结分析由于技术有限，系统还存在一些BUG，但是总的来说，经过一周的努力，还是完成了一个基本能实现其功能的机票预定系统。