[引] Travel website application design

zhaozj2021-02-12  147

This article introduces the application design design of transportation tourism website, including timetable online inquiry system, online ticket ticket reservation system, travel network, online query appointment system, mail delivery line query appointment system, etc. The idea, design examples, and detailed explanation allow you to quickly design a wide range of transportation.

Transport website database application

In terms of transportation, use the website database, you can provide the following applications through the Internet, or intranet:

* Aviation flight timetable online query *

* Online ticket reservation *

* Travel Agency Travel Information Line

* Hotel online query appointment

* Mail delivery line query appointment

The application of the upper right upper mark *, this section will provide an example of the design and explain it.

Example of executing the database of this chapter, the database used can be Microsoft Access, Microsoft SQL Server, or Text file (readers can modify to other database libraries that support ODBC, see 1-6-5), must be installed in NT installation IIS 3.0, "ODBC" in the "Console", newly created a source of information "Booksamp", the driver is "Microsoft Access Driver", "SQL Server", or "Microsoft Text Driver". See Appendix example magnetic sheet for details.

1

Timetable online query system

"Timetry Query System", you can provide the functionality of the query timetable through the Internet.

Through Internet, the online query system on the Internet, the Airlines (Railway Bureau, the Highway Bureau) can check the timetable of the airline (train ticket, road bureau ticket).

"Time-on-Table Line Inquiry System" can also provide tourism promotion activities, flight time take off to the mistake, or accommodation hotel, diet restaurant, weather forecast, entertainment, etc.

Design instance

Let's perform an example.

(Sample Data8.asp airplane shuttle timetable online query

To query the information, use the browser on the user, browse the Data8.asp attached to the website server, you can display the inquiry airplane timetable, including shooting, away / time, model:

Design instance details

Establish a data sheet

First use Microsoft Access, Microsoft SQL Server, Text file, or any of the support ODBC's database, create a data sheet AirtimeTable.

In the column of Flight, TIME, AIRCRAFT, enter the class, away from / to time, model.

Establish a data sheet AirtimeTable with Microsoft Access, as follows:

Or build a data sheet AirtimeTable with Microsoft SQL Server, as follows:

Or build a data sheet AirtimeTable as follows:

Query database

Next, the website server performs a DATA8.ASP file, uses "Server.createObject" to establish a connection item, and use "Open" to open the query database booksamp.

Use the SELECT's SQL instruction to query the data library, set the SQL instruction, the next "Execute" instruction, you can start the action of the access query database, and store the query results to the Recordsets object RS.

The program code is as follows:

<%

Set conn = server.createObject ("adoDb.connection")

Conn.open "Booksamp", "SA", ""

SQL = "SELECT FLIGHT, TIME, AIRCRAFT from AirtiMetable"

SET RS = Conn.execute (SQL)%>

Next, you want to display the result of the query.

First, if the "IF RS.eof Then ..." is determined whether to find the information on the aircraft flight timetable, if rs.eof is true, "there is no aviation shuttle this month."

If the information airplane flight schedules found, admitted the result is displayed, including a shift away from / to time, models, respectively, RS (1), RS (2) made by the RS RecordSets objects (0).

Rs.fields.count indicates the number of fields of the Recordsets, and the information of the RS (i) all column is obtained by "for i = 0 to rs.fields.count - 1". Cooperation

No aviation flight this month

Taipei -> Kaohsiung Airlines timetable is as follows:

The HTML syntax of the table will fill the results in the fields of the table. By "IF INT (J / 2) * 2 <> J Then ..." judges the shuttle time of the display of the wonders, the parity is displayed different colors. If there is another information, use rsmovenext to move to the next position. The program code is as follows: <% if xi e%> <% else%>

Ban sub-/ to time model <% j = 1%> <% do while not rs.eof%>

<% For i = 0 to rs.fields.count - 1%> <% if Int (j / 2) * 2 <> j Then%>

<% = Rs (i)%> <% else%>

<% = Rs (i)%> <% end IF%> <% next%>

<% Rs.movenextj = j 1 looprs.closeconn.close%>

<% End if%>

Finally, use RS.Close to close the Recordset, close the database using conn.close.

All program code as follows:

Aviation flight timetable online query system

<%

Set conn = server.createObject ("adoDb.connection")

Conn.open "Booksamp", "SA", ""

SQL = "SELECT FLIGHT, TIME, AIRCRAFT from AirtiMetable"

SET RS = Conn.execute (SQL)

%>

<% IF r e%>

No aviation flight this month

<% ELSE%>

Taipei -> Kaohsiung Airlines timetable is as follows:

Ban sub-/ to time model <% j = 1%> <% do while not rs.eof%>

<% For i = 0 to rs.fields.count - 1%> <% if Int (j / 2) * 2 <> j Then%>

<% = Rs (i)%> <% else%>

<% = Rs (i)%> <% end IF%> <% next%>

<% Rs.movenextj = j 1 looprs.closeconn.close%>

<% End if%>

2

Online air ticket ticket reservation system

"Online ticket ticket reservation system", you can provide a ticket, train ticket, and highway ticket reservation.

Through Internet, online airlines (railway bureaus, highway bureaus), passengers can be entered into flight, ID number, date, complete ticket (train ticket, road bureau ticket) Booking procedure. The reservation system will automatically count the number of people in each shift. If the quota is exceeded, it will be automatically reported to request the passenger order.

When the reservation, the rendering system provides the ability to increase, cancel, and query the order.

Passengers can check the airlines (train tickets, road bureaus tickets) schedule.

The fee can be paid by credit card, allocation, or bank transfer.

Design instance

Let's perform an example.

(Sample Data11.ASP online ticket order

To line up the ticket, use the browser to use the browser, browse the Data11.asp attached to the website server, and enter the identity card in the "Dianer Document", and enter the "Take the Date" At the time of the input lap, the lanting is entered. After the "Plan", enter the "order" button, you can display the results of the ticket order, including the identity card, the end of the machine, Take the machine, positioning order:

When the online reassembly ticket, if this shift has been booked, the deduction order will display the "already booked" as follows:

When the online reservation ticket is exceeded, "the unit is full" as follows:

Cancel the order

After the online reassembly ticket, you can cancel the booking record. Enter the identity card font size, such as A123456789, and enter the "Take the Date". After entering a built-in 103, press the "Cancellation" button to display the result of the order:

If the shift to be canceled has not yet been binding, the "Not Order" is displayed as follows:

Query order

After the online reassembly ticket, you can query all the booking records. After entering the identity card font size, if you only enter the "Identity Different Font", you can press the "Query" button to display the results of the query:

When the order is inquiry, if it is not yet, the query order will display "Not yet," as follows:

Flight timetable

Press the "Airline Timetable" button to display the results of the query flight timetable as follows:

Design instance details

Establish a data sheet

First use Microsoft Access, Microsoft SQL Server, Text file, or any of the data libraries that support ODBC, create a data sheet aircount, store a reservation order number of a shift, and the last order sequence number.

When this data is a binding and cancellation, record a number of appointments for a shift, and the last order sequence number.

Establishing the column Total, Count0, Date0, Flight, representing a number of appointments, last reservation numbers, date, and flight, respectively. Do not need to enter the information when building a data sheet.

Establish a data sheet aircount as follows: 00ROSOFT Access

Or use Microsoft SQL Server to create a data sheet aircount, as follows:

Or use the Text file to create a data sheet aircount, as follows:

Another information sheet AIRTICKET is still needed to store a recorded record, set the field ID, count0, date0, flight, representing an archive number, order order number, date, and flight representative of a reservation order record.

This data is based on the order, query order, and cancel the order, record a reservation order record. Do not need to enter the information when building a data sheet.

Establish a data table with Microsoft Access, as follows:

Or build a data sheet AIRTICKET with Microsoft SQL Server, as follows:

Or use the Text file to create a data sheet AIRTICKET, as follows: Design Input Form

Next, design input form form, when the customer enters the ID1, the table Date1, the machine shift Flight1, press "Book", etc. Submit, that is, when using the POST, the input data is transferred to the website servo. The DATA11.ASP file set by "form action = ..." (the same ASP file is as the same ASP file), the program code is as follows:

Air ticket reservation, please enter:

If you press the "Airline Timetable" button, DATA8.ASP is executed to query the flight schedule.

The website server executes the Data11.asp file, first get the display text value on the Submit button via the request.form ("Action"), Left (Request.Form ("Action"), 2) is only the first two Chinese. Words, if request.form ("action") is not blank, is expressed as the form input called the form.

From "SELECT CASE LEFT (Request.form (" Action "), 2), the judgment is pressed the button. If the first two words on the button are "order", execute the addtic () subscriber; if "cancel", execute the deleteticket () sub-process; if "query", execute the checkticket () Program.

<%

SELECT CASE LEFT (Request.form ("Action"), 2)

Case "order"

Addticket ()

Case "Cancel"

DeleTicket ()

Case "inquiry"

Checkticket ()

End SELECT

%>

booking

When you press the "Order" button, the AddTicket () subscriber will be executed.

First, use "Server.CreateObject" to establish a connection of the connection, and use "Open" to open the query database booksamp.

Look for the newly added book record to check if you have already booked, use SELECT SQL instructions to query the database's information, in the AIRTICKET data table, set the SQL instruction, query the identical card font size ID compliance Request.form ("ID1"), and the field Date0 meet the input lap date request.form ("DATE11"), and the field Flight is in line with the information of the input lap Request.form ("Flight1"), under The "Execute" instruction, you can start the action of the access query database and store the query results to the RecordSets object RS.

The program code is as follows:

SUB ADDTICKET ()

Set conn = server.createObject ("adoDb.connection")

Conn.open "Booksamp", "SA", ""

SQL = "SELECT * AIRTICKET WHERE ID = '" & Request.form ("Id1") & Request.form ("DATE11" & "' and flight = '" & required.form ("Flight1") & "'" set = conn.execute (SQL)

Next, the result is displayed.

First, check if it has been booked, and it is determined by "if i e e ...". If rs.eof is true, it means that this customer has not yet booked for this shift, and then finds whether the shift to be rented has been booked. In the aircount data sheet, set the SQL instruction, the query field Date0 is in line with the input lap date request.form ("DATE1"), and the field flight is in line with the input lander Date Request.form ("Flight1"). If rs.eof is true, it means that this shift has not yet been rendered, then adds a data using the "Insert INTO ..." instruction in the AirCount data sheet. The new information of this new information is set to 1. The field flight is set to Request.form ("Flight1").

Then add a data using the "Insert INTO ..." instruction in the AIRTICKET data sheet. The order sequence number field of this new information is set to 1, the identity card font size type ID is set to Request.form ("ID1"), and the lap date field DATE0 is set to request.form (" Date1 "), and the drum date field flight is set to Request.form (" Flight1 ").

When the result is displayed, cooperate

Order results:

Booking OK! Order order is No. 1

The HTML syntax of the table will fill the results in the fields of the table. The program code, as follows: <% if xi = "select * from aircount where date0 = '") & "DATE1") & "' and flight = '" & request.form (" Flight1 ") &" '"SET RS = Conn.execute (SQL) IF = CONN.EOF THEN' This shift has not yet rendered! Add a SQL =" Insert Into Aircount (Count, Total, Date0, Flight) in Aircount VALUES (1, 1, '"& Request.form (" DATE1 ") &"', '"& Request.form (" Flight1 ") &") "SET RS = Conn.execute (SQL)' AIRTICKET added A SQL = "Insert Into Airticket (Count0, ID, Date0, Flight) Values ​​(1, '" & Request.form ("Id1") & "', '" & Request.form ("Date1") & " , '"" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ",,,,,,,,,,,,,,,,,, )%> <% = Request.form ("date1")%> <% = request.form ("flight1")%> 1

If this shift has been rented, rs.eof is false. By "IF RS (0) <300 Then ..." Judgment RS (0) The number of people Total exceeds 300 places.

If it is not exceeded, then the "UPDATE ..." instruction is used in the AirCount data sheet, and the number of people in this note Total, and the last order sequence number count0 plus one.

Then, in the AIRTICKET data table, add a data using the "Insert INTO ..." instruction. This new information of this new information is a new value of the COUNT0 of the Aircount data sheet, the identity card font size type ID is set to Request.form ("ID1"), and the date field DATE0 Set to Request.form ("Date11"), and the lap date field flight is set to Request.form ("Flight1").

Next, when the result is displayed, cooperate

Booking OK! The order order is the "% = countno%> number"

The HTML syntax of the table will be displayed in the AIRTICKET data sheet, which is displayed in each field of the form. The program code is as follows: <% else if = r 次 次 次 次 人 人 人 人 人 人 人 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一Aircount set total = "& totalno &", count0 = "& requirements" & quest.form ("flight1") & "" "& Request.form (" Flight1 ") & Request.form (" Flight1 ") &" Flight1 ") & Request.Form '"SET RS = Conn.execute (SQL)' Airticket Add a SQL =" Insert Into Airticket (COUNT0, ID, DATE0, FLight) Values ​​("& CountNo &", '"& Request.form (" ID1 " ) & "','" "&" "" "& Request.form (" flight1 ") &" "set = conn.execute (sql)%> identity card font size Take the machine date Plant order order sequence <% = Request.form ("ID1")%> <% = request.form ("DATE1")%> <% = Request.form ("Flight1")%> <% = Countno%>

If the number of people in this shift Total is more than 300 places, the "The unit is full! Please set other shifts!"

Next, the result of the display, cooperate

Apologize!

The unit is full! Please set other shifts!

The HTML syntax of the table, inputs the identity card font size and the lap date, filled in the fields of the table. The program code is as follows: <% else%> <% '300 is full of%>

Body ID Font 5 Take the Date Series <% = Request.form ("Id1")%> <% = Request.form ("DATE1")%> <% = Request.form ("Flight1")%>

<% End if%>

<% End if%>

When the AIRTICKET data table is determined by the "IF RS.eof Then ...", it has been booked. If rs.eof is false, it means that this customer has already booked this shift, then "Apoget! It has been booked! The order order is first ..."

Next, the result of the display, cooperate

Apologize!

Already booked!

The HTML syntax of the table, which is displayed in the fields of the identity card, latter dates, latter shifts, and order sequence, and filled in the columns in the table. The program code, as follows: <% else%> <% 'has been booked by a bit%> The order order is the "% = RS (1)%> number identity card Dictionary Date Terrace Document Sequence <% = Request .Form ("ID1")%> <% = request.form ("DATE1")%> <% = Request.form ("Flight1")%> <% = rs (1)%>

<% End if

Conn.close

End Sub%>

Finally, close the database using conn.close.

Cancel the order

When you press the "Cancellation" button, the deleTicket () subscriber is executed.

First, look for the reservation record to be canceled, use "Server.createObject" to establish a connection item, and use "Open" to open the query database booksamp.

Use SELECT's SQL instruction to query the database's information, in the AIRTICKET table, set the SQL instruction, query the identity card font size of the identity card, which is in line with the entered request.form ("ID1"), and the field Date0 is in line with the entered Date REQUEST.FORM ("Date1"), and field flight meets the information of the entered lap Request.form ("Flight1"), the next "Execute" instruction, you can start the action of the access query database, And store the query results to the RecordSets object RS.

By the "if q ieof kil dam", if you find the order record to be canceled, if rs.eof is true, it means that this customer has not yet rented this shift, then it is displayed! Not yet ! "

The program code is as follows:

<%

Sub deleTicket ()

Set conn = server.createObject ("adoDb.connection")

Conn.open "Booksamp", "SA", ""

SQL = "SELECT * AIRTICKET WHERE ID = '" & Request.form ("Id1") & Request.form ("DATE11" & "' and flight = '" & required.form ("Flight1") & "'"

SET RS = Conn.execute (SQL)

%>

Cancel the order results:

<%

IF r.eof then

'Can't find! No place!

%>

Can't find! No place!

If the rendering record to be canceled is found, the "DELETE" instruction is removed using the "Delete From ..." instruction.

Then, in the aircount data sheet, use the "UPDATE ..." instruction to minimize the number of courses Total.

Next, the result of the display, cooperate

Can't find the order!

The order has been canceled!

The table's HTML syntax will be deleted by the AIRTICKET table, fill in the fields of the table to display. The program code, as follows: <% else 'Cancel has been booked!' Airticket Delete a SQL = "Delete from Airticket Where Id = '" & Request.form ("Id1") & "' and Date0 = '" & Request .Form ("Date11") & Request.form ("Flight1") & "'" SET RS = conn.execute (SQL)' Aircount Total minus one SQL = "Select * from aircount WHERE DATE0 = '"& Request.form (" DATE1 ") &"' and flight = '"& requirements") & "'" set = conn.execute (SQL) if xi = f i%% > <% Elsetotalno = rs (0) -1sql = "Update Aircount Set Total =" & Totalno & "Where Date0 = '" & Request.form ("Date1") & "' and flight = '" & required.form "Flight1") & "'" SET RS = Conn.execute (SQL)%> Body Different Document Date Terrace Date Place <% = Request.form ("Id1")%> <% = Request.form ("Date1 ")%> <% = Request.form (" flight1 ")%>

<% End if

END IF

Conn.close

End Sub%>

Finally, close the database using conn.close.

Query order

When you press the "Query Order" button, execute the checkticket () subscriber.

First, look for the selection records to be inquiry, use "Server.createObject" to establish a connection item, and use "Open" to open the query database booksamp.

Use the SELECT's SQL instruction to query the data library, in the AIRTICKET table, set the SQL instruction, query the identity card font size field ID compliance with the input Request.form ("ID1"), the next "Execute" instruction, You can start the action of the access query database and store the query results to the Recordsets object RS.

By the "if ife.eof kiln ...", if you find all the booking records to be queried, if rs.eof is true, it means that this customer has not yet rendered, then "can't find it! Not yet ! "

The program code is as follows:

<%

Sub Checkticket ()

Set conn = server.createObject ("adodb.connection") conn.open "Booksamp", "SA", ""

SQL = "SELECT ID, DATE0, FLIGHT, Count ROM AIRTICKET WHERE I ID = '" & Request.form ("Id1") & "'"

SET RS = Conn.execute (SQL)

%>

Query order results:

<%

IF r.eof then

'Can't find! No place!

%>

Can't find! No place!

If the ID is found for the identity card, the number of the query is displayed, including the query, including the identity card, the drift date, the built-in, the order sequence, respectively by the RS (0) of the Recordsets object, respectively. , RS (1), RS (2) obtained.

Rs.fields.count indicates the number of fields of the Recordsets, and the information of the RS (i) all column is obtained by "for i = 0 to rs.fields.count - 1". Cooperation

The order is as follows:

The HTML syntax of the table will fill the results in the fields of the table. If there is another information, use rsmovenext to move to the next position. The program code is as follows: <% else%> <% 'has a book!%>

Body ID Font 5 Take the Date Series Sequence <% J = 1%> <% Do While Not Rs.eOf%>

<% For i = 0 to rs.fields.count - 1%> <% if Int (j / 2) * 2 <> j Then%>

<% = Rs (i)%> <% else%>

<% = Rs (i)%> <% end IF%> <% next%>

<% Rs.movenextj = j 1loop%>

<% End if

Rs.close

Conn.close

End Sub%>

Finally, use RS.Close to close the Recordset, close the database using conn.close.

All program code as follows:

Online ticket reservation system

<%

SELECT CASE LEFT (Request.form ("Action"), 2)

Case "order"

Addticket ()

Case "Cancel"

DeleTicket ()

Case "inquiry"

Checkticket ()

End SELECT

SUB ADDTICKET ()

Set conn = server.createObject ("adoDb.connection")

Conn.open "Booksamp", "SA", ""

SQL = "SELECT * AIRTICKET WHERE ID = '" & Request.form ("Id1") & Request.form ("DATE11" & "' and flight = '" & required.form ("Flight1") & "'" set = conn.execute (SQL)

%>

Order results:

<%

IF r.eof then

Rs.close

SQL = "SELECT * from aircount where date0 = '" & request.form ("Date1") & "' and flight = '" & requirements "" ") &"' "

SET RS = Conn.execute (SQL)

IF r.eof then

'This shift has not yet been binded! Add a new point in Aircount

SQL = "INSERT INTO Aircount (Count0, Total, Date0, Flight) VALUES (1, 1, '" & Request.form ("Date1") & "', '" & Request.form ("Flight1") & "' ) "

SET RS = Conn.execute (SQL)

'Airticket Add a

SQL = "INSERT INTO AIRTICKET (COUNT0, ID, DATE0, FLIGHT) VALUES (1, '" & Request.form ("ID1") & "', '" "& Request.form (" Date1 ") &",' "& Request.form (" Flight1 ") &") "

SET RS = Conn.execute (SQL)

%>

Booking OK! Order order is No. 1

Body ID Font 5 Take the Date Place Sequence <% = Request.form ("Id1")%> <% = Request.form ("DATE1")%> <% = Request.form ("Flight1")% > 1

<% Else

IF RS (0) <300 THEN

'This shift has been rented! Aircount's count0, Total increasing one

Totalno = rs (0) 1

Countno = rs (1) 1

SQL = "Update Aircount Set Total =" & Totalno & ", Count0 =" & Request.form ("Date1" & Request.form ("Flight1" & Request.form ("Flight1) ") &" '"SET RS = conn.execute (SQL)

'Airticket Add a

SQL = "INSERT INTO AIRTICKET (COUNT0, ID, DATE0, FLIGHT) VALUES (" & CountNo & "& Request.form (" Id1 ") &" ',' "& Request.form (" Date1 ") & "','" & Request.form ("Flight1") & ")"

SET RS = Conn.execute (SQL)

%>

Booking OK! The order order is the "% = countno%> number"

Body ID Font 5 Take the Date Place Sequence <% = Request.form ("Id1")%> <% = Request.form ("DATE1")%> <% = Request.form ("Flight1")% > <% = Countno%>

<% ELSE%>

<% '300 is full of%>

Apologize!

The unit is full! Please set other shifts!

Body ID Font 5 Take the Date Series <% = Request.form ("Id1")%> <% = Request.form ("DATE1")%> <% = Request.form ("Flight1")%>

<% End if%>

<% End if%>

<% ELSE%>

<% 'Has been booked by bit%>

Apologize!

Already booked! The order order is the "% = RS (1)%> number

Body ID Font 5 Take the Date Place Sequence <% = Request.form ("Id1")%> <% = Request.form ("DATE1")%> <% = Request.form ("Flight1")% > <% = Rs (1)%>

<% End if

Conn.close

End Sub%>

<%

Sub deleTicket ()

Set conn = server.createObject ("adoDb.connection")

Conn.open "Booksamp", "SA", ""

SQL = "SELECT * AIRTICKET WHERE ID = '" & Request.form ("Id1") & Request.form ("DATE11" & "' and flight = '" & required.form ("Flight1") & "'" set = conn.execute (SQL)

%>

Cancel the order results:

<%

IF r.eof then

'Can't find! No place!

%>

Can't find! No place!

<% Else 'Cancel has been booked! Airticket deletes a pen

SQL = "delete from airkeet where id = '" & request.form ("id1") & "'" & requirements ") &" 'and flight =' "& requirements (" DATE1 ") & Request.form "Flight1") & "'"

SET RS = Conn.execute (SQL)

'Aircount Total minus one

'Rs.close

SQL = "SELECT * from aircount where date0 = '" & request.form ("Date1") & "' and flight = '" & requirements "" ") &"' "

SET RS = Conn.execute (SQL)

IF r.eof then

%>

Can't find the order!

<%

Else

Totalno = RS (0) -1

SQL = "Update Aircount Set Total =" & Totalno & "Where Date0 = '" & Request.form ("Date1") & "' and flight = '" & requirements "" "" "") & "'"

SET RS = Conn.execute (SQL)

%>

The order has been canceled!

Body ID Font 5 Take the Date Series <% = Request.form ("Id1")%> <% = Request.form ("DATE1")%> <% = Request.form ("Flight1")%>

<% End if

END IF

Conn.close

End Sub%>

<%

Sub Checkticket ()

Set conn = server.createObject ("adoDb.connection")

Conn.open "Booksamp", "SA", ""

SQL = "SELECT ID, DATE0, FLIGHT, Count0 from airkeet where id = '") & "'" set = conn.execute (SQL)

%>

Query order results:

<%

IF r.eof then

'Can't find! No place!

%>

Can't find! No place!

<% ELSE%>

<% 'Has a book!%>

The order is as follows:

Body ID Font 5 Take the Date Series Sequence <% J = 1%> <% Do While Not Rs.eOf%>

<% For i = 0 to rs.fields.count - 1%> <% if Int (j / 2) * 2 <> j Then%>

<% = Rs (i)%> <% else%>

<% = Rs (i)%> <% end IF%> <% next%>

<% Rs.movenextj = j 1 loop%>

<% End if

Rs.close

Conn.close

End Sub%>

Air ticket reservation, please enter:

3

Other transportation travel website applications

Other transportation travel website applications, as follows:

Travel Site Online Query Registration System

"Querying the Registration System on Travel Site", you can provide travel information, travel group registration, through the Internet.

Think of people who want to travel, through the "Travel Site" of the Travel Agency on the Travel Society, you can find tourism promotion, accommodation hotels, diet restaurants, weather forecasts, entertainment plants Wen Ji and other information.

You can enter the ID number of the computer, refer to the tour group, complete the registration procedure for the tour group.

People who have already signed up, you can query the results of the application for visas, travel precautions, weather notices, etc.

Hotel online query appointment system

"Query Application System" on the hotel ", you can provide hotel accommodation information and reservation of the room.

People who want to travel to stay, through the Internet, online online online online online online online online online, you can check the type of room, room pictures, accommodation, promotion activities, information, transportation, nearby tourist locations Description, diet restaurant, weather notice, etc. Information.

Reservation system and provide services to the room through the Internet. Enter your ID card number, reservation date, room type, you can complete the property reservation.

When making an appointment, the reservation system provides an increase, cancel, and query the appointment.

Accommodation costs can be paid by credit card, allocation, or bank transfer.

Inquiry appointment system on the mail delivery line

"Query Application System on Mail Delivery", you can provide query delivery status, and make an appointment function.

Those who want to query the mail transport status, through the Internet, connected post office, the courier company's "mail line query appointment system", you can query the status of the email delivery, whether it is already Arrivals.

The E-mail to notify the customer when serving.

"Query Application System" on the mail delivery line can also provide express delivery, customers enter the pick-up location to make an appointment, transport type, pick-up date, delivery location, etc., can complete the express appointment, Notice to pick up the goods.

When making an appointment, the reservation system provides an increase, cancel, and query the appointment.

Delivery person picks up the goods, delivery, update the transportation of the transportation through the Internet.

转载请注明原文地址:https://www.9cbs.com/read-6851.html

New Post(0)