航空售票系统实施报告.docx
- 文档编号:27631320
- 上传时间:2023-07-03
- 格式:DOCX
- 页数:43
- 大小:706.61KB
航空售票系统实施报告.docx
《航空售票系统实施报告.docx》由会员分享,可在线阅读,更多相关《航空售票系统实施报告.docx(43页珍藏版)》请在冰豆网上搜索。
航空售票系统实施报告
航
空
售
票
管
理
系
统
实
施
报
告
组员:
第一章引言
1.1编写目的
开发目标:
开发出一个操作简便,界面友好,灵活实用,安全可靠,功能齐全的的航空售票管理信息系统。
航空售票管理信息系统对航空相关单位进行包括机票订购在的许多信息管理有着极其重要的作用,就一般的实用软件来说,它的设计容繁多、功能重叠、操作复杂,比如订票和修改票务信息某些功能模块重叠等。
本开发小组正是通过广泛调研,对同类的相关系统掌握了一定的资料的基础上,制定开发出来的。
为了更好的完善本系统,在实施管理阶段特制定本实施报告,以求彻底完善本系统。
1.2参考文献
[1]翼英等《VisualBasic课程设计》清华大学出版日期:
2008-1
[2]《信息系统开发方法》清华大学旭平
1.3术语和缩写词
在本文档中,所有专门术语的定义以及缩写词的原意如下:
①程序流程图:
程序流程图又称程序框图,独立于任何一种设计语言,比较直观和清晰的描述了过程的控制流程。
②N-S图:
N-S图是为了改变流程图描述程序逻辑时过大的随意性与灵活性,其规定了五种图形构建,包括:
顺序型,选择型,while重复,until重复型,多分枝选择型。
③PAD图:
PAD图是problemanalysisdiagram的英文缩写,是日本日立公司提出。
它使用结构化程序设计思想表现程序的逻辑结构的图形工具。
④PDL语言:
PDL语言是proceduredesignlanguage的英文缩写。
PDL是所有非正文形式的过程设计工具的统称。
PDL具有“非纯粹”的编写语言的特点。
第二章软件概述
2.1软件用途
现在应用在大中型企业的管理信息系统中,几乎都包括了工资管理模块。
有些环境中是由作为大型ERP软件中的一个模块引进的,有些是作为企业的财务系统的一部分。
这些根据规的西方的管理制度设计的工资管理软件,在很多时候还不能完全解决中国特色的中小企业的问题,本文介绍的就是要为高校解决他们在工资管理方面的问题,主要实现系统用户管理、员工基本信息管理、工资标准设定以及工资结算和查询等一般工资管理系统应具有的主要功能,以便完成课程实践的目的。
2.2软件运行
学生成绩管理系统主要有:
登陆界面、员工信息管理,工资标准管理
主要运行如下所示:
a:
登陆界面
输入、密码,点击登陆界面显示图
b:
航线信息界面
图2.5
c:
机票信息界面
图2.8
2.3系统配置
本软件要求在PC及其兼容机上运行,要求奔腾II以上CPU,64兆以上存,10G以上硬盘。
软件需要有WINDOWS7操作系统环境。
2.4软件结构
航空售票管理系统的结构图如下:
图2.12
2.5软件性能
A:
用户管理模块能在普通用户与管理员之间加以区分,分别实现其对应的功能,方法简单,性能较好。
B:
查询模块中我们对教职工按照和工号两种方法进行查询,有效的考虑了重名的各种情况,达到一定的性能指标。
C:
工资模块:
我们将职称工资管理和其他工资管理等几种情况
D:
密码管理:
我们起初编写了一份密码表,只有按照密码表上的输入才能对工资管理系统进行相关操作,性能较好。
2.6输入、输出
2.6.1输入
本系统采用文本文框进行信息的输入以及成绩的输入。
我们将创建模块,显示模块,存盘功能模块,读入功能模块,统计功能模块等的输入项
2.6.2输出
本系统采用文本文框进行信息的输出以及成绩的输出。
我们将创建模块,显示模块,存盘功能模块,读入功能模块,统计功能模块等的输出项
第三章软件使用过程
3.1软件安装
本系统采用进行设计与实现,完成设计后进行发布就可以在没有安装环境的计算机中使用,安装方便简洁,只需要在安装的计算机中添加数据库即可。
3.2运行步骤
首先选择要登录的角色,然后进入相应的界面进行操作。
3.3运行说明
对于本系统我们设计时进行了权限的分配,比如普通用户登陆后只能进行自己工资的查询而不能进行工资的修改,管理员登陆后既可以进行查询又可以进行修改。
3.3.1控制输入
按照软件的说明,将测试数据加入到软件中
3.3.2管理信息
软件运行过程中的密码键入:
通过文本框进行输入。
3.4.3输入输出文件
软件运行过程过文本框进行文件的输入输出。
3.4.4输出报告
若输入要输出的条件正确的话会弹出相应的提示框提示是否成功或者正确等。
3.5出错处理
软件运行过程中可能雏形的出物及处理如下:
(1)输入信息出错
在数据库找不到输入的信息,输入信息有误,导致操作失败。
(2)出错处理对策
检查重新输入的信息是否符合要求。
(3)数据库连接错误
这类错误主要是数据库设置不正确,或sqlserver异常引起的,我们只要取消本次操作,提醒用户检查数据库问题就可。
3.6非常规过程
如果出现不可能处理的问题,可以直接与公司的技术支持人员联系。
第四章软件维护过程
4.1程序设计的约定
本软件程序是一个单一的运行软件,各个软件子模块的预定如下:
航空售票管理系统主要以管理航空售票信息为目的,设置了严密的权限管理。
用户管理:
设置了权限管理功能
查询管理:
包括查询航线和航班等基本信息。
可以显示单独一条记录,也可以显示所有信息。
更新管理:
当有需要时,管理员可以进行工资和信息的删除操作
密码管理:
管理员和个人可以根据需求修改密码。
4.2出错及纠正方法
可能由于输入的数据不符合软件的要求,软件将可能提出错误,并提醒您按照软件的要求运行程序;可能出现的问题如下:
<1>若输入密码格式不对,应提示:
您输入的密码错误。
4.3专用维护程序
本软件提供您一个专用维护软件,以便在软件出现意想不到的问题时可以使您迅速发现您在软件运行时的失误,保证您的分析结果不会受到损失,尽管您的软件可能永远不会出现使用维护本软件的时候,希望您在使用分析错误!
未找到索引项。
软件的时候,可以浏览以下本软件的使用。
软件的使用如下:
A:
输入正确的用户名与密码登陆。
B:
若是普通用户,请选择登陆普通用户界面。
C:
若是管理员,请选择登陆管理员界面。
4.4源程序清单
登录界面代码:
ImportsSystem.Data
ImportsSystem.Data.SqlClient
PublicClass登录
InheritsSystem.Windows.Forms.Form
DimcountAsInteger=0
Dimmy_classAsNewclass1
#Region"Windows窗体设计器生成的代码"
PublicSubNew()
MyBase.New()
'该调用是Windows窗体设计器所必需的。
InitializeComponent()
'在InitializeComponent()调用之后添加任何初始化
EndSub
'窗体重写dispose以清理组件列表。
ProtectedOverloadsOverridesSubDispose(ByValdisposingAsBoolean)
IfdisposingThen
IfNot(componentsIsNothing)Then
components.Dispose()
EndIf
EndIf
MyBase.Dispose(disposing)
EndSub
'Windows窗体设计器所必需的
PrivatecomponentsAsSystem.ComponentModel.IContainer
'注意:
以下过程是Windows窗体设计器所必需的
'可以使用Windows窗体设计器修改此过程。
'不要使用代码编辑器修改它。
FriendWithEventsButton2AsSystem.Windows.Forms.Button
FriendWithEventsButton1AsSystem.Windows.Forms.Button
FriendWithEventsTextBox2AsSystem.Windows.Forms.TextBox
FriendWithEventsTextBox1AsSystem.Windows.Forms.TextBox
FriendWithEventsLabel3AsSystem.Windows.Forms.Label
FriendWithEventsLabel2AsSystem.Windows.Forms.Label
FriendWithEventsLabel1AsSystem.Windows.Forms.Label
DimresourcesAsSystem.ComponentModel.ComponentResourceManager=NewSystem.ComponentModel.ComponentResourceManager(GetType(登录))
Me.Button2=NewSystem.Windows.Forms.Button
Me.Button1=NewSystem.Windows.Forms.Button
Me.TextBox2=NewSystem.Windows.Forms.TextBox
Me.TextBox1=NewSystem.Windows.Forms.TextBox
Me.Label3=NewSystem.Windows.Forms.Label
Me.Label2=NewSystem.Windows.Forms.Label
Me.Label1=NewSystem.Windows.Forms.Label
Me.SuspendLayout()
'Button2
Me.Button2.Font=NewSystem.Drawing.Font("宋体",12.0!
System.Drawing.FontStyle.Bold,System.Drawing.GraphicsUnit.Point,CType(134,Byte))
Me.Button2.Location=NewSystem.Drawing.Point(306,299)
Me.Button2.Name="Button2"
Me.Button2.Size=NewSystem.Drawing.Size(112,32)
Me.Button2.TabIndex=13
Me.Button2.Text="取消"
'Button1
Me.Button1.Font=NewSystem.Drawing.Font("宋体",12.0!
System.Drawing.FontStyle.Bold,System.Drawing.GraphicsUnit.Point,CType(134,Byte))
Me.Button1.Location=NewSystem.Drawing.Point(72,299)
Me.Button1.Name="Button1"
Me.Button1.Size=NewSystem.Drawing.Size(112,32)
Me.Button1.TabIndex=12
Me.Button1.Text="确定"
'TextBox2
Me.TextBox2.Location=NewSystem.Drawing.Point(208,235)
Me.TextBox2.Name="TextBox2"
Me.TextBox2.PasswordChar=Global.Microsoft.VisualBasic.ChrW(42)
Me.TextBox2.Size=NewSystem.Drawing.Size(240,21)
Me.TextBox2.TabIndex=11
'TextBox1'
Me.TextBox1.Location=NewSystem.Drawing.Point(208,163)
Me.TextBox1.Name="TextBox1"
Me.TextBox1.Size=NewSystem.Drawing.Size(240,21)
Me.TextBox1.TabIndex=10
'Label3
Me.Label3.Font=NewSystem.Drawing.Font("宋体",12.0!
System.Drawing.FontStyle.Bold,System.Drawing.GraphicsUnit.Point,CType(134,Byte))
Me.Label3.Location=NewSystem.Drawing.Point(48,234)
Me.Label3.Name="Label3"
Me.Label3.Size=NewSystem.Drawing.Size(136,22)
Me.Label3.TabIndex=9
Me.Label3.Text="密码"'
'Label2'
Me.Label2.Font=NewSystem.Drawing.Font("宋体",12.0!
System.Drawing.FontStyle.Bold,System.Drawing.GraphicsUnit.Point,CType(134,Byte))
Me.Label2.Location=NewSystem.Drawing.Point(48,163)
Me.Label2.Name="Label2"
Me.Label2.Size=NewSystem.Drawing.Size(136,21)
Me.Label2.TabIndex=8
Me.Label2.Text="用户名"'
'Label1'
Me.Label1.BackColor=System.Drawing.SystemColors.ButtonHighlight
Me.Label1.Font=NewSystem.Drawing.Font("华文彩云",36.0!
System.Drawing.FontStyle.Regular,System.Drawing.GraphicsUnit.Point,CType(134,Byte))
Me.Label1.ForeColor=System.Drawing.SystemColors.InactiveCaption
Me.Label1.Location=NewSystem.Drawing.Point(55,9)
Me.Label1.Name="Label1"
Me.Label1.Size=NewSystem.Drawing.Size(393,120)
Me.Label1.TabIndex=7
Me.Label1.Text="航空公司管理信息系统"'
'登录'
Me.AutoScaleBaseSize=NewSystem.Drawing.Size(6,14)
Me.BackgroundImage=CType(resources.GetObject("$this.BackgroundImage"),System.Drawing.Image)
Me.ClientSize=NewSystem.Drawing.Size(504,390)
Me.Controls.Add(Me.Button2)
Me.Controls.Add(Me.Button1)
Me.Controls.Add(Me.TextBox2)
Me.Controls.Add(Me.TextBox1)
Me.Controls.Add(Me.Label3)
Me.Controls.Add(Me.Label2)
Me.Controls.Add(Me.Label1)
Me.Icon=CType(resources.GetObject("$this.Icon"),System.Drawing.Icon)
Me.Name="登录"
Me.Text="Form7"
Me.ResumeLayout(False)
Me.PerformLayout()
EndSub
#EndRegion
PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.Click
DimuserAsString
DimpwAsString
Dimtemp1AsString
Dimtemp2AsString
DimconAsString
DimsingeAsInteger=1
user=TextBox1.Text
username=TextBox1.Text
pw=TextBox2.Text
con="select*fromuserswhereid='"+user+"'andpassword='"+pw+"'"
DimdsAsNewDataSet
ds=class1.query(con)
Try
Ifds.Tables(0).Rows.Count>0Then
class1.dr=ds.Tables(0).Rows(0)
temp1=class1.dr(0)
temp2=class1.dr
(1)
主窗口.Show()
EndIf
CatchexAsException
MessageBox.Show(ex.Message)
EndTry
'con="insertintolog(id)selectidfrompermissionwhereid='"+temp1+"'"
'If(Trim(user)=Trim(temp1)AndTrim(pw)=Trim(temp2)And(user<>""Orpw<>""))Then
'Me.Hide()
'class1.insert(con)
'singe=1
'ElseIf(user=""Andpw="")Then
'MessageBox.Show("用户名和密码为空!
","提示")
'TextBox1.Focus()
'singe=0
'ElseIf(Trim(user)<>Trim(temp1)OrTrim(pw)<>Trim(temp2))Then
'MessageBox.Show("没有这个用户或密码错误,请重新输入!
","提示")
'TextBox1.SelectAll()
'TextBox1.Focus()
'singe=0
'EndIf
'count=count+1
'If(count=3Andsinge=0)Then
'MessageBox.Show("三次错误,退出本系统","提示")
'End
'EndIf
EndSub
PrivateSubButton2_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton2.Click
EndSub
PrivateSubForm7_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.Load
class1.init()
Label1.BackColor=Color.Transparent
Label2.BackColor=Color.Transparent
Label3.BackColor=Color.Transparent
Button1.BackColor=Color.Transparent
Button2.BackColor=Color.Transparent
EndSub
EndClass
订票界面代码:
PublicClass订票
PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.Click
DimiAsInteger
IfTextBox1.Text=""Then
i=MsgBox("客户号不能为空",MsgBoxStyle.OkCancel,"警告")
Else
DimconnAsString="datasource=.;connecttimeout=5;UserID=sa;Password='123';initialcatalog=Ticket;"
Dimobjconn1AsNewSqlConnection(conn)
objconn1.Open()
Dim客户号AsNewSqlParameter("客户号",SqlDbType.Int,4)
Dim客户AsNewSqlParameter("客户",SqlDbType.Char,10)
Dim起飞地AsNewSqlParameter("起飞地",SqlDbType.VarChar,50)
Dim目的地AsNewSqlParameter("目的地",SqlDbType.VarChar,50)
Dim票价AsNewSqlParameter("票价",SqlDbType.Int,4)
Dim飞行时间AsNewSqlParameter("飞行时间",SqlDbType.Int,4)
Dim航空公司AsNewSqlParameter("航空公司",SqlDbType.VarChar,50)
DimstrinAsString
strin="insertintoflyernb(客户号,客户,起飞地,目的地,票价,飞行时间,航空公司)values(客户号,客户,起飞地,目的地,票价,飞行时间,航空公司)"
Dimobjcmd1AsNewSqlComma
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 航空 售票 系统 实施 报告