Airline Reservation System
1. ABOUT PROJECT
Every system is designed to achieve one or more objectives. The main objective of this system is to overcome the problem that comes during manual system. This system can be based on the Visual Basic.Net-2008. Also this system can use the MS Access as back- end, crystal report for Visual studio-2008-10.5 using the system can complete the work as fast as possible. It is very time consuming process so can save the time to complete the work. Also it is helpful to your daily work so your work should be maintained every day. Here when owner can provide many facilities in his agency to customer just he can enter the data, also he can do same thing & maintain his record. The main objective of this system is to store large amount of data within less time & less space. This system also aims to maintain correct and quick processing and to get some printed outputs like reports etc. using computer addition, correction are possible quickly. The most important objectives are to provide the security, authority, conclusion & future privacy and also to provide the more information quickly. To overcome this problem computerization is very important. The system can reduce the time required for any work that can take long period of completion. There are some other reasons given below which indicates the required of the proposed system.
The computerization generates the number of clean & neat reports at any time. To various reports is very short time span. To save time required to calculate the reports. It is help for booking for ticket of airline. To facilities the with information related this Institute. The project “Airline Reservation System” is all Computerized. It saves time and easy to handle. A specific detail can be easily searched and it consumes less time. The system provided easy calculation of fees details etc. Due to friendly interface the matter becomes easy to understand. Paper work becomes less.
Gopal Krishna Gokhale College, Kolhapur
1
Airline Reservation System
2. SYSTEM ANALYSIS 2.1 FACT FINDING
After obtaining background knowledge, the analyst being to collect data in the existing system’s output, input and costs. The tools used for the data collection are as follows: Review of written documents On site observation Interviews & Questionnaires
Review of written documents: When available all documentation on data carries (Forms, Records, Manual, etc.) is organized and include in procedures manual are the requirements of the system, which helps n determining to what extent they are met by the present system. Unfortunately all manuals are not up to date or may not be readable. Day to day problems may have force changes that are not reflected in the manual. Furthermore, people have the tendency to ignore procedures and find shortcuts as long as the output is satisfactory. Regarding existing forms, analyst to find out how they are filled out, how useful they are to be read.
Onsite observation: Another fact finding method is used by the system’s analyst is onsite or direct observation. The analyst’s role is that of an information seeker. One purpose of onsite observation is to get as close as possible to the “real” system being studies. As an observer the analyst follows a set of rules. Onsite observation is the most difficult fact finding technique. It requires in to the area and can cause adviser reaction by the ’s staff if not handled properly. The analyst observes the physical layout of system, location and movement of people and the work flow. He/ she is alert to the behavior of staff and the people with whom they come into . A change in behavior observed in perspective. If onsite observation is to be done properly in a complex situation can be time consuming. Proper sampling procedures is to be used to ascertain the stability, interface drawn from small of behavior can prove inaccurate and therefore unreliable.
Gopal Krishna Gokhale College, Kolhapur
2
Airline Reservation System
Interviews and Questionnaires: As we have discussed onsite observation is directed toward describing and understanding events and behavior as they occur. This method however is less effective for learning about people’s perception, feelings and motivations. The alternatives are the personal interview and the questionnaires. In either method heavy reliance is placed on the interview’s reports for information about job, the present system or experience. The quality of response judged in of its reliability and validity. Reliability means that the information gathered is dependable enough to be used for making decision about the system being studied. Validity means that the questions asked are so worded as to elicit the intended information. So, reliability and validity of data gathered depend on the design of the interviews or questionnaires and the manner in which each instrument is istered. In an interview, since the analyst and the person in the interviews meet face to face, there is an opportunity for greater flexibility in eliciting information.
Gopal Krishna Gokhale College, Kolhapur
3
Airline Reservation System 2.2 FEASIBILITY STUDY
All projects are feasible unlimited resources and definite time. It is most product and necessary to evaluate the feasibility of the project at the earliest possible time. Months or years of efforts, thousand of rupees and untold professional embarrassment can be averted if an ill-conceived project is recognized early in the definition phase. Feasibility of producing qualify software is reduced if the risks involved in producing are high. During software engineering there are different aspects of the feasibility study. Feasibility study means to determine where the current system is feasible in the following aspects.
i.
Operational Feasibility : The proposed system is operational due to the following reason-
It provides operating requirements of organization effectively; it gives online queries and reports.
The designed system uses systematic approach and is also menu driven. The end need not necessarily be a computer professional to operate the system and no special training is required for the operating system.
System is friendly and at every step in the system help messages lists are displayed. Any person can acquaint himself to the system with little practice.
Easy access to the different types of information relating to vehicle from time to time immediate and time saving is possible.
ii.
Technical Feasibility :
It is a study of functions, performance and constrains that may effect the ability to achieve an acceptable system. Technical feasibility is frequently the most difficult area to assess at this stage of system development process. The considerations that are normally associated with technical feasibility include.
Development Risks:
Can the system element be designed so that the necessary functions and performance are achieved?
Resource Availability:
Gopal Krishna Gokhale College, Kolhapur
4
Airline Reservation System
Are the necessary resources (Hardware & Software) available to build the system?
Technology:
Has the relevant technology progressed to a state that will the system? It can thus be the misjudgment in technical feasibility study. The system is technically feasible on of the following reasons,
The new hardware and software are available to the company. So the company
has installed new hardware and software.
The system runs on single environment.
Company has purchased the scanner to store specimen of signature of
shareholders for the verification and to store documents for easy accessibility.
iii.
Economical Feasibility :
It is evaluation of development cost weight against the ultimate income or benefit derived from the system. Economic justification is generally much weighted (except notable system such as research programs). Economic justification includes a board of concerns that includes cost benefits analysis, long term corporate income strategies, impact on other profit centers or products, cost of resources needed for development and potential market growth. The hardware and software requirement is already setup. Hence the access cost incurred is negligible. Thus making the proposed system economically feasible is very essential. The system is economically feasible on of the following reasons,
There will be only one time capital investment to purchase of hardware and
software package. If the software is developed in house cost of ready made software can be saved.
Maintenance cost is reduced, as there is no need of maintaining same date in
various records for various documents.
As there is no need of extra employees and extra s, it is cost effective.
Gopal Krishna Gokhale College, Kolhapur
5
Airline Reservation System
iv.
Legal Feasibility:
It is a determination of any infringement, violation or liability that could result from development of system. Legal feasibility encomes a board of concerns that include contracts, liabilities, infringement and myriad other traps frequently unknown to the technical staff.
Gopal Krishna Gokhale College, Kolhapur
6
Airline Reservation System 2.3 HARDWARE AND SOFTWARE REQUIREMENT
Hardware Requirement: 1. Hard disk : 150GB 2. RAM
: 1GB
3. Monitor
: Color any size
4. Printer
: HP LaserJet 1020 plus
Software Requirement: 1. Operating system :
Windows XP
2. Front End
:
Visual Studio 2008 (VB.NET)
3. Back End
:
MS Access 2007
4. Report Writer
:
Crystal Reports 10.5.0.0
3. ABOUT SOFTWARE USED Gopal Krishna Gokhale College, Kolhapur
7
Airline Reservation System
3.1 Front End – Visual Basic.Net 2008 What is .NET? .NET is the Microsoft Web service strategy to connect information, people, system & device through software. Integrated across the Microsoft platform, .NET technology provides the ability to quickly build, deploy, manage & use connected solutions enable businesses to integrate their systems more rapidly & in more agile manner & help they realize the promise of information anytime, anywhere, on any device. The Microsoft platform includes everything a business needs to develop & deploy a Web service-connected IT architecture: serves to host Web services, development tools to create them, applications to use them & a worldwide network of more than 35000 Microsoft Certified Partner organizations to provide any help you need.
Introduction on .Net Framework .NET is the framework for which we develop applications. It sits in between our application programs and operating system. Applications developed for .NET run inside .net and are controlled by .NET. It s both windows and web applications. .NET provides an object oriented environment. It ensures safe execution of the code by performing required runtime validations. For example, it is never possible to access an element of an array outside the boundary. Similarly, it is not possible to a program to write into another programs area etc. The runtime validations performed by .net makes the entire environment robust.
Components Of .NET
Gopal Krishna Gokhale College, Kolhapur
8
Airline Reservation System
VB
C++
C#
JScript
…..
Common Language Specification ASP.NET: Web Services And Web Forms
Windows Forms
ADO.NET: Data and XML Base Classes Common Language Runtime
.NET framework has main components .They are: 1. Conman language runtime 2. .Net class library
1. Common language runtime: The common language runtime (CLR) is the environment where all programs in .Net are run. It provides various services, like memory management and thread management. Programs that run in the CLR need not manage memory, as it is completely taken care of by the CLR. For example, when a program needs a block when program is done with the block. All programs targeted to .Net are converted to .NET are converted to MSIL(Microsoft intermediate language)MISL is the output of language compilers in .NET.MSIL is then converted to native code by JIT(just in time compiler) of the CLR and then native code is run by CLR. As every program is ultimately converted to MSIL in.net, the choice of language is pure personal. A program is pure personal. Program written in VB.NET and a program written in C# are both converted to MSIL. Then MSIL is converted to native code and run. So whether you write program in C# or VB.NET at the end it is MSIL.
2. .NET Class Library: Gopal Krishna Gokhale College, Kolhapur
9
Airline Reservation System
.Net comes with thousand of classes to perform all important and not-soimportant operations. Its library is completely objecting oriented, providing around 5000 classes to perform just about everything. The following are the main areas that are converted by class library. v. Data structures vi. IO management vii. Windows and web controls viii. Data base access ix. Multithreading The above list is comprehensive and only to provide you an instant idea.
Features of .NET : The following are major features of .NET. We will use these features throughout journey. Here is just a brief introduction to all key features of .NET.
1. Assemblies An assembly is either a .DLL or .EXE that forms a part of an application. It contains MSIL code that is executed by CRL. The following are other important points related to an assembly: It is the unit on which permission are granted. Every assembly contains a version Assemblies contain interfaces & classes. They may also contain other resources such as bitmap, file etc. Every assembly contains assembly metadata, which contains information about assembly.CRL uses this information at the time of executing assembly. Two assemblies of the same name but with different versions can run side-by-side allowing application that depends on a specific version to that version.
2. Assembly Manifest Contain name, version, culture & information about referenced assemblies.
3. Type metadata Contains information about types defined in the assembly.
4. MSIL It contains MSIL code that is then executed by the CLR (Common Runtime Language)
5. Resources Files such as BMP or JPG file or any other files required by application.
Visual Basic .NET Gopal Krishna Gokhale College, Kolhapur
10
Airline Reservation System
Visual Basic .Net provides the easiest, most productive language and tool for rapidly building windows and based applications. Visual Basic.Net comes with enhanced visual designers increased applications performance and a powerful integrated development (IDE).It also s creation of application for wireless, internet-enabled hand held devices.
Features of visual basic.NET 1. Powerful windows based applications Visual basic .Net comes with features such as a powerful new forms designer, an in-place menu editor and automatic control anchoring &docking. Visual basic.Net delivers new productivity features for building more robust applications easily &quickly. With an improved integrated development environment(IDE) and a significantly reduced startup time, visual basic.Net offers fast, automatic formatting of code as you type, improved intelligence, an enhanced object browser & XML designer & much more.
2. Building web based Applications With visual basic.Net we can build applications more rapidly &deploy & maintain them with efficiency. Visual basic .Net 2003 & .net framework1.1 makes “DLL Hell” thing of the past. Side by side versioning enables multiple versions of the same component XCOPY development & web auto of windows based application combine the simplicity of web page deployment & maintenance with the power of rich, responsive windows based applications.
Simplified Deployment
With Visual Basic .NET we can build application more rapidly & deploy & maintain them with efficiency. Visual Basic .NET 2003 & .net framework 1.1 makes “DLL Hell” a thing of the past. Side-by-side versioning enables multiple version of the same component. XCOPY deployment & web auto of windows based application combine the simplicity of web page deployment & maintenance with the power of rich, responsive windows based applications.
Powerful, flexible, simplified data access
Gopal Krishna Gokhale College, Kolhapur
11
Airline Reservation System
You can tackle any data access scenario easily with ADO.NET & ADO data access. The flexibility of ADO.NET enables data binding to any database, as well as classes, collections & arrays & provides true XML representation of data. Seamless access to ADO enables simple data access for connected data binding scenarios. Using ADO.NET, Visual Basic .NET can gain high-speed access to MS SQL server, oracle, DB2, Microsoft access & more.
Improved coding
You can code faster & more effectively. A multitude of enhancements to the code editor, including enhanced intelligence, smart listing of code for greater readability & a background complier for real time notification of syntax errors transforms into a Rapid Application Development (RAD) coding machine.
Direct access to the platforms
Visual Basic Developers can have full access to the capabilities available in .NET framework 1.1 developers can easily program system services including the event log, performance, counters & file systems. The new window service project template enables to build real Microsoft Windows NT services. Programming against services & creating new window services is not available in Visual Basic .NET standard; it requires Visual Studio 2003 professional or higher.
Full object – oriented constructs
You can create reusable, enterprise – class, code using full object oriented constructs. Language features include full implementation inheritance, encapsulation & polymorphism. Structure exception handling provides a global error handler.
Gopal Krishna Gokhale College, Kolhapur
12
Airline Reservation System
3.2 Back End: Microsoft Access 2007 The Access database is made up of tables, queries, forms, reports, macros & modules. Each of these objects has its own special functions. The Access environment also consists of miscellaneous objects, which include relationships, data properties & import or export specifications. With these objects, you can develop a powerful application. You can convert database to other versions also. In MS-Access we can perform following operations. • Finding information • Adding, modifying & deleting information • Sorting records • Processing data • Generation of reports The various components of MS-Access are as follows: 1.
Tables: In the tables, your data is stored in the access format or you can reference data by linking the tables, all other objects in your database are directly or indirectly referenced to your tables. 2.
Queries: Queries on access are powerful & multifaceted. Select queries allow you to summarize & perform calculations on the data in the tables. 3. Forms: Although you can enter & modify the data in the tables in datasheet view, you can control the action very well or you can do much facilitate data entry. This is where the forms come into picture. Forms are the means of displaying, modifying & adding data. They are very flexible & powerful. 4. Reports: Forms allow you to enter & edit the information. But with reports, you can display the information & print it on paper.
Gopal Krishna Gokhale College, Kolhapur
13
Airline Reservation System
3.3 CRYSTAL REPORT 10.5.0.0 Crystal Reports needs very little introduction – it’s a recognized leader among report generators. In addition, Microsoft has bundled Crystal Reports into Microsoft Visual Studio for several years, so most veteran Visual Basic programmers are familiar with it. The Microsoft decided to build a report writer (Data Report) and include it with Visual Basic. Now, although Visual Studio 2008 still includes an earlier version of Crystal Reports, you have to know where to look to find it on the Visual Studio disks. If you’re only experience with Crystal Reports is the version packaged with Visual Studio, forget everything you know and get the 10.5.0.0 demonstration version; there’s no comparison between version 10.5.0.0 and the version in Visual Studio. And Microsoft’s Data Report is no competition at all. Seagate Software, the company that produces Crystal Reports, was recently renamed Crystal Decisions. The release of Crystal Report 10.5.0.0 quickly followed, but it’s much more than a simple interim version. There are many new features that make an version 10.5.0.0 an excellent decision. Although the ability to integrate reporting and analysis into intranet, extranet, and portal applications with Crystal Enterprise is reason enough, Crystal Reports 8.5 now s cross-platform development, with for Windows NT, Window 2000, and UNIX. OLAP is also much improved. The report Publishing Wizard publishes reports to the web in seconds. In addition to these impressive new features, there are enhancements to the Report Designer, analysis tools export formats and report viewers.
What Does It Do? An ambitious product, Crystal Reports 10.5.0.0 has very versatile reporting capabilities. You can use Crystal Reports as a stand-alone report generator, writing ad hoc queries against a wide variety of data sources. There’s nothing very remarkable about accessing databases with ODBC or even native drivers; those are standard features in a report generator. Crystal Reports 10.5.0.0 goes far beyond database and PIM to include Lotus Notes and Domino, Microsoft Exchange, Microsoft IIS, Microsoft SMS, Windows NT event logs, and NCSA-format Web server activity logs. When you do need to pull data from a SQL database, Crystal Reports can handle XML, OLAP, and relational data sources.
Gopal Krishna Gokhale College, Kolhapur
14
Airline Reservation System
4.SYSTEM DIAGRAM 4.1 DATA FLOW DIAGRAM
0th Level Data Flow Diagram (DFD):
Take customer Information
Give Information
Airline Airline Reservati Reservati on on System System
Take Make Reser/cancellation Give BIll Give Airline/Class Infon
ChecK Customer nfon Report Check Airline/Class Infon Report Check Reser/Cancel Infon Report
Give Reser/cancel Infon Reser/Cancel Ticket
Airport
Customer
Gives Bill
1st Level Data Flow Diagram:
Gopal Krishna Gokhale College, Kolhapur
Customer Information Report 15
Reservation Clerk
Customer
I)
Airline
Make Bill Bill Information
Gives Reservation
Information
Gives Cancellation Bill
Gives Cancellation Information
Gives Reservation Information
Save CustomerInformation
Save Reservation Information
Save Cancellation Information
Takes Cancellation Info &
Takes Reservation Information &
Takes Information &
Destinatio n Informati Take Destination on
Airline Informati on
Information &
Reservation Clerk
Takes Airline Information &
4.2.1.1 ENTITY RELATIONSHIP DIAGRAM
Customer Info Gopal Krishna Gokhale College, Kolhapur Mak es
Ad ds to
Give Airline Information
Save Destination Information
Give Destination Info
Give I nfo destinationmaste r
ticketcancellation
Airport
Flight Routes
cust_info
Cancellatio n Information
Send Customer Report
Add Information
ticketmaster
flightmaste r
Save Flight Information
Reservati on Informatio n
Bill
Send Flight Report
Give Flight Info
Customer Informatio n
Airline Information Report
billmaster
Give Customer Info
Gives Customer Information
Reservation System
16
Airline Reservation System
Mak es
Destinatio n
Flight info
Ge ts
Goes
Ma y be
Reservatio n
Cancellati on Makes
May or may not get
Mak es Bill
Concession
5.DATABASE DESIGN MASTER :1. CUSTOMER :- (cust_info)
Gopal Krishna Gokhale College, Kolhapur
17
Airline Reservation System
Primary Key – Cust_id Sr. No. Field Name
Datatype
Description
1.
cust_id
Number
To store Customer ID
2.
cust_name
Text
To store Customer name
3.
cust_address
Text
To store Address
4.
cust_no
Number
To store number
5.
cust_dob
Date/Time
To Store Customer Date of Birth
2.FLIGHT :- (flightmaster) Primary key - Flight_id Sr. No Field Name
Datatype
Description
1.
flight_id
Number
To Store Flight ID
2.
flight_name
Text
To Store Flight Name
3.
flight_from
Text
To Store Flight from
4.
flight_to
Text
To Store Flight To
5.
flight_date
Date/Time
To Store Date of Time
6.
executive_class_size
Number
To Store Executive Class Size
7.
standard_class_size
Number
To Store Standard Class Size
8.
economy_class_size
Number
To Store Economy Class Size
9.
executive_class_fare
Number
To Store Executive Class Fare
10.
Standard_class_fare
Number
To Store Standard Class Fare
11.
economy_class_fare
Number
To Store Economy Class Fare
3.DESTINATION :- (destinationmaster) Sr.No. 1.
Field Name destination
Datatype Text
Description To Store Destination
4. CONCESSION :- (concessionmaster) Gopal Krishna Gokhale College, Kolhapur
18
Airline Reservation System
Primary key- concession_id
Sr.no. 1. 2. 3.
Field Name concession_id concession_type concession_rate
Datatype Number Text Number
Gopal Krishna Gokhale College, Kolhapur
Description To Store Concession ID To Store Concession Type To Store Concession Rate
19
Airline Reservation System
TRASANCTION:1. RESERVATION :- (ticketmaster) Primary key- ticket_id Secondary key- cust_id,flight_id
Sr. No.
Field Name
Datatype
1. 2. 3. 4. 5. 6.
ticket_id reservation_date cust_id cust_name cust_address cust_no
Number Date/Time Number Text Text Text
7. 8.
cust_gender cust_dob
Text Date/Time
9. 10. 11. 12. 13. 14. 15. 16. 17. 18. 19. 20. 21. 22.
flight_id flight_name flight_from flight_to flight_time flight_date selected_class class_size class_fare concession_type concession_rate total_ammount status seatno
Number Text Text Text Text Date/Time Text Number Number Text Number Number Text Number
2.CANCELLATION :- (ticketcancellation) Sr.No. Field Name Datatype 1. 2. 3. 4. 5. 6. 7. 8.
ticket_id reservation_date cust_id cust_name cust_address cust_no cust_gender cust_dob
Number Date/Time Number Text Text Text Text Date/Time
Gopal Krishna Gokhale College, Kolhapur
Description To Store Ticket ID To Store Reservation Date To Store Customer ID To Store Customer Name To Store Customer Address To Store Customer No To Store Customer Gender To Store Customer Date of Birth To Store Flight ID To Store Flight Name To Store Flight From To store Flight to To Store Time of Flight To Store Date of Flight To Store Selected Class To Store Size of Class To Store Fare of Class To Store Concession Type To Store Concession Rate To Store Amount To Store Status To Store Seat No
Description To Store Ticket ID To Store Reservation Date To Store Customer ID To Store Customer Name To Store Customer Address To Store Customer No To Store Customer Gender To Store Customer Date of Birth 20
Airline Reservation System
9. 10. 11. 12. 13. 14. 15. 16. 17. 18. 19. 20. 21. 22. 23. 24.
flight_id flight_name flight_from flight_to flight_time flight_date selected_class class_size class_fare concession_type concession_rate total_ammount status seatno refund_rate total_refund
Number Text Text Text Text Date/Time Text Number Number Text Number Number Text Number Number Number
To Store Flight ID To Store Flight Name To Store Flight From To store Flight to To Store Time of Flight To Store Date of Flight To Store Selected Class To Store Size of Class To Store Fare of Class To Store Concession Type To Store Concession Rate To Store Amount To Store Status To Store Seat No To Store Refund Rate To Store Total Refund
3.BILL :- (billmaster) Primary key- bill_id Secondary key- ticket_id,cust_id,flight_id
Sr. No. 1. 2. 3. 4. 5. 6. 7. 8. 9. 10.
Field Name bill_id ticket_id cust_id cust_name flight_id Seatno bill_type payment_type payment_info bill_issue_date
Datatype Number Number Number Text Number Number Text Text Text Date/Time
Gopal Krishna Gokhale College, Kolhapur
Description To Store Bill ID To Store Ticket ID To Store Customer ID To Store Customer Name To Store Flight ID To Store Seat No To Store Bill type To Store Payment Type To Store Payment Information To Store Bill Issue Date
21
Airline Reservation System
6.SOURCE CODE MODULE :Imports System.Data.OleDb Module connection_module Public str As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=/airline\airline\airline\bin\Debug\airdata.mdb" Public cmd As New OleDbCommand Public dr As OleDbDataReader Public cn As New OleDbConnection(str) Public Sub connect() If cn.State = ConnectionState.Closed Then cn.Open() If cn.State = ConnectionState.Open Then cn.Close() cn.Open() cmd.Connection = cn End Sub End Module
:Imports System.Data.OleDb Public Class Private Sub btn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn.Click Dim str As String Dim respons As DialogResult str = " select * from where name = '" & txtnm.Text & "' and = '" & txt.Text & "'" cmd.CommandText = str cmd.Connection = cn dr = cmd.ExecuteReader If (dr.Read()) Then mdi.Show() Me.Hide() Else MessageBox.Show("name and do not match ", "") respons = MessageBox.Show("Do you want to retry?", "", MessageBoxButtons.RetryCancel)
Gopal Krishna Gokhale College, Kolhapur
22
Airline Reservation System
If respons = Windows.Forms.DialogResult.Retry Then txtnm.Text = "" txt.Text = "" txtnm.Focus() Else Close() End If End If dr.Close() End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click txtnm.Text = "" txt.Text = "" txtnm.Focus() End Sub Private Sub btn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn.Click cn.Close() Me.Close() End Sub Private Sub _Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Call connect() txtnm.Focus() End Sub End Class
Gopal Krishna Gokhale College, Kolhapur
23
Airline Reservation System
MDI :Public Class mdi Private Sub CustinfoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CustinfoToolStripMenuItem.Click Form1.Show() Me.Enabled = False End Sub Private Sub FlightMasterToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FlightMasterToolStripMenuItem.Click flightmaster.Show() Me.Enabled = False End Sub Private Sub DestinationMasterToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DestinationMasterToolStripMenuItem.Click destinationmaster.Show() Me.Enabled = False End Sub Private Sub TickeToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TickeToolStripMenuItem.Click Ticket_Cancellation.Show() Me.Enabled = False End Sub Private Sub ConcessionToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ConcessionToolStripMenuItem.Click concessionmaster.Show() Me.Enabled = False End Sub Private Sub TicketReservationToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TicketReservationToolStripMenuItem.Click Ticket_Reservation.Show() Me.Enabled = False End Sub Private Sub FlightRecordsToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) flightshow.Show() Me.Enabled = False End Sub Gopal Krishna Gokhale College, Kolhapur
24
Airline Reservation System
Private Sub ExitToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExitToolStripMenuItem.Click Dim ab As DialogResult ab = MessageBox.Show("Do you want to exit ?", "Are you sure ", MessageBoxButtons.YesNo, MessageBoxIcon.Question) If ab = Windows.Forms.DialogResult.Yes Then Me.Close() .Close() End If Me.Dispose() End Sub Private Sub CustomerReportToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CustomerReportToolStripMenuItem.Click cust_report_form.Show() Me.Enabled = False End Sub Private Sub FlightReportToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FlightReportToolStripMenuItem.Click flight_master_report.Show() Me.Enabled = False End Sub Private Sub DestinationReportToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DestinationReportToolStripMenuItem.Click destination_master_report.Show() Me.Enabled = False End Sub Private Sub ConcessionReportToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ConcessionReportToolStripMenuItem.Click concession_master_report.Show() Me.Enabled = False End Sub Private Sub ReservatinReportToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ReservatinReportToolStripMenuItem.Click ticket_master_report.Show() Me.Enabled = False End Sub
Gopal Krishna Gokhale College, Kolhapur
25
Airline Reservation System
Private Sub CancellationReportToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CancellationReportToolStripMenuItem.Click ticket_cancellation_report.Show() Me.Enabled = False End Sub Private Sub mdi_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed cn.Close() .Close() End Sub Private Sub BillMaster2ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) bill_master2.Show() Me.Enabled = False End Sub Private Sub BillReportToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BillReportToolStripMenuItem.Click billmaster_report.Show() Me.Enabled = False End Sub Private Sub FlightRecordsToolStripMenuItem_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FlightRecordsToolStripMenuItem.Click flightshow.Show() Me.Enabled = False End Sub Private Sub BillMasterToolStripMenuItem_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BillMasterToolStripMenuItem.Click bill_master2.Show() Me.Enabled = False End Sub End Class
Gopal Krishna Gokhale College, Kolhapur
26
Airline Reservation System
MASTER :CUSTOMER :Imports System.Data.OleDb Public Class Form1 Private Sub Form1_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed cn.Close() mdi.Enabled = True End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim table As New DataTable Call txtclear() Call btnon() Call txtoff() Call connect() Call gd() End Sub Private Sub searchbyname() Dim adpti As New OleDbDataAdapter Dim dt As New DataTable adpti = New OleDbDataAdapter("select * From cust_info Where cust_name Like'" & txtsearchbyname.Text & "%' Order by cust_id", cn) adpti.Fill(dt) DataGridView1.DataSource = dt End Sub Private Sub gd() Dim table As New DataTable cmd = New OleDbCommand("select * from cust_info", cn) dr = cmd.ExecuteReader() table.Load(dr) DataGridView1.DataSource = table dr.Close() End Sub Private Sub btnsearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsearch.Click btnoff() Dim cid As Integer Dim str As String Gopal Krishna Gokhale College, Kolhapur
27
Airline Reservation System
Try cid = InputBox("Enter Custmer Id to Search Record") str = "select * from cust_info where cust_id=" & cid cmd.CommandText = str dr = cmd.ExecuteReader If (dr.Read()) Then txtcust_id.Text = dr("cust_id") txtcust_name.Text = dr("cust_name") txtcust_address.Text = dr("cust_address") txtcust_no.Text = dr("cust_no") If dr("cust_gender") = "male" Then rdomale.Checked = True Else rdofemale.Checked = True End If btnadd.Enabled = False btnsave.Enabled = False btndelete.Enabled = True btnmodify.Enabled = True Call txton() dtpdob.Value = dr("cust_dob") dr.Close() Else MsgBox("Record not Found") dr.Close() End If Catch ex As Exception End Try Call gd() End Sub Private Sub btnadd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnadd.Click btnoff() txton() dtpdob.Value = Now Dim cid As Integer Dim str As String str = "select max(cust_id) from cust_info " cmd.CommandText = str cid = cmd.ExecuteScalar cid = cid + 1 txtcust_id.Text = cid Call gd() End Sub
Gopal Krishna Gokhale College, Kolhapur
28
Airline Reservation System
Private Sub btnon() btnadd.Enabled = True btnsave.Enabled = False btnmodify.Enabled = False btndelete.Enabled = False btnsearch.Enabled = True btncancel.Enabled = True btnexit.Enabled = True End Sub Private Sub btnoff() btnadd.Enabled = False btnsave.Enabled = True btnmodify.Enabled = False btndelete.Enabled = False btnsearch.Enabled = False btncancel.Enabled = True btnexit.Enabled = True End Sub Private Sub txton() txtcust_name.Enabled = True txtcust_address.Enabled = True txtcust_no.Enabled = True End Sub Private Sub txtoff() txtcust_name.Enabled = False txtcust_address.Enabled = False txtcust_no.Enabled = False End Sub Private Sub txtclear() txtcust_id.Text = "" txtcust_name.Text = "" txtcust_address.Text = "" txtcust_no.Text = "" dtpdob.Value = Now End Sub Private Sub btnexit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnexit.Click Me.Close() End Sub
Gopal Krishna Gokhale College, Kolhapur
29
Airline Reservation System
Private Sub btnsave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsave.Click If Trim(txtcust_name.Text) = "" Then MsgBox("Name can not be left blank") txtcust_name.Focus() ElseIf Trim(txtcust_address.Text) = "" Then MsgBox("Address can not be left blank") txtcust_address.Focus() ElseIf Trim(txtcust_no.Text) = "" Then MsgBox(" No. can not be left blank") txtcust_no.Focus() Else Dim str As String Dim gen As String If rdofemale.Checked = True Then gen = rdofemale.Text Else gen = rdomale.Text End If str = "insert into cust_info values(" & Val(txtcust_id.Text) & ",'" & Trim(txtcust_name.Text) & "','" & Trim(txtcust_address.Text) & "','" & Val(txtcust_no.Text) & "','" & gen & "','" & (dtpdob.Text) & "' )" cmd.CommandText = str cmd.ExecuteNonQuery() MsgBox("Record is save") txtclear() Call btnon() Call txtoff() Call txtclear() Call gd() End If End Sub Private Sub btncancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btncancel.Click Call btnon() Call txtclear() Call txtoff() Call gd() End Sub Private Sub btndelete_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btndelete.Click Dim s As String Dim str As String s = MsgBox("are you sure", MsgBoxStyle.YesNo) If s = vbYes Then Gopal Krishna Gokhale College, Kolhapur
30
Airline Reservation System
str = " delete from cust_info where cust_id=" & Val(txtcust_id.Text) & "" cmd.CommandText = str cmd.ExecuteNonQuery() MsgBox(" RECORD IS DELETED ") Call btnon() Call txtoff() Call txtclear() End If Call gd() End Sub Private Sub btnmodify_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnmodify.Click If Trim(txtcust_name.Text) = "" Then MsgBox("Name can not be left blank") txtcust_name.Focus() ElseIf Trim(txtcust_address.Text) = "" Then MsgBox("Address can not be left blank") txtcust_address.Focus() ElseIf Trim(txtcust_no.Text) = "" Then MsgBox(" No. can not be left blank") txtcust_no.Focus() Else Dim s, str As String Dim gen As String If rdofemale.Checked = True Then gen = rdofemale.Text Else gen = rdomale.Text End If s = MsgBox("ARE YOU SURE", MsgBoxStyle.YesNo) If s = vbYes Then str = " update cust_info set cust_name='" & txtcust_name.Text & "', cust_address='" & txtcust_address.Text & "',cust_no=" & Val(txtcust_no.Text) & ", cust_gender='" & gen & "', cust_dob='" & dtpdob.Text & "' where cust_id=" & Val(txtcust_id.Text) cmd.CommandText = str cmd.ExecuteNonQuery() MsgBox("RECORD UPDATED SUCCESSFULLY") Call txtclear() Call btnon() Call txtoff() End If Call gd() End If End Sub
Gopal Krishna Gokhale College, Kolhapur
31
Airline Reservation System
Private Sub txtcust_name_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtcust_name.KeyPress Select Case Asc(e.KeyChar) Case 8, 32, 65 To 90, 97 To 122 e.Handled = False Case Else e.Handled = True End Select End Sub Private Sub txtcust_no_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtcust_no.KeyPress If Asc(e.KeyChar) <> 8 Then If Asc(e.KeyChar) < 48 Or Asc(e.KeyChar) > 57 Then e.Handled = True End If End If End Sub Private Sub txtsearchbyname_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtsearchbyname.KeyPress Select Case Asc(e.KeyChar) Case 8, 32, 65 To 90, 97 To 122 e.Handled = False Case Else e.Handled = True End Select End Sub Private Sub txtsearchbyname_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtsearchbyname.TextChanged Call searchbyname() End Sub End Class
Gopal Krishna Gokhale College, Kolhapur
32
Airline Reservation System
TRANSACTION :BOOKING :Imports System.Data.OleDb Public Class Ticket_Reservation Private Sub Ticket_Reservation_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed cn.Close() mdi.Enabled = True End Sub Private Sub Ticket_Reservation_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load btnsave.Enabled = False btnreset.Enabled = False btnsearch.Enabled = False Call connect() Call txtoff() Dim str1 As String Dim str2 As String btnsearch.Enabled = False str1 = "select * from flightmaster" cmd.CommandText = str1 dr = cmd.ExecuteReader Do While (dr.Read) cmbflight_id.Items.Add(dr("flight_id")) Loop dr.Close() str2 = "select * from concessionmaster" cmd.CommandText = str2 dr = cmd.ExecuteReader Do While (dr.Read) cmbcontype.Items.Add(dr("concession_type")) Loop dr.Close() Call gd() End Sub Private Sub searchbyname() Dim adpti As New OleDbDataAdapter Dim dt As New DataTable
Gopal Krishna Gokhale College, Kolhapur
33
Airline Reservation System
adpti = New OleDbDataAdapter("select * From ticketmaster Where cust_name Like'" & txtsearchbyname.Text & "%' Order by ticket_id", cn) adpti.Fill(dt) DataGridView1.DataSource = dt End Sub Private Sub gd() Dim table As New DataTable cmd = New OleDbCommand("select * from ticketmaster", cn) dr = cmd.ExecuteReader() table.Load(dr) DataGridView1.DataSource = table dr.Close() End Sub Private Sub txton() txtticket_id.Enabled = True txtcust_id.Enabled = True txtcust_name.Enabled = True txtcust_address.Enabled = True txtcust_no.Enabled = True rdomale.Enabled = True rdofemale.Enabled = True dtpdob.Enabled = True dtpresdate.Enabled = True cmbflight_id.Enabled = True txtflight_name.Enabled = True cmbfrom.Enabled = True cmbto.Enabled = True txtflight_time.Enabled = True dtpflightdate.Enabled = True cmbclass.Enabled = True txtsize.Enabled = True txtas.Enabled = True txtrs.Enabled = True txtfare.Enabled = True cmbcontype.Enabled = True txtconrate.Enabled = True txttotal.Enabled = True End Sub Private Sub txtoff() txtticket_id.Enabled = False txtcust_id.Enabled = False txtcust_name.Enabled = False txtcust_address.Enabled = False
Gopal Krishna Gokhale College, Kolhapur
34
Airline Reservation System
txtcust_no.Enabled = False rdomale.Enabled = False rdofemale.Enabled = False dtpdob.Enabled = False dtpresdate.Enabled = False cmbflight_id.Enabled = False txtflight_name.Enabled = False cmbfrom.Enabled = False cmbto.Enabled = False txtflight_time.Enabled = False dtpflightdate.Enabled = False cmbclass.Enabled = False txtsize.Enabled = False txtas.Enabled = False txtrs.Enabled = False txtfare.Enabled = False cmbcontype.Enabled = False txtconrate.Enabled = False txttotal.Enabled = False End Sub Private Sub btnadd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnadd.Click btnsave.Enabled = True btnreset.Enabled = True btnsearch.Enabled = True Call txton() btnsearch.Enabled = True dtpresdate.Value = Now Dim cid As Integer Dim str As String str = "select max(ticket_id) from ticketmaster" cmd.CommandText = str cid = cmd.ExecuteScalar cid = cid + 1 txtticket_id.Text = cid Call gd() End Sub Private Sub btnsearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsearch.Click Dim str As String Try str = "select * from cust_info where cust_id=" & Val(txtcust_id.Text) cmd.CommandText = str dr = cmd.ExecuteReader
Gopal Krishna Gokhale College, Kolhapur
35
Airline Reservation System
If (dr.Read()) Then txtcust_id.Text = dr("cust_id") txtcust_name.Text = dr("cust_name") txtcust_address.Text = dr("cust_address") txtcust_no.Text = dr("cust_no") If dr("cust_gender") = "male" Then rdomale.Checked = True Else rdofemale.Checked = True End If 'Call txton() dtpdob.Value = dr("cust_dob") dr.Close() Else MsgBox("Record not Found") txtcust_id.Text = "" txtcust_name.Text = "" txtcust_address.Text = "" txtcust_no.Text = "" dtpdob.Value = Now dr.Close() End If Catch ex As Exception End Try End Sub Private Sub cmbflight_id_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmbflight_id.SelectedIndexChanged If dr.IsClosed = False Then dr.Close() End If Dim str As String str = "select * from flightmaster where flight_id=" & Val(cmbflight_id.Text) cmd.CommandText = str dr = cmd.ExecuteReader If (dr.Read) Then txtflight_name.Text = dr("flight_name") cmbfrom.Text = dr("flight_from") cmbto.Text = dr("flight_to") txtflight_time.Text = dr("flight_time") dtpflightdate.Value = dr("flight_date") End If dr.Close() End Sub
Gopal Krishna Gokhale College, Kolhapur
36
Airline Reservation System
Private Sub cmbclass_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmbclass.SelectedIndexChanged Dim str As String str = "select * from flightmaster where flight_id=" & Val(cmbflight_id.Text) cmd.CommandText = str dr = cmd.ExecuteReader If (dr.Read) Then If cmbclass.Text = "executive_class" Then txtsize.Text = dr("executive_class_size") txtfare.Text = dr("executive_class_fare") ElseIf cmbclass.Text = "standard_class" Then txtsize.Text = dr("standard_class_size") txtfare.Text = dr("standard_class_fare") ElseIf cmbclass.Text = "economy_class" Then txtsize.Text = dr("economy_class_size") txtfare.Text = dr("economy_class_fare") End If End If dr.Close() Dim str1 As String 'Dim cid As Integer Dim temp As Integer temp = 0 str1 = "select * from ticketmaster where flight_id=" & Val(cmbflight_id.Text) & " and selected_class= '" & (cmbclass.Text) & "' and status='Reserved' and flight_date=#" & dtpflightdate.Value & "#" cmd.CommandText = str1 dr = cmd.ExecuteReader() Do While (dr.Read) temp = temp + 1 Loop txtas.Text = temp txtrs.Text = Val(txtsize.Text) - Val(txtas.Text) dr.Close() seatno.Text = Val(txtas.Text) + 1 'cid = cmd.ExecuteScalar End Sub Private Sub txtcust_id_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtcust_id.KeyPress If Asc(e.KeyChar) <> 8 Then If Asc(e.KeyChar) < 48 Or Asc(e.KeyChar) > 57 Then e.Handled = True End If End If
Gopal Krishna Gokhale College, Kolhapur
37
Airline Reservation System
If Asc(e.KeyChar) = 13 Then Dim str As String Try str = "select * from cust_info where cust_id=" & Val(txtcust_id.Text) cmd.CommandText = str dr = cmd.ExecuteReader If (dr.Read()) Then txtcust_id.Text = dr("cust_id") txtcust_name.Text = dr("cust_name") txtcust_address.Text = dr("cust_address") txtcust_no.Text = dr("cust_no") If dr("cust_gender") = "male" Then rdomale.Checked = True Else rdofemale.Checked = True End If 'Call txton() dtpdob.Value = dr("cust_dob") dr.Close() Else MsgBox("Record not Found") txtcust_id.Text = "" txtcust_name.Text = "" txtcust_address.Text = "" txtcust_no.Text = "" dtpdob.Value = Now dr.Close() End If Catch ex As Exception End Try End If End Sub Private Sub btnsave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsave.Click If Trim(txtcust_id.Text) = "" Then MsgBox("Please enter Customer ID") txtcust_id.Focus() ElseIf Trim(cmbflight_id.Text) = "" Then MsgBox("Please enter Flight ID") cmbflight_id.Focus() ElseIf Trim(cmbclass.Text) = "" Then MsgBox("Please enter Class") cmbclass.Focus() ElseIf Trim(cmbcontype.Text) = "" Then
Gopal Krishna Gokhale College, Kolhapur
38
Airline Reservation System
MsgBox("Please enter Concession type") cmbcontype.Focus() Else Dim str As String Dim gen As String If rdofemale.Checked = True Then gen = rdofemale.Text Else gen = rdomale.Text End If str = "insert into ticketmaster values(" & Val(txtticket_id.Text) & ",'" & (dtpresdate.Text) & "' ," & Val(txtcust_id.Text) & ",'" & Trim(txtcust_name.Text) & "','" & Trim(txtcust_address.Text) & "','" & Val(txtcust_no.Text) & "','" & gen & "','" & (dtpdob.Text) & "' ,'" & Val(cmbflight_id.Text) & "','" & Trim(txtflight_name.Text) & "','" & (cmbfrom.Text) & "','" & (cmbto.Text) & "','" & Trim(txtflight_time.Text) & "','" & (dtpflightdate.Text) & "','" & Trim(cmbclass.Text) & "'," & Val(txtsize.Text) & "," & Val(txtfare.Text) & ",'" & Trim(cmbcontype.Text) & "'," & Val(txtconrate.Text) & "," & Val(txttotal.Text) & ",'Reserved'," & Val(seatno.Text) & ")" cmd.CommandText = str cmd.ExecuteNonQuery() MsgBox("Record is save") Call gd() End If End Sub Private Sub cmbcontype_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmbcontype.SelectedIndexChanged Dim str As String str = "select * from concessionmaster where concession_type='" & Trim(cmbcontype.Text) & " '" cmd.CommandText = str dr = cmd.ExecuteReader If (dr.Read) Then txtconrate.Text = dr("concession_rate") End If dr.Close() txttotal.Text = Val(txtfare.Text) - (Val(txtfare.Text) * (Val(txtconrate.Text) / 100)) End Sub Private Sub btnreset_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnreset.Click txtticket_id.Text = "" txtcust_id.Text = "" txtcust_name.Text = "" txtcust_address.Text = ""
Gopal Krishna Gokhale College, Kolhapur
39
Airline Reservation System
txtcust_no.Text = "" rdomale.Enabled = False rdofemale.Enabled = False dtpdob.Value = Now dtpresdate.Value = Now cmbflight_id.Text = "" txtflight_name.Text = "" cmbfrom.Text = "" cmbto.Text = "" txtflight_time.Text = "" dtpflightdate.Value = Now cmbclass.Text = "" txtsize.Text = "" txtas.Text = "" txtrs.Text = "" txtfare.Text = "" cmbcontype.Text = "" txtconrate.Text = "" txttotal.Text = "" btnsave.Enabled = False btnsearch.Enabled = False Call txtoff() End Sub Private Sub btnexit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnexit.Click Me.Close() End Sub Private Sub ch() 'If (dr.IsClosed = False) Then ' dr.Close() 'End If Dim str1 As String 'Dim cid As Integer Dim temp As Integer temp = 0 str1 = "select * from ticketmaster where flight_id=" & Val(cmbflight_id.Text) & " and selected_class= '" & (cmbclass.Text) & "' and status='Reserved' and seatno= " & Val(seatno.Text) & " and flight_date=#" & dtpflightdate.Value & "#" cmd.CommandText = str1 dr = cmd.ExecuteReader() If (dr.Read) Then MsgBox("plz change seat") ' seatno.BackColor = Color.Blue cangrid.Show()
Gopal Krishna Gokhale College, Kolhapur
40
Airline Reservation System
End If dr.Close() End Sub Private Sub txtsearchbyname_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtsearchbyname.KeyPress Select Case Asc(e.KeyChar) Case 8, 32, 65 To 90, 97 To 122 e.Handled = False Case Else e.Handled = True End Select End Sub Private Sub txtsearchbyname_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtsearchbyname.TextChanged Call searchbyname() End Sub End Class
Gopal Krishna Gokhale College, Kolhapur
41
Airline Reservation System
7.FORM DESIGN :-
Gopal Krishna Gokhale College, Kolhapur
42
Airline Reservation System
MDI :-
Gopal Krishna Gokhale College, Kolhapur
43
Airline Reservation System
MASTER :1. CUSTOMER INFORMATION :-
Gopal Krishna Gokhale College, Kolhapur
44
Airline Reservation System
2. FLIGHT INFORMATION :-
Gopal Krishna Gokhale College, Kolhapur
45
Airline Reservation System
3.DESTINATION INFORMATION :-
Gopal Krishna Gokhale College, Kolhapur
46
Airline Reservation System
4.CONCESSION INFORMATION :-
Gopal Krishna Gokhale College, Kolhapur
47
Airline Reservation System
5.FLIGHT RECORDS :-
Gopal Krishna Gokhale College, Kolhapur
48
Airline Reservation System
TRANSACTION :1. TICKET RESERVATION :-
Gopal Krishna Gokhale College, Kolhapur
49
Airline Reservation System
2. TICKET CANCELLATION:-
Gopal Krishna Gokhale College, Kolhapur
50
Airline Reservation System
3.BILL INFORMATION :-
Gopal Krishna Gokhale College, Kolhapur
51
Airline Reservation System
8.REPORTS
1. CUSTOMER REPORT :-
Gopal Krishna Gokhale College, Kolhapur
52
Airline Reservation System
2. FLIGHT REPORT :-
Gopal Krishna Gokhale College, Kolhapur
53
Airline Reservation System
3. DESTINATION REPORT :-
Gopal Krishna Gokhale College, Kolhapur
54
Airline Reservation System
4. CONCESSION REPORT :-
Gopal Krishna Gokhale College, Kolhapur
55
Airline Reservation System
5. RESERVATION REPORT :-
Gopal Krishna Gokhale College, Kolhapur
56
Airline Reservation System
6. CANCELLATION REPORT :-
Gopal Krishna Gokhale College, Kolhapur
57
Airline Reservation System
7. BILL REPORT :-
I . ALL BILL REPORT :-
Gopal Krishna Gokhale College, Kolhapur
58
Airline Reservation System
II . RESERVATION BILL REPORT :-
Gopal Krishna Gokhale College, Kolhapur
59
Airline Reservation System
III . CANCELLATION BILL REPORT :-
Gopal Krishna Gokhale College, Kolhapur
60
Airline Reservation System
9. MANUAL
manual is nothing but the way of understanding the computerized system easily without using the system actual. manual gives the information to what actual the system contains & how it works, what system requires & what it gives output. When you open system display window in the window you can enter name and . Now allows you to use system. Our system contains the following menu :1. Master 2. Transaction 3. Reports 4. Exit 1. Master :The first menu is master. In this menu Reservation clerk can enter customer’s information, flight’s information, destination’s information, concession’s information and flight’s records. In Master there are four master forms and one record form :Customer Master Flight Master Destination Master Concession Master Flight Records Customer Master :Reservation clerk takes the customer information and fills in this form. This form contains the fields’ customer id, customer name, customer address, customer gender, customer no. ,customer date of birth. This form saves records in the cust_info database table. Flight Master :Flight master form contains the fields flight id, flight name, flight time, flight date, flight class,class size and fare per seat. Reservation clerk can add new records through this form. Flight Master saves records into flightmaster database table.
Gopal Krishna Gokhale College, Kolhapur
61
Airline Reservation System
Destination Master :Destination master form contains the field destination. Reservation clerk can add new routes through this form. Destination master saves records into destinationmaster database table. Concession Master :Concession master contains the fields concession id, concession type, concession rate. This form allows concessions to customers. This form saves records in the concessionmaster database table. Flight Records :Flight records contains the information of flight schedule. This form allows to search flight records by selecting desired destinations. 2. Transaction :Transaction is the second menu. Reservation clerk can reserve or cancel seats for enger through this menu and make bills. In transaction menu there are following three forms :Ticket Reservation Ticket Cancellation Bill Master Ticket Reservation :Ticket Reservation form contains the fields ticket id, reservation date, customer id, customer name, customer address, customer gender, customer no. ,customer date of birth, flight id, flight name, flight time, flight date, flight class,class size and fare per seat, seat number, concession type, concession rate, total amount to pay. Reservation clerk reserves seat for customer through this form. Ticket Reservation transaction saves records into ticketmaster database table. Ticket Cancellation :Ticket Cancellation form contains the fields ticket id, reservation date, customer id, customer name, customer address, customer gender, customer no. ,customer date of birth, flight id, flight name, flight time, flight date, flight class,class size and fare per seat, seat number, concession type, concession rate, total amount to pay, refund rate, total refund. Reservation clerk cancel seat of reserved enger through this form. Cancellation transaction saves records into ticketcancellation database table.
Gopal Krishna Gokhale College, Kolhapur
62
Airline Reservation System
Bill Master :Bill Master form contains the fields bill id, ticket id, customer id, customer name, flight id, seat number, bill type, payment type, bill issue date. Reservation clerk makes bill of reserved or cancelled ticket for customer through this form Bill Master transaction saves records into billmaster database table. 3.Report :Report is the third menu. Reservation clerk checks the various records by using this menu. In report menu there are seven information reports :Customer Report Flight Report Destination Report Concession Report Reservation Report Cancellation Report Bill Report Customer Report :This form contains customer information report depend upon customer id, customer name, customer date of birth. Flight Report :This form contains flight information report depend upon flight id, flight date, flight name. Destination Report :This form contains destination information report. Concession Report :This form contains flight information report depend upon concession id. Reservation Report :This form contains ticket reservation transaction report depend upon ticket id, reservation date and customer name . Cancellation Report :This form contains ticket cancellation transaction report depend upon ticket id, reservation date and customer name.
Gopal Krishna Gokhale College, Kolhapur
63
Airline Reservation System
Bill Report :This form contains bill transaction report depend upon bill id, bill issue date and customer name. 4.Exit: This is the fourth and last menu. can close the system by using this menu. Buttons :Our Project contains Add, Modify, Save, Search, Delete, Cancel and Exit buttons. They are common in almost forms. Add :This button is used to add new record in the table. Modify :This button is used to make a change in the form. Save: This button is used to save the data or records in database. Search :This button is used to search the data or record in the form. Delete :This button is used to delete the records from the database. Cancel :This button is used to clear the current form fields. Exit :This button is used to exit from the current form.
Gopal Krishna Gokhale College, Kolhapur
64
Airline Reservation System
10. LIMITATIONS
The main drawback of system is, it is a single , hence fail to use LAN activities. Only reservation clerk can operate system as they get full access. The project is not internet based because online reservation needs ASP.NET codes. Deletion of number of record at a time is not possible. If one of the records is deleted then we cannot use related id, because of Auto increment. If any record deleted then it cannot recover back. Help is not provided.
Gopal Krishna Gokhale College, Kolhapur
65
Airline Reservation System
11. CONCLUSION Being a computerized system it is accurate, time saving and beneficial. It minimize error at great extend. It gives you information about Employee detail and report etc. Use this system, it becomes possible to store and handle large record in small size, also becomes task very quickly and accurately. Minimum efforts are needed for booking ticket as well as cancel and make bills. By using this software, we can maintain daily & monthly transactions and whole information of customer, flight, reservation, cancellation & bills. Updating of information becomes so easier. This system reduces time and paper work, which help to decrease complications in maintenance and time. It is friendly & easily operates. The system is designed in such a way that it fulfills requirements. The system is designed in such a way that further enhancement are easy to implement. Database is designed carefully to minimize the redundancy of data.. The System has adequate scope for modification in future if it is necessary. In this way whole system works to reduce manual efforts and make transactions in single click. Although the project work has been done in a complete and detailed manner but due to the constraint of time, we could not include some more features we wanted to. We left these features as a part of the future development. As soon as we’ll get time we’ll try to add them to my project.
Gopal Krishna Gokhale College, Kolhapur
66
Airline Reservation System
12. BIBLIOGRAPHY
Visual Basic. NET Black Book -Steve Holzner Professional VB.NET Wrox Publication 2010 -Bill Sheldon, Billy Hollis, Kent Sharkey, Visual Basic .NET Console and Windows Application -Rajendra Salokhe Database System Concept -Korth and Silberschatz Microsoft Access fundamental -Even Callahan System Analysis & Design -Elias M. Awad www.google.co.in www.startvbdotnet.com www.vbdotnetheaven.com
Gopal Krishna Gokhale College, Kolhapur
67