Bus Reservation System 3f2l40

BUS RESERVATION AND ENQUIRY

The main feature of our project are reservation of ticket from Ludhiana general to different destination. Here the facility of ticket from more than six month of the commencement of the journey. Tickets are reserved only for the express service of “The Raj Transport Co-op.

Society Ltd.” .The special feature of this project is to

distinguished the fare of the express service from the ordinary service of that route. This project also shows that the timing and the date of that particular bus service. This project also show uniqueness of each Employee and bus with their id no .There is also service to book the luggage from one destination to another destination with fixed charges.

1

2

Existing System

The high level requirements for the institution information system include the followings 

Store, maintain and retrieve information about the Organization.



Store, maintain and retrieve information about the Staff and engers.



Store, maintain and retrieve information about number of s..



Prepare the report for each record and department of the Organization.

3

Drawbacks of Existing System



The manual system of data processing used in the Organization has large number of drawbacks.



Limited human capacity and efficiency of brain.



There is lot of time wastage in knowing the current status of all the engers and Staff in the Organization to the requirements of the Organization.



There is lot of time wastage in operational processing and also the pressure on the ants and staff increases.



Human get tired very soon and make mistakes.



The probability of duplication of works, chances of errors and falsification of data are very much prevalent in this system.



The voluminous data can’t be handled.

4

5

Proposed System The operator in this system feels himself to be more comfortable as the operation is performed quickly and efficiently whenever the operator clicks any option .due to the multimedia effects, the operator interacts with the system with more convenience . This resulted with the following advantages: 

Fast search and retrieval of the information.



Presentation of information in desirable form.



Maintaining up to date reliable information.



It is easy for record keeping.



Less chance of errors. And



Less time consume.

6

Requirement For a Computer Project For the successful working and completion of this project for Bus Reservation System we have used software’s for some graphical representation so that project looks attractive much better than the existing. We have used MS ACCESS and VISUAL BASIC 6.0 as software to eliminate all the drawbacks of the existing system and to meet all the requirements and standards. We make project as I future we are able to make changes and save. If we want to save changes in our project click then message appear which indicates changes has been saved. In the same manner we have used red light button and blinking cross icon in place of cancel button. When we click on these buttons it will indicate that action is being cancelled. We have used Seventeen forms, one module and Seven tables for this project.

7

Hardware Specifications: U Type U Clock Main Memory Cache Memory Physical Memory Display Type Printer Keyboard Mouse

Pentium Series 800 MHZ 128 MB 64 KB 4 GB EGA/VGA 32 Pin 101 Keys Two Button

Software Specifications: Operating System DBMS Languages Packages

Windows XP MS ACCESS Visual Basic 6.0 MS-Office

8

Operating System: For this project we used windows operating system i.e. windows XP because no. of the qualities it has. Some of the qualities of this operating system are: It ensures the faster disk performance. 

It contains a built in pear-to-pear networking.



It has a simple Graphical Use Interface.



It s long file name.



It contains 32 bits codes, which has better compatibility with Intel 80386, 80486 & Pentium processor.



It has the facility to set up the computers for use by different people.



It manages the resources of a computer in very efficient manner.

Because of these built in qualities an absolute compatibility with visual basic the choice for the operating system was windows xp also it is much easier and convenient to work in a windows environment as it provides a very simplified and graphical i.e. GUI based interface.

9

INTRODUCTION TO DBMS A DBMS is a general-purpose set of programs that aid and control each s access to data base, modifying and retrieving data and includes facilities for giving data independence, integrity and security. A RDBMS as general acts as a transparent interface between the physical storage and the logical presentation of data. It provides a set of flexible and sophisticated tools for handling information along with other benefits such as: 

Easy access to data



Flexibility in data modeling



Reduced data storage and redundancy



Independence of physical storage and logical data design



A high-level data manipulation language

10

MICROSOFT ACCESS 2003(Back end tool) Microsoft Access is a RDBMS i.e it is a Relational database management system from Microsoft which combines

the

engine with a graphical interface. It

relational

s

Microsoft jet

database

some object- oriented (OO)

techniques, but falls short of being a fully OO development tool. It is a database management system

used to store and manipulate

of information of any kind. MS-Access

large collection

has tools which are easy to use and

provide powerful

development environment. At an advance level, Access can

be used For

developing custom database application by employing Access

Basic and distribution kit for compiling application. Microsoft Access is a computer application used to create and manage computer Based

database on computer.

Microsoft Access can be used for personal information management in a small Business to server. If

organize and manage all data, or in an enterprise to communicate with you

have a

Microsoft

Access

database

such

as

an

E-mail

attachment, a file on a floppy disk, or on the network or any other mean, once you

see

its

icon, you can double-click it. No

Microsoft Access, but also it will open the file.

11

only

will

this

action

launch

FEATURE OF MICROSOFT ACCESS One of

the benefits of access form a programmer’s perspective is

its

relative compatibility with sql query may be viewed and edited as sql statements. The features are: 1. MSDE(Microsoft sql server desktop engine) 2000, a mini-version of MS sql server 2000, is include with the developer edition of office Xp and be used with access as an alternative to the jet database engine 2. Unlike a complete RDBMS the jet engine lack database triggers and stored procedures. Starting in MS Access 2000 there is a syntax that allows reating queries with parameters. 3. In ADP files the database-related feature are entirely different, because this type of file connects to

a MSDE or Microsoft objects in the underlying

server. However, only forms, reports, macros and modules are stored in the ADP file.

COMPONENTS OF ACCESS

1. Database window 2. Database and Tables 3. Forms 4. Queries 5. Reports 6. Macros

ABOUT VISUAL BASIC 6.0 12

