<% ' FP_ASP ASP Automatically generated by a Frontpage Component. Do not Edit. On Error Resume Next Session("FP_OldCodePage") = Session.CodePage Session("FP_OldLCID") = Session.LCID Session.CodePage = 1252 Session.LCID = 1033 Err.Clear strErrorUrl = "" If Request.ServerVariables("REQUEST_METHOD") = "POST" Then If Request.Form("VTI-GROUP") = "0" Then Err.Clear Set fp_conn = Server.CreateObject("ADODB.Connection") FP_DumpError strErrorUrl, "Cannot create connection" Set fp_rs = Server.CreateObject("ADODB.Recordset") FP_DumpError strErrorUrl, "Cannot create record set" fp_conn.Open Application("allcruising_ConnectionString") FP_DumpError strErrorUrl, "Cannot open database" fp_rs.Open "tBookingForm", fp_conn, 1, 3, 2 ' adOpenKeySet, adLockOptimistic, adCmdTable FP_DumpError strErrorUrl, "Cannot open record set" fp_rs.AddNew FP_DumpError strErrorUrl, "Cannot add new record set to the database" Dim arFormFields0(77) Dim arFormDBFields0(77) Dim arFormValues0(77) arFormFields0(0) = "hotelarrmo" arFormDBFields0(0) = "hotelarrmo" arFormValues0(0) = Request("hotelarrmo") arFormFields0(1) = "ccnum" arFormDBFields0(1) = "ccnum" arFormValues0(1) = Request("ccnum") arFormFields0(2) = "pax1address2" arFormDBFields0(2) = "pax1address2" arFormValues0(2) = Request("pax1address2") arFormFields0(3) = "pax1title" arFormDBFields0(3) = "pax1title" arFormValues0(3) = Request("pax1title") arFormFields0(4) = "cruiselineandship" arFormDBFields0(4) = "cruiselineandship" arFormValues0(4) = Request("cruiselineandship") arFormFields0(5) = "airdepartda" arFormDBFields0(5) = "airdepartda" arFormValues0(5) = Request("airdepartda") arFormFields0(6) = "payamt" arFormDBFields0(6) = "payamt" arFormValues0(6) = Request("payamt") arFormFields0(7) = "pax2workareacode" arFormDBFields0(7) = "pax2workareacode" arFormValues0(7) = Request("pax2workareacode") arFormFields0(8) = "pax2ppexpmo" arFormDBFields0(8) = "pax2ppexpmo" arFormValues0(8) = Request("pax2ppexpmo") arFormFields0(9) = "pax2homephone" arFormDBFields0(9) = "pax2homephone" arFormValues0(9) = Request("pax2homephone") arFormFields0(10) = "pax2dobmo" arFormDBFields0(10) = "pax2dobmo" arFormValues0(10) = Request("pax2dobmo") arFormFields0(11) = "pax1dobmo" arFormDBFields0(11) = "pax1dobmo" arFormValues0(11) = Request("pax1dobmo") arFormFields0(12) = "cabin" arFormDBFields0(12) = "cabin" arFormValues0(12) = Request("cabin") arFormFields0(13) = "pax1ppexpyr" arFormDBFields0(13) = "pax1ppexpyr" arFormValues0(13) = Request("pax1ppexpyr") arFormFields0(14) = "pax1passportnum" arFormDBFields0(14) = "pax1passportnum" arFormValues0(14) = Request("pax1passportnum") arFormFields0(15) = "pax1homeareacode" arFormDBFields0(15) = "pax1homeareacode" arFormValues0(15) = Request("pax1homeareacode") arFormFields0(16) = "cruiseid" arFormDBFields0(16) = "cruiseid" arFormValues0(16) = Request("cruiseid") arFormFields0(17) = "cruisedesc" arFormDBFields0(17) = "cruisedesc" arFormValues0(17) = Request("cruisedesc") arFormFields0(18) = "pax2email" arFormDBFields0(18) = "pax2email" arFormValues0(18) = Request("pax2email") arFormFields0(19) = "ccexpyr" arFormDBFields0(19) = "ccexpyr" arFormValues0(19) = Request("ccexpyr") arFormFields0(20) = "airdepartmo" arFormDBFields0(20) = "airdepartmo" arFormValues0(20) = Request("airdepartmo") arFormFields0(21) = "pax1email" arFormDBFields0(21) = "pax1email" arFormValues0(21) = Request("pax1email") arFormFields0(22) = "pax1middle" arFormDBFields0(22) = "pax1middle" arFormValues0(22) = Request("pax1middle") arFormFields0(23) = "comments" arFormDBFields0(23) = "comments" arFormValues0(23) = Request("comments") arFormFields0(24) = "airreturnyr" arFormDBFields0(24) = "airreturnyr" arFormValues0(24) = Request("airreturnyr") arFormFields0(25) = "airdepartstate" arFormDBFields0(25) = "airdepartstate" arFormValues0(25) = Request("airdepartstate") arFormFields0(26) = "hotelnights" arFormDBFields0(26) = "hotelnights" arFormValues0(26) = Request("hotelnights") arFormFields0(27) = "pax1citizen" arFormDBFields0(27) = "pax1citizen" arFormValues0(27) = Request("pax1citizen") arFormFields0(28) = "pax2middle" arFormDBFields0(28) = "pax2middle" arFormValues0(28) = Request("pax2middle") arFormFields0(29) = "insurance" arFormDBFields0(29) = "insurance" arFormValues0(29) = Request("insurance") arFormFields0(30) = "numberofpeople" arFormDBFields0(30) = "numberofpeople" arFormValues0(30) = Request("numberofpeople") arFormFields0(31) = "hotelarryr" arFormDBFields0(31) = "hotelarryr" arFormValues0(31) = Request("hotelarryr") arFormFields0(32) = "pax1ppexpda" arFormDBFields0(32) = "pax1ppexpda" arFormValues0(32) = Request("pax1ppexpda") arFormFields0(33) = "pax1city" arFormDBFields0(33) = "pax1city" arFormValues0(33) = Request("pax1city") arFormFields0(34) = "hotelroompref" arFormDBFields0(34) = "hotelroompref" arFormValues0(34) = Request("hotelroompref") arFormFields0(35) = "pax2passportnum" arFormDBFields0(35) = "pax2passportnum" arFormValues0(35) = Request("pax2passportnum") arFormFields0(36) = "pax2city" arFormDBFields0(36) = "pax2city" arFormValues0(36) = Request("pax2city") arFormFields0(37) = "paymenttype" arFormDBFields0(37) = "paymenttype" arFormValues0(37) = Request("paymenttype") arFormFields0(38) = "pax2ppexpyr" arFormDBFields0(38) = "pax2ppexpyr" arFormValues0(38) = Request("pax2ppexpyr") arFormFields0(39) = "pax2homeareacode" arFormDBFields0(39) = "pax2homeareacode" arFormValues0(39) = Request("pax2homeareacode") arFormFields0(40) = "pax2zip" arFormDBFields0(40) = "pax2zip" arFormValues0(40) = Request("pax2zip") arFormFields0(41) = "pax2dobyr" arFormDBFields0(41) = "pax2dobyr" arFormValues0(41) = Request("pax2dobyr") arFormFields0(42) = "pax2lastname" arFormDBFields0(42) = "pax2lastname" arFormValues0(42) = Request("pax2lastname") arFormFields0(43) = "pax1firstname" arFormDBFields0(43) = "pax1firstname" arFormValues0(43) = Request("pax1firstname") arFormFields0(44) = "dining" arFormDBFields0(44) = "dining" arFormValues0(44) = Request("dining") arFormFields0(45) = "clandship" arFormDBFields0(45) = "clandship4" arFormValues0(45) = Request("clandship") arFormFields0(46) = "airreturnda" arFormDBFields0(46) = "airreturnda" arFormValues0(46) = Request("airreturnda") arFormFields0(47) = "pax1workphone" arFormDBFields0(47) = "pax1workphone" arFormValues0(47) = Request("pax1workphone") arFormFields0(48) = "pax1zip" arFormDBFields0(48) = "pax1zip" arFormValues0(48) = Request("pax1zip") arFormFields0(49) = "pax2state" arFormDBFields0(49) = "pax2state" arFormValues0(49) = Request("pax2state") arFormFields0(50) = "pax1dobyr" arFormDBFields0(50) = "pax1dobyr" arFormValues0(50) = Request("pax1dobyr") arFormFields0(51) = "airdepartcity" arFormDBFields0(51) = "airdepartcity" arFormValues0(51) = Request("airdepartcity") arFormFields0(52) = "hotelsmokingpref" arFormDBFields0(52) = "hotelsmokingpref" arFormValues0(52) = Request("hotelsmokingpref") arFormFields0(53) = "hotelarrda" arFormDBFields0(53) = "hotelarrda" arFormValues0(53) = Request("hotelarrda") arFormFields0(54) = "pax1state" arFormDBFields0(54) = "pax1state" arFormValues0(54) = Request("pax1state") arFormFields0(55) = "pax2address1" arFormDBFields0(55) = "pax2address1" arFormValues0(55) = Request("pax2address1") arFormFields0(56) = "ccname" arFormDBFields0(56) = "ccname" arFormValues0(56) = Request("ccname") arFormFields0(57) = "pax2citizen" arFormDBFields0(57) = "pax2citizen" arFormValues0(57) = Request("pax2citizen") arFormFields0(58) = "pax1ppexpmo" arFormDBFields0(58) = "pax1ppexpmo" arFormValues0(58) = Request("pax1ppexpmo") arFormFields0(59) = "pax1workareacode" arFormDBFields0(59) = "pax1workareacode" arFormValues0(59) = Request("pax1workareacode") arFormFields0(60) = "pax2address2" arFormDBFields0(60) = "pax2address2" arFormValues0(60) = Request("pax2address2") arFormFields0(61) = "pax1lastname" arFormDBFields0(61) = "pax1lastname" arFormValues0(61) = Request("pax1lastname") arFormFields0(62) = "airdepartyr" arFormDBFields0(62) = "airdepartyr" arFormValues0(62) = Request("airdepartyr") arFormFields0(63) = "airoption" arFormDBFields0(63) = "airoption" arFormValues0(63) = Request("airoption") arFormFields0(64) = "pax2ppexpda" arFormDBFields0(64) = "pax2ppexpda" arFormValues0(64) = Request("pax2ppexpda") arFormFields0(65) = "pax1homephone" arFormDBFields0(65) = "pax1homephone" arFormValues0(65) = Request("pax1homephone") arFormFields0(66) = "pax2dobda" arFormDBFields0(66) = "pax2dobda" arFormValues0(66) = Request("pax2dobda") arFormFields0(67) = "departdate" arFormDBFields0(67) = "departdate" arFormValues0(67) = Request("departdate") arFormFields0(68) = "ccexpmo" arFormDBFields0(68) = "ccexpmo" arFormValues0(68) = Request("ccexpmo") arFormFields0(69) = "cruisename" arFormDBFields0(69) = "cruisename4" arFormValues0(69) = Request("cruisename") arFormFields0(70) = "pax1dobda" arFormDBFields0(70) = "pax1dobda" arFormValues0(70) = Request("pax1dobda") arFormFields0(71) = "pax2firstname" arFormDBFields0(71) = "pax2firstname" arFormValues0(71) = Request("pax2firstname") arFormFields0(72) = "pax2workphone" arFormDBFields0(72) = "pax2workphone" arFormValues0(72) = Request("pax2workphone") arFormFields0(73) = "backaddress" arFormDBFields0(73) = "backaddress" arFormValues0(73) = Request("backaddress") arFormFields0(74) = "airreturnmo" arFormDBFields0(74) = "airreturnmo" arFormValues0(74) = Request("airreturnmo") arFormFields0(75) = "pax1address1" arFormDBFields0(75) = "pax1address1" arFormValues0(75) = Request("pax1address1") arFormFields0(76) = "pax2title" arFormDBFields0(76) = "pax2title" arFormValues0(76) = Request("pax2title") FP_SaveFormFields fp_rs, arFormFields0, arFormDBFields0 If Request.ServerVariables("HTTP_USER_AGENT") <> "" Then FP_SaveFieldToDB fp_rs, Request.ServerVariables("HTTP_USER_AGENT"), "Browser_type" End If If Request.ServerVariables("REMOTE_HOST") <> "" Then FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_HOST"), "Remote_computer_name" End If FP_SaveFieldToDB fp_rs, Now, "Timestamp" If Request.ServerVariables("REMOTE_USER") <> "" Then FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_USER"), "User_name" End If fp_rs.Update FP_DumpError strErrorUrl, "Cannot update the database" fp_rs.Close fp_conn.Close Session("FP_SavedFields")=arFormFields0 Session("FP_SavedValues")=arFormValues0 Session.CodePage = Session("FP_OldCodePage") Session.LCID = Session("FP_OldLCID") Response.Redirect "bookingconfirmation.asp" End If End If Session.CodePage = Session("FP_OldCodePage") Session.LCID = Session("FP_OldLCID") %> Book Steve's Group

                          ALLCRUISING.COM                        ~~~~~~~~~~~~~~~~~

                            800-979-8687

 
   

 

 

 