We are using Visual Basic as front end for making our project. Visual Basic is the easy way to write programs for windows .Simply, because it gives us maximum control over your computer. Programs can automate our work, preventing mistakes and making us more productive. Writing programs can be complex, but fortunately Visual Basic is that it works with Microsoft Office and on the Internet.

13

FEATURE OF VASUAL BASIC 1. A complete

web development environment.

2. End to end debugging . 3. Integrated professional VB tools. 4. Simple and easy to use. 5. Visual basic is friendly. Our project is purely based on the database, manipulation of database and language ing database is preferred. Out of the language, which database like FOXPRO, MS ACCESS, SYBASE ETC.,Access is best suited. Access provides graphical interface as it is window based and is very easy to use. Navigation between the forms and the reports is made is by the use of menus and push buttons. Access works on the client/server technology, so the software developed in it can run in a network environment. Access is the relational database management system, so enforcing integrity constraints is easy. Forms of visual basic can be used for deg data entry screens. Using reports of visual basic we can generate reports on daily bases or on data feed between specific dates. The major advantage of using Access/VB is that it provides security. Legal s are given by the DBA.

14

15

System Development Life Cycle System Development Life Cycle was developed to create a successful system. It is an organized way to develop a system. It also referred to as a system study. It is composed of following series of phases: 1. Recognition of Need

2. Feasibility Study 3. System Analysis 4. System Design 5. Development 6. Implementation 7. Maintenance 1. Recognition of Need: The existing system for the “Bus Reservation System” is totally managed by manpower. No doubt that the working of the system is going on smoothly but there are lot many limitations due to which lots of problems have been faced. Some of the problems that we come to know with the existing system are written below:(a) Manual System: -

16

Since all work is done manually so it is very difficult to manage all its resources properly and efficiently .Each and every information about enger or employee is recorded manually, which is a very time consuming task. Thus there is a need of computerized system for achieving more accuracy and effectiveness . (b) Difficulty

in Searching and Adding Records:-

In existing system all records about each and every person whether it is a enger, Employee or a member of management are saved in s. So it becomes very difficults to find the required information from the records because we have to go through all the existing records. For adding new record whole information is written manually. (c) Duplication

of Records: -

Because all the data was entered manually, so it is possible that same Ticket number or employee code is allotted to more than one pessenger or employ which create problems. (d) Wastage of

Money:-

There is lots of wastage of money due to manual management of resources. Because every work is done manually, there was extra staff required which was resulting in increased overheads. (e) Wastage

of Time: -

Wastage of time because more time is taken to achieve the target, like more time is needed to make receipts and storing the data into the s.

17

(f)

Loss of Accuracy: Because all calculations was done manually, so sometime they may get wrong

like calculation of rate of ticket, commission or salary which is a major drawback of existing system. So there is a great need of computerized system to remove all the above mentioned limitations. All these drawbacks are overcome by the proposed system

18

Feasibility Study This project report is entitled “Bus Reservation System” which plays an important role to deal with management of the organization. Computers are there in each phase of our life to help us out from traditional work. Computers provide very accurate and very speedy information. So, it has dominated field of our life. This software is prepared to perform various works done in the different departments of Organization e .g .Booking of Tickets, managing bus and seat details and employee details. Bus is a primary need of today’s world for a simple man. The department of organization has been computerized, as this department has to perform every year bulk amount of data and calculations related to the information. This problem requires large amount of time and efforts. The time taken in dealing with the problem is quiet large. By computerizing the system not only many hours be saved, but also computerizing this system can generate some useful reports of analytical nature too. So, by computerizing the system we can save many hours.

Characteristics of the good system :(a) Organization: Organization implies the structure and order. It is the arrangement of components that help to achieve the objective.

(b) Interaction:

-

Interaction refers to the manner in which each component function with the other components of the system.

19

(c) Interdependence:

-

It means that part of system depends on another part. Output of one sub system is requiring input of another system and vice versa. (d) Integration: -

Integration refers to the holism of the system. Successful integration will typically produce a synergetic effect and greater the total impact than if component work independently. (e) Central

Objective: -

Objective may be real or static although the static objective may be the real objective , it is not uncommon for an organization to state one objective and operate to achieve another objective. The important point is that must know the central objective. A major objective of system is to produce an output that has value to its .

20

Categories of Feasibility system Proposed system changes leading a feasibility study fall into one of the three categories: (a)

Change to the Existing System: When the present system has some discrepancies, which can be removed by some

alterations, fall under this category. Like here we introduced a computerized solution to calculate a fine. (b) Completely

New System: -

When the present system whether manual or computerized has a lot of discrepancies which results in performance degradation and the system is causing big loss of money and the time, then sometimes it is desirable to replace the older system with a completely new system. The problem here deals with the

issuing the ticket for a

particular bus that is related to some particular route are replacing the existing system by a new computerized system.

21

Other Feasibility’s of the proposed system are

Social Feasibility’s: The reactions of the s to the proposed system are mostly favorable. The problem made the concerned people to perceive the new system as beneficial one. Technical feasibility’s: The existence of the infrastructure required for proposed system makes it technically feasible for the system to be implemented. The required hardware software and other interface requirements are met in the organization. Economic Feasibility’s: The organization already has the idea of development of the information system in its priorities. The cost, which will be incurred in the development, gets cleared.

22

23

System Analysis System analysis is the detailed study of an existing system for the purpose of the deg of a new or improved system. With the planning complete and the control mechanism in place, the project team turns to the analysis of the existing system .One aspect of deg is the defining of the boundaries of the system and determining whether or not the candidate system should consider other related systems. During analysis data are collected on the available files, decision points and the transactions handled by the present system. Some logical system models and tools that are used in the analysis are data flow diagrams, interviews, onsite observation and questionnaires .The interview is commonly used analysis .During the analysis phase , the system analyst continues then to gather information. Training

experience and common sense are

required for collection of information need to the analysis.

24

System Study The term “SYSTEM” refers to the orderly grouping of the interdependent components, which are linked together according to a plan to achieve a specific objective. The idea of system has become practical and necessary in conceptualizing the interrelationships and integration of operation, especially when using computers. Thus, the system is the way of thinking of organization and their problems. It involves set of techniques that help in solving any problem. A system has many elements, these are: output /input processor(s), control, , boundaries and interface. System takes the input to the outside and gives the output to the outside. So practically system is an open system that interacts with the environment. In the present study, the system is an integrated collection of programs and data files as the unit. The combination of all these programs and database make the system. System study involves the investigation of all the programs to be solved, as in our system study in the “Bus Reservation System”, transaction relating to the database handling the main problem investigated. A system study involves overall flow and manipulation of the data as in our system data flows from one part to another. Data is also manipulated in our system. Our project “Bus Reservation System” is based on handling all the transaction relating to the organization. We gathered a lot of information by asking the staff to meet the information requirements. It includes: 

How the system works?



What are the different transactions that the employees have to deal with?



What are the different reports generated and how are they prepared?



How many checks are needed on the transaction? 25

26

System Design Overview:It is the most creative and challenging phase. System design specifies how the system will accomplish the objectives. The term design describes a final system and which develops it. The design represents the major characteristics of a final system and determines the upper bound in quality for the system. System design emphasizes on two aspects of a system: 

Dividing the system into components.



Defining the interrelationship of the components.

A fundamental objective in design of an information system is that computer and communication technology specified in the design should always be secondary to the results, system is intended to produce .System design consist of two steps :1. Logical Design:-

This

step

describes

the

feature, inputs, outputs, tables,

databases

and

procedure to meet the project requirement .This gives the detailed specification for the new system.

27

2. Physical Design:-

This step involves the production of software. Programs are return to accept input, process data, produce reports and stores data in database. It maps out the detail of physical system, plans the system implementation and specifies any new hardware and software. Design Goals

Here our approach is to develope an interactive system, which accepts inputs, options and provides the with required outputs. After some give-andtake, the design goal suggests that the system have the following features :

The system have good interface.



To facilitate the , a number of messages should be design which guide

the action.

System Design Phase 1. Data Gathering 2. Detail System Design i. Input Design ii. Output Design iii. Control Design iv. Database Design 3. Program writing Input Design: Input design specifies how data are accepted for processing. This involves:

What data to input.

28



What medium to use.



How the data should be arranged or coded.



The dialog to guide s in providing input.



Data items and transactions needed validations to detect errors.



Methods for performing input validation and steps to follow when error occurs.

Output Design: For many End – s, output is the main reason for developing the system and the basis on which they will evaluate the usefulness of the application . Output design involves:

Determine what information to present.



Decide whether to display or print the information.



Presentation is an acceptable format.

29

Control Design: While entering data or in requesting the performance of certain functions there may occur errors, which could result in proper use of system .Control provide ways to:

Ensure that only authorized s access the system



Guarantee that transactions are acceptable



Validate the data for accuracy

Database Design: The collection of data usually referred to as the database. The database contains information about the particulars of the enterprise. Data involves the definitions of structures for the storage of information and the provision of mechanism for the manipulation of information. In addition, to the database system must provide for the safety of information stored in the database despite system crashes or attempts to unauthorized access.

30

31

President

Secretary

ant

Bus Employees

Booking

Booking clerk Driver

Conductor

cclerkCler

Servants

32

33

MAIN DFD

ENGERS

MANAGEMENT

BOOKING FORM ACKNOWLEDGEMENT REPORTS

PARTICULARS

BUS RESERVATION SYSTEM

BOOKING PROCESS LUGGAGE BOOK

WORKERS

SALARY

34

TICKET BOOKING DFD ENGERS

TICKET BOOKING

RECIEPT

BOOKING PROCESS

ALLOTMENT OF SEAT NUMBER

SEAT NUMBER BOOKING

STATION PROCESS

ROUTE LIST

CHARGES LIST MANAGEMENT PROCESS

CHARGES

35

LUGGAGE BOOKING DFD

SENDER

LUGGAGE BOOKING

RECIEPT

BOOKING PROCESS

ROUTE LIST

LUGGAGE BOOKING

STATION PROCESS

CHARGES LIST

MANAGEMENT PROCESS

CHARGES

36

37

EMPLOYEE , BUS AND ROUTE RELATIONSHIP DEPARTMENT SALARY ADDR COMMISSION EMP NAME HIRE DATE EMPTAB

EMP ID

EMPTAB BUS RELATIO N

ROUTE ID

DEP. TIME CONDUCTOR ID

INSURANCE NO

DRIVER ID

INS. AMT

BUS

INS.COMP.

TOTAL SEATS

VALID TO DATE BUS NO ROUTE BUS RELATIO N

ROUTE SUBROUT E

TICKE TROU TE RID

ROUT

TICKE T SUBR OUTE

SUBR RATE

ROUTE

38

SUB ROUTE

RID

LUGGAGE , BUS,ROUTE RELATIONSHIP

ROUTE ID

DEP. TIME

CONDUCTOR ID

INSURANCE NO INS. AMT

DRIVER ID

INS.COMP.

BUS

TOTAL SEATS

VALID TO DATE

BUS NO

RID

R ADDRESS

LUGGAGE BUS RELATION S

DEP TIME

BOOKING DATE

SENDER NAME

LUGGAGE TYPE

R TO

RFROM

CHARGE S

WEIGHT

LUGGAGE BOOKING

RECIVER NAME

SENDER PHONE

BUSNO

TOUR DATE

BOOK NO

R PHONE

ROUTE SUBROUT E

TICKE TROU TE RID

ROUT

TICKE T SUBR OUTE

SUBR

ROUTE

RATE

39

SUB ROUTE

RID

40

1.TABLE NAME:- Column Name UNAME

Data Type TEXT TEXT

Size 20 20

41

Description Name

2.

TABLE NAME: - TICKETBOOKING

Column Name

Data Type

Size

Description

TICKNO BUSNO SEATNO

NUMBER TEXT NUMBER

6 15 2

Ticket Number(Primary Key) Bus Number Seat Number

RATE

NUMBER

5,2

Rate of Ticket

AMOUNT

NUMBER

5,2

Recieved Ruppes of Ticket

ROUTE

TEXT

25

Route of Bus

T_DATE DISCOUNT PFROM

DATE NUMBER TEXT

12 4,2 15

Date of Tour Discount on Ticket From Where is Ticket

PTO

TEXT

15

Destination

CNAME

TEXT

15

Customer Name

BK_DATE

DATE

12

Date of Booking

BK_TIME

TEXT

12

Time of Booking

DEPTIME

TEXT

12

Departure time of Bus

42

3.TABLE NAME:- LUGGAGE BOOKING

Column Name

Data Type

Size

Description

BOOKNO TOURDATE BOOKDATE BUSNO RID DEPTIME SNAME SPHONE SLUGGAGE CHARGES WEIGHT RFROM RTO RNAME RPHONE RADD

NUMBER DATE DATE TEXT NUMBER TEXT TEXT NUMBER TEXT NUMBER NUMBER TEXT TEXT TEXT NUMBER TEXT

6

Booking Number Tour Date Booking Date of Luggage Bus Number Route id from Route table Departure time of Bus Sender’s Name Sender’s Phone Sender’s Luggage type Charges of Luggage Weight of Luggage From where Luggage will be sent Destination of Bus Name of the Receiver Phone of the Receiver Address of the Receiver

15 2 12 15 10 15 6,2 5,2 15 15 15 10 30

43

4.TABLE NAME

:- BUS

Column Name

Data Type

Size

Description

BUSNO

TEXT

15

Bus Number

TSEATS

NUMBER

2

Seats in Bus

DRID

NUMBER

2

Driver id

CTRID

NUMBER

2

Conductor id

DEPTIME INSNO

TEXT TEXT

12 13

Departure Time Insurance Number

INSAMT

NUMBER

10,2

Amount of Insurance

INSCO

TEXT

20

Company of Insurance

VALIDTO

DATE

12

Date upto Valid of Insurance

RID

NUMBER

2

Route id

44

5.Table name

: EMPTAB

Column Name EMPID EMPNAME ADDR SAL DPT HDATE COMM

Data Type NUMBER TEXT TEXT NUMBER TEXT DATE NUMBER

Size 2 20 30 7,2 15 12 5,2

45

Description Employee id Number Employee Name Employee’s Address Employee’s Salary Department of working Hire date of Employee Commission

6.Table name:- Route Column Name

Data Type

Size

RID

NUMBER

2

Route id Number

ROUT

TEXT

25

Route Name

46

Description

SUBROUTE 7.TABLE NAME:- SUBROUTE Column Name

Data Type

Size

Description

RID

NUMBER

5

Route identity number

SUBR

TEXT

25

Sub Route name

RATE

NUMBER

6,2

Fares Station

47

of

the

particular

48

System Testing Testing can be defined as major quality control measure used during software development. Its basic function is to detect errors in the software. A newly designed system should have all the pieces in working order, but in

reality each piece works

independently. The purpose of the system testing is to consider

all the likely variations

to it will be subjected and then push the system to its limits. After the successful deg

of the system applications, the system analyst should plan to test the

application at every stage of development. It is important here to define what is the meaning of testing . Testing is the primary control standard for the software development. Testing is a task of executing the program with finding errors. No block of

code is entirely ready

unless it has been fully tested .Hence, this phase is very vital in the development of the system. It is an extremely critical and time-consuming activity. Testing is important for the success of the system .Testing makes the reasonable assumption that if all the modules of the system are correct and fine and the aim of the system development is achieved . Testing makes the software

readable without fault . This improves

confidence in the system. Steps

For

the

Testing

of

the

System

are

as

follows:

1:

Unit Testing

At Unit Level

2:

Integrated Testing

At Module Integration Level

3:

Validation Testing

Testing With Original Client

4:

System Testing

At Entire System Or Software level

49

Unit Testing: In unit testing, each module or unit is tested separately . The purpose

is to

exercise the different parts of the module code to detect coding errors .It concentrates on each unit or module of the software as implemented in source code. After this the modules are gradually integrated ,which are integrated to eventually form

the entire

system . Integrated Testing: Integrated testing is performed to detect design errors by interconnection between modules .It mainly focuses on the design

focusing on testing the and the construction

of the software architecture . Integrated testing address the issues associated with the dual problems of verification and program construction. Validation Testing: Validation criteria must be tested. It provides final assurance that software meets all functional behavior all and performance requirements. System Testing: After the system is put together, system testing is performed .System testing is the testing where the software and other system elements are tested as hole. Here the system is tested against the system requirements to see if all the requirements are met and if the system performs as specified by the requirements. Software when validated must be combined with other system elements i.e. hardware, people or databases. .

50

51

System Implementation A crucial phase in the system life cycle is a successful implementation of the new system defined and the analyst must be sure that the new design is implemented to establish the standards. It is the fulfillment of carrying out of the design specifications to put a new information system into operation. There are two system implementation phases, the construction of new information system and delivery of new information system.

In these two phases we make a detailed study of the purpose and objectives, specific tasks and activities that are to be performed and important skills that are to be mastered. This part of system development life cycle is important because it makes one understand the close working relationship between system analyst and the computer programmer. This involves creating computer compatible files, training the operation staff and installing hardware, terminals and telecommunication networks before the system is up and running.

52

CONSTRUCTION OF NEW INFORMATION SYSTEM

In this part of system implementation the main purpose is to build a working information system from the design specifications prepared during design phase. To achieve the completion of the construction phase we must accomplish the following objectives:

1. Construct or install information system components. 2. Implement assigned information system functions. 3. Involve end s in pertinent construction activities.

DELIVERY AND EVALUATION OF THE NEW SYSTEM: This is the last development phase in life cycle. From definition and selection phase we know what parts of the new system are manual and what are computerized. From design phase, we know all the inputs, outputs and procedures that are implemented and from construction phase, we will eventually have working hardware and software to new system. Now we most put new system into operation. The main purpose of delivery phase is to smoothly convert from the old system to new system. To achieve this purpose, we must accomplish the following objectives:

1. Train and end s. 2. Evaluate the project and system. 3. Make smooth transition to new methods and procedures possible.

53

In this phase we perform the following tasks: 1. Install files and databases. 2. Train end to use the new system. 3. Convert to the new system.

54

TRAINING An analysis of training focuses on two factors: capabilities and the nature of system being installed s range from the naïve to the highly sophisticated. Developmental research provides interesting insights into how naïve computer s think about their first exposure to a new system. They approach it as concrete learners, learning how to use the system which abstract principals determine which function. The distinction between concrete and formal learning says much about what one can expect from trainees in general. Tasks that require the to follow a well defined, concrete, step-by-step procedure require limited problems. This means that the training level and duration are basic end brief. Requiring a trainee to analyze a given situation and translate it into a procedure for computer manipulation requires formal trainee for relatively long time. Training has to be geared to the specific based on system complexity. TRAINING AIDS :There are several training aids available: 1. Manual :Traditionally, the manual is prepared reflectively because it is an item that much accompanies every system. Yet, there are items when a manual is discretionary. The important point is that the manual should be prepared only if it will serve the . Probably the best reasons for preparing a manual is on the recommendations of the resident expert. If it will be used, the manual should be written despite cost. 1.Data Dictionary:Data dictionary is the separate place for describing the data elements. It is more an electronic “one-page” sheet available to the to assure that functions are interpreted and executed properly. 2.Jobs Aids:

55

A job aids communicates essential information about certain jobs. It takes a number of forms, for example: a) Color printing in forms to the accentuate headings. b) Color to identify the pieces of hardware, cables etc. c) Wall charts to illustrate schematic of processing run. d) Flowcharts to guide the in detecting and handling the errors, restarting the system, etc. It can be seen then that training aids help to communicate the vital information about the new system to make these aids about the new system.

56

57

form

58

Mdi form

59

Ticket Booking Form

60

Ticket Cancel Form

61

Luggage Booking Form

62

Luggage Cancel Form

63

Bus Add Form

64

Route Add/Delete Form

65

Route Delete Form

66

Employee Detail Form

67

Form For Searching Bus

68

69

Form Dim b As ADODB.Recordset Private Sub Command1_Click() If UCase(Text1) <> UCase(b(0)) Then MsgBox "name incorrect" Text1.SetFocus SendKeys "{Home}+{End}" ElseIf UCase(Text2) <> UCase(b(1)) Then MsgBox " incorrect" Text2.SetFocus SendKeys "{Home}+{End}" Else Unload Me MDIForm1.Show End If End Sub

Private Sub Command2_Click() End End Sub Private Sub Form_Load() M.dbcon Set b = New Recordset b.Open " SELECT * FROM t1", M.con, adOpenDynamic, adLockOptimistic End Sub

70

MDI Form Dim b As ADODB.Recordset Private Sub BAdd_Click() AddBus.Show End Sub Private Sub BEdit_Click() EditBus.Show End Sub Private Sub bookingadd_Click() BookingBus.Show End Sub Private Sub bookingcancel_Click() Set b = New Recordset b.Open "SELECT * FROM booking ", M.con, adOpenDynamic, adLockOptimistic Dim tno tno = InputBox("Enter ticket Number:") If tno = "" Then GoTo ff b.MoveFirst b.Find ("ticketno =" & tno) If b.AbsolutePosition > adPosBOF Then b.Delete MsgBox "Ticket Cancelled" Else MsgBox "Record not found" End If ff: b.Close End Sub Private Sub bookingrpt_Click() Set b = New Recordset b.Open "select * from booking", M.con, adOpenDynamic, adLockOptimistic Set DataReport1.DataSource = b.DataSource DataReport1.Show End Sub Private Sub BSearch_Click()

71

MsgBox "Luggages Cancelled" Else MsgBox "Record not found" End If ff: b.Close End Sub Private Sub luggagerpt_Click() Set b = New Recordset b.Open "select * from luggage", M.con, adOpenDynamic, adLockOptimistic Set DataReport2.DataSource = b.DataSource DataReport2.Show End Sub Private Sub MDIForm_Load() End Sub Private Sub RAdd_Click() AddRoute.Show End Sub Private Sub REdit_Click() EditRoute.Show End Sub Private Sub RSearch_Click() SearchRoute.Show End Sub Private Sub SAdd_Click(Index As Integer) AddStation.Show End Sub Private Sub sEdit_Click(Index As Integer) EditStation.Show End Sub Private Sub SSearch_Click(Index As Integer) SearchStation.Show End Sub

72

Ticket Booking Form Dim b As ADODB.Recordset Dim c As ADODB.Recordset Private Sub Command1_Click() End Sub Private Sub Cmd_add_Click() If Not IsNumeric(tno) Then MsgBox "Enter Only Numeric Values", vbOKOnly + vbCritical tno.SetFocus Exit Sub End If If Not IsNumeric(mno) Then MsgBox "Enter Only Numeric Values", vbOKOnly + vbCritical mno.SetFocus Exit Sub End If If alpha(pn) = False Then MsgBox "Enter Only Cherecter Values", vbOKOnly + vbCritical pn.SetFocus Exit Sub End If b.AddNew b(0) = pn b(1) = add b(2) = mno b(3) = bd b(4) = Combo1 b(5) = bus b(6) = sn b(7) = fare b(8) = dt b(9) = tno b.Update MsgBox "Seat Is Reserve", vbOKOnly + vbExclamation pn = "" add = "" mn = "" Combo1 = ""

73

sn = "" fare = "" dt = "" bus = "" mno = "" End Sub

Private Sub cmd_exit_Click() Unload Me End Sub Private Sub Combo1_Click() c.Open "select * from route where to='" & Combo1 & "'", M.con fare = c(3) c.Close c.Open "select * from bus where route='" & Combo1 & "'", M.con Dim seatno seatno = c.Fields("totalseats") bus = c(0) dt = c(1) c.Close c.Open "select seetno from booking where route='" & Combo1 & "' and bookingdate=#" & bd & "# order by seetno desc", M.con, adOpenDynamic, adLockOptimistic If c.BOF Or c.EOF Then sn = 1 Else If (Int(c.Fields(0)) > seatno) Then MsgBox "Bus is Full" Else sn = c.Fields(0) + 1 End If End If c.Close End Sub Private Sub Command2_Click() End Sub Private Sub Form_Load() Set b = New Recordset

74

Set c = New Recordset c.CursorLocation = adUseClient b.Open "SELECT * FROM route", M.con, adOpenDynamic, adLockOptimistic While Not b.EOF Combo1.AddItem b(2) b.MoveNext Wend b.Close bd = Format(Date, "dd/mmm/yyyy") b.Open "SELECT * FROM Booking

where bookingdate=#" & bd & "# order by ticketno desc", M.con,

adOpenDynamic, adLockOptimistic If b.BOF Then tno = 1 Else tno = b.Fields("Ticketno") + 1 End If Me.Width = 7320 Me.Height = 6150 End Sub Private Function alpha(s1 As String) As Boolean For i = 1 To Len(s1) If (Asc(Mid(s1, i, 1)) < 65 Or Asc(Mid(s1, i, 1)) > 122) And Asc(Mid(s1, i, 1)) <> 32 Then alpha = False Exit Function End If Next alpha = True End Function

75

Ticket Cancel Form Private Sub bookingcancel_Click() Set b = New Recordset b.Open "SELECT * FROM booking ", M.con, adOpenDynamic, adLockOptimistic Dim tno tno = InputBox("Enter ticket Number:") If tno = "" Then GoTo ff b.MoveFirst b.Find ("ticketno =" & tno) If b.AbsolutePosition > adPosBOF Then b.Delete MsgBox "Ticket Cancelled" Else MsgBox "Record not found" End If ff: b.Close End Sub

76

Luggage Booking Form Dim b As ADODB.Recordset Dim c As ADODB.Recordset Private Sub Cmd_add_Click() If alpha(sn) = False Then MsgBox "Enter Only Cherecter Values", vbOKOnly + vbCritical sn.SetFocus Exit Sub End If If alpha(lag) = False Then MsgBox "Enter Only Cherecter Values", vbOKOnly + vbCritical lag.SetFocus Exit Sub End If If Not IsNumeric(wieght) Then MsgBox "Enter Only Numeric Values", vbOKOnly + vbCritical wieght.SetFocus Exit Sub End If If alpha(rearty) = False Then MsgBox "Enter Only Cherecter Values", vbOKOnly + vbCritical rearty.SetFocus Exit Sub End If If alpha(RAdd) = False Then MsgBox "Enter Only Cherecter Values", vbOKOnly + vbCritical RAdd.SetFocus Exit Sub End If If Not IsNumeric(rphon) Then MsgBox "Enter Only Numeric Values", vbOKOnly + vbCritical rphon.SetFocus Exit Sub End If b.AddNew b(0) = sn b(1) = sph b(2) = SAdd

77

Private Sub Form_Load() Set b = New Recordset Set c = New Recordset b.Open "select * from route", M.con, adOpenDynamic, adLockOptimistic While Not b.EOF Combo1.AddItem b(2) b.MoveNext Wend b.Close bd = Format(Date, "dd/mmm/yyyy") b.Open "select * from luggage order by bookingno desc", M.con, adOpenDynamic, adLockOptimistic If b.BOF Or b.EOF Then bookn = 1 Else bookn = b(3) + 1 End If Me.Width = 7305 Me.Height = 8340 End Sub Private Function alpha(s1 As String) As Boolean For i = 1 To Len(s1) If (Asc(Mid(s1, i, 1)) < 65 Or Asc(Mid(s1, i, 1)) > 122) And Asc(Mid(s1, i, 1)) <> 32 Then alpha = False Exit Function End If Next alpha = True End Function

78

Luggage Booking Cancel Form Private Sub Ldelete_Click() Dim a Set b = New Recordset b.Open "SELECT * FROM luggage ", M.con, adOpenDynamic, adLockOptimistic a = InputBox("Enter Booking no:") If a = "" Then GoTo ff b.MoveFirst b.Find ("Bookingno=" & a) If b.AbsolutePosition > adPosBOF Then b.Delete MsgBox "Luggages Cancelled" Else MsgBox "Record not found" End If ff: b.Close End Sub

79

Bus Add Form Dim b As ADODB.Recordset Private Sub Cmd_add_Click() If Not IsDate(t2) Then MsgBox "Enter Only date Values", vbOKOnly + vbCritical t2.SetFocus Exit Sub End If If Not IsNumeric(t3) Then MsgBox "Enter Only Numeric Values", vbOKOnly + vbCritical t3.SetFocus Exit Sub End If If Not IsNumeric(t4) Then MsgBox "Enter Only Numeric Values", vbOKOnly + vbCritical t4.SetFocus Exit Sub End If If Not IsNumeric(T6) Then MsgBox "Enter Only Numeric Values", vbOKOnly + vbCritical T6.SetFocus Exit Sub If Not IsDate(T7) Then MsgBox "Enter Only date Values", vbOKOnly + vbCritical T7.SetFocus Exit Sub End If End If b.AddNew b(0) = t1 b(1) = t2 b(2) = t3 b(3) = t4 b(4) = t5 b(5) = T6 b(6) = T7 b(7) = Combo1 b(8) = Combo2 b(9) = Combo3

80

b.Update MsgBox "Record Is Update", vbOKOnly + vbExclamation, "updation" t1 = "" t2 = "" t3 = "" t4 = "" t5 = "" T6 = "" T7 = "" Combo1 = "" Combo2 = "" Combo3 = "" End Sub Private Sub cmd_exit_Click() Unload Me End Sub Private Sub Command1_Click() t1 = "" t2 = "" t3 = "" t4 = "" t5 = "" T6 = "" T7 = "" Combo1 = "" Combo2 = "" Combo3 = "" End Sub Private Sub Form_Load() Set b = New Recordset b.Open "SELECT * FROM EMP where department='driver'", M.con, adOpenDynamic, adLockOptimistic While Not b.EOF Combo1.AddItem b(1) b.MoveNext Wend b.Close b.Open "SELECT * FROM EMP where department='conductor'", M.con, adOpenDynamic, adLockOptimistic While Not b.EOF Combo2.AddItem b(1)

81

b.MoveNext Wend b.Close b.Open "SELECT * FROM route", M.con, adOpenDynamic, adLockOptimistic While Not b.EOF Combo3.AddItem b(2) b.MoveNext Wend b.Close b.Open "SELECT * FROM Bus", M.con, adOpenDynamic, adLockOptimistic Me.Height = 6300 Me.Width = 7395 End Sub

82

Route Add Form Dim b As ADODB.Recordset Private Sub Cmd_add_Click() If Not IsNumeric(t1) Then MsgBox "Enter Only Numeric Values", vbOKOnly + vbCritical t1.SetFocus Exit Sub End If If alpha(Combo1) = False Then MsgBox "Enter Only Cherecter Values", vbOKOnly + vbCritical Combo1.SetFocus Exit Sub End If If alpha(Combo2) = False Then MsgBox "Enter Only Cherecter Values", vbOKOnly + vbCritical Combo2.SetFocus Exit Sub End If If Not IsNumeric(t2) Then MsgBox "Enter Only Numeric Values", vbOKOnly + vbCritical Combo2.SetFocus Exit Sub End If b.AddNew b(0) = t1 b(1) = Combo1 b(2) = Combo2 b(3) = t2 b.Update MsgBox "Record Is Update" t1 = "" Combo1 = "" Combo2 = "" t2 = "" End Sub Private Sub cmd_exit_Click() Unload Me End Sub

83

Private Sub Form_Load() Set b = New Recordset b.Open "SELECT * FROM station", M.con, adOpenDynamic, adLockOptimistic While Not b.EOF Combo2.AddItem b(1) b.MoveNext Wend b.Close b.Open "SELECT max(id) FROM Route", M.con, adOpenDynamic, adLockOptimistic t1 = b(0) + 1 b.Close b.Open "select * from Route", M.con, adOpenDynamic, adLockOptimistic End Sub Private Function alpha(s1 As String) As Boolean For i = 1 To Len(s1) If (Asc(Mid(s1, i, 1)) < 65 Or Asc(Mid(s1, i, 1)) > 122) And Asc(Mid(s1, i, 1)) <> 32 Then alpha = False Exit Function End If Next alpha = True End Function

84

Employee Delete/Update Form Dim b As ADODB.Recordset Private Sub cmd_pree_Click() b.MovePrevious If b.BOF Then MsgBox "This is Begning of record" b.MoveFirst End If view End Sub Private Sub Command1_Click() Unload Me End Sub Private Sub cmd_Edit_Click(Index As Integer) addedit = False End Sub Private Sub cmd_first_Click() b.MoveFirst view End Sub Private Sub cmd_last_Click() b.MoveLast view End Sub Private Sub cmd_next_Click() b.MoveNext If b.EOF Then MsgBox " This is last record" b.MoveLast End If view End Sub

85

Private Sub cmd_pre_Click() b.MovePrevious view End Sub Private Sub cmd_save_Click(Index As Integer) If Not IsNumeric(t1) Then MsgBox "Enter Only Numeric Values", vbOKOnly + vbCritical t1.SetFocus Exit Sub End If If alpha(t2) = False Then MsgBox "Enter Only Cherecter Values", vbOKOnly + vbCritical t2.SetFocus Exit Sub End If If alpha(t3) = False Then MsgBox "Enter Only Cherecter Values", vbOKOnly + vbCritical t3.SetFocus Exit Sub End If If Not IsNumeric(t4) Then MsgBox "Enter Only Numeric Values", vbOKOnly + vbCritical t4.SetFocus Exit Sub End If b(0) = t1 b(1) = t2 b(2) = t3 b(3) = t4 b(4) = Combo1 MsgBox "Record is update", vbOKOnly + vbExclamation, "updation" End Sub Private Sub Command2_Click() t1 = "" t2 = "" t3 = "" t4 = "" Combo1 = "" End Sub