Need Help?

 

800-979-8687

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Need Help?

 

800-979-8687

 

 

 

 

 

 

 

 

 

 

 

 

 

Need Help?

 

800-979-8687

 

 

 Costa

7-Day Eastern Caribbean Cruise 

Costa Mediterannea 

Departing from Ft. Lauderdale

Feb. 27th - Mar. 6th, 2005                     

 

                                                

Book On-Line Now or Call to Book by Phone

  800-979-8687

Field titles in BLUE are required fields

             

Select Stateroom                                             Category       Fare          Taxes      Total

   Inside Cabin         2-3      $699.00    $59.94     $758.94

   Ocean View            4-5        $749.00    $59.94     $808.94

   Balcony               6         $799.00    $59.94      $858.94

   Balcony                7-8      $899.00     $59.94    $958.94

 

                      *  Cabin has partially obstructed view.

 

Prices are per person, based on double occupancy

Rate for 3rd or 4th person in cabin is $549.00 plus $59.94 Tax, subject to availability

Please call to book 3rd or 4th person in cabin.

Additional fare applies to 1 person in a cabin.  Please call for pricing.

Number of people in cabin:                                 

                        Dining Option:             

              Optional Insurance:            

Optional Insurance is $99.00 per person  

                                        

     Enter Names exactly as they appear on your driver's license or passport.

 

Passenger 1  

 

Passenger 2

Title  

 

    
First Name        
Middle Initial        
Last Name        
Date of Birth      MM   DD   YYYY

   

    MM   DD    YYYY

 

Address        
     
City        
State/Province        
Zip Code  

 

 

 

Home Phone  

     

Work Phone  

     

Passport #  

     

Exp.  Date  

  MM   DD    YYYY

     

 

    MM   DD    YYYY

 

U.S. Citizen  

     

 

Email  

 

     
         

 

  Payment Information

 

 

            

 Pay by:                

Check Payment:  If paying by check,  we will hold your reservation for 10 days to allow time for receipt of your check by mail.  Mail checks to:  Brunswick Tours, Inc., P.O. Box 10861, Lancaster, PA  17605 

 

 Payment Amount:            

 

                                            Exp. Date:

         Credit Card #             MM  YYYY

 

Deposit Requirement:  A deposit of $100.00 per person is required to reserve your cabin.  You may make payments throughout the year as you wish.  A total deposit amount of $250 must be paid by October 1st, 2004. Final Payment is due Dec. 1, 2004.     

 

       

     Name on Card: 

Cancellation Terms:  You may cancel your cruise reservation at any time prior to September 1st, 2004 and receive a full refund of your deposit amount.  A penalty may be incurred for cancellations received on or after September 1st, 2004.  To cancel your reservation, please call Brunswick Tours, Inc.  800-979-8687. 

 

 Optional Hotel Reservations  
                       MM    DD    YYYY

      Arrive Date:      

Number Nights: 

      Room Pref:   

 Smoking Pref:    

 

If you specify hotel reservations, we will contact you with the hotels available and the pricing.

 

If you request hotel reservations, your credit card will be used to confirm your reservation but will not be billed until your arrival.  If you are paying by check, we will hold your hotel reservation for you until your final payment is made.

 

  Optional Air Reservations  
Air Option   No Air 

   Cruise Line Air

   Please Quote Lowest Cost Air  

 

Departure:  

                     City                      State

 

 

                          MM  DD  YYYY

Departure Date:  

      Return Date:  

 

If you request either Cruise Line Air, or Lowest Cost Air, we will provide you with a quote for the cost of your Airfare before making your air reservation.

 

Cruise Line Air includes transfers from the airport to the cruise terminal but will be at a significantly higher rate than Lowest Cost Air.

 

If you choose lowest cost air, we monitor air rates for you to find you the best rate.

 

For more information, click HERE.

 

 

 

Questions / Comments / Special Needs

 

 

Copyright © 2003 Brunswick Tours, Inc.