86

Private Sub Command3_Click() If MsgBox("Are You Sure To Delete Record", vbYesNo + vbCritical, "Deletion") = vbYes Then b.Delete MsgBox "Record Is Delete" cmd_pree_Click End If End Sub Private Sub Form_Load() Combo1.AddItem "CONDUCTOR" Combo1.AddItem "DRIVER" Combo1.AddItem "HELPER" Combo1.AddItem "MANAGER" Combo1.AddItem "CASHIER" Set b = New Recordset b.CursorLocation = adUseClient b.Open "select * from EMP", M.con, adOpenDynamic, adLockOptimistic view Me.Width = 6345 Me.Height = 5595 End Sub Private Sub view() t1 = b(0) t2 = b(1) t3 = b(2) t4 = b(3) Combo1 = b(4) Label5(0).Caption = "Record no.=" & b.AbsolutePosition & "Totel NO.of records=" & b.RecordCount End Sub Private Function alpha(s1 As String) As Boolean For i = 1 To Len(s1) If (Asc(Mid(s1, i, 1)) < 65 Or Asc(Mid(s1, i, 1)) > 122) And Asc(Mid(s1, i, 1)) <> 32 Then alpha = False Exit Function End If Next alpha = True End Function

87

Searching by Bus Number Form Dim b As ADODB.Recordset Private Sub amd_search_Click() If t11.Text = "" Then MsgBox "Enter values", , "Searching" Else b.MoveFirst b.Find ("Busno =" & "'" & t11 & "'") If b.AbsolutePosition > adPosBOF Then view Else MsgBox "Record not found" End If End If End Sub Private Sub cmd_exit_Click() Unload Me End Sub

Private Sub cmd_reset_Click() t1 = "" t2 = "" t3 = "" t4 = "" t5 = "" T6 = "" T7 = "" t8 = "" t9 = "" t10 = "" t11 = "" End Sub Private Sub Form_Load() Set b = New Recordset

88

b.Open "SELECT * FROM bus ", M.con, adOpenDynamic, adLockOptimistic Me.Width = 7305 Me.Height = 6330 End Sub Private Sub view() t1 = b(0) t2 = b(1) t3 = b(2) t4 = b(3) t5 = b(4) T6 = b(5) T7 = b(6) t9 = b(7) t10 = b(8) t8 = b(9) End Sub

89

Module (M.bas) Public con As ADODB.Connection Public Sub dbcon() Set con = New Connection con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\FILE1.mdb;Persist Security Info=False" End Sub

90

91

manual is a complete guide for the to use the software. It includes installation of the software and techniques of how to use the software. The manual should be simple to able the to access the software very easily. The contents of the manual are: 1.

Loading

The tools used are MS Access and visual basic. So we need to loads MS Access and visual basic on our computer first or the ’s computer. 2. Software loading Load the appropriate software to run the project. 3.

Type the correct name and required to run the project. If we give invalid name, it will display a message “name incorrect” and it will display a message “ incorrect “otherwise it will accept the correct and run the project. 4.

Main menu

We have five main menus in this project--1. File Maintains 2. Booking 3. Luggage 4. Reports 5. Exit

92

a.

Ticket Booking form---

This form contains details of the enger like ticket number, enger name, route name, Station name where he want to go, rate of ticket , date of journey etc information . This form enables us viewing details of the enger in a single form. b.

Luggage Booking Form--

This form contains details of the Sender,Reciever and about luggage like book number, Sender name, Receiver name,.Reciver Address, Station name where he want to go, charges of luggage , date of journey etc information . This form enables us viewing details of the luggage in a single form.

c. Employee Form This option opens up staff list form which contains complete list of Staff in the organization. This form contains details of the staff member in the organization like emp id , name, category department and address etc. information. c. Bus Add Delete Form This form contain the information about all the buses in the organization.

This

information detail information about all buses in the organization like which bus of particular number will goon of which particular route. And who are the driver and conductor of the particular bus.

93

94

Conclusion This project has been developed during the project work of B.C.A. final (Bachelor of Computer Applications) at L.L.R..I.E.T. Moga.. This project is completely menu driven and entirely friendly and can be operated even by a computer novice with ease. The input formats are self explanatory and have been designed in such a manner that the will take least trouble in inputting the information. Various validation checks have also been provided through out the system. As far as the matter of security is concerned, the system is full-proof. Facility is provided in such a way that no can have the access to the information of the other . The system is flexible enough for the further modification whenever desired. The changes can always be incorporated in any module without affecting the whole system. Similarly, any enhancement can be done by adding any module at any stage.

95

Because of lack of time this software is made for booking the seats as well as luggage from Ludhiana only. So that’s why the starting station is one where as there are different destinations. It is also possible after the little modification this software is used for booking of all types of reservations from one station to another station. By studying above the project report we conclude that by computerization Of the Bus Reservation there are following advantages: 1. We can save lot of time by using this software. 2. There will be no need of big files for storing information about various entities. 3. This software provides us quick information, which id frequently used in the department. 4. can easily use the software even if he/she don’t know about visual basic by using the buttons displayed on screen during runtime. 5. Reports are special feature of this software. The reports are useful for the presentation of data. 6. By using this software updating /deletion/saving/of records is quiet easy for the .4

96

97

1. VB in 21 Days 2. System Analysis and Design 3. www.projectdeveloper.co

98