<% ' 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(56) Dim arFormDBFields0(56) Dim arFormValues0(56) arFormFields0(0) = "diningoption" arFormDBFields0(0) = "diningoption" arFormValues0(0) = Request("diningoption") 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) = "hoteloption" arFormDBFields0(5) = "hoteloption" arFormValues0(5) = Request("hoteloption") arFormFields0(6) = "pax1paymenttype" arFormDBFields0(6) = "paymenttype" arFormValues0(6) = Request("pax1paymenttype") arFormFields0(7) = "airdepartda" arFormDBFields0(7) = "airdepartda" arFormValues0(7) = Request("airdepartda") arFormFields0(8) = "hotelnumbernights" arFormDBFields0(8) = "hotelnights" arFormValues0(8) = Request("hotelnumbernights") arFormFields0(9) = "hotelarrivemo" arFormDBFields0(9) = "hotelarrmo" arFormValues0(9) = Request("hotelarrivemo") arFormFields0(10) = "pax1payamt" arFormDBFields0(10) = "payamt" arFormValues0(10) = Request("pax1payamt") arFormFields0(11) = "roommate1" arFormDBFields0(11) = "roommate1" arFormValues0(11) = Request("roommate1") arFormFields0(12) = "roommate2" arFormDBFields0(12) = "roommate2" arFormValues0(12) = Request("roommate2") arFormFields0(13) = "pax1dobmo" arFormDBFields0(13) = "pax1dobmo" arFormValues0(13) = Request("pax1dobmo") arFormFields0(14) = "cabin" arFormDBFields0(14) = "cabin" arFormValues0(14) = Request("cabin") arFormFields0(15) = "roommate3" arFormDBFields0(15) = "roommate3" arFormValues0(15) = Request("roommate3") arFormFields0(16) = "pax1ppexpyr" arFormDBFields0(16) = "pax1ppexpyr" arFormValues0(16) = Request("pax1ppexpyr") arFormFields0(17) = "pax1homeareacode" arFormDBFields0(17) = "pax1homeareacode" arFormValues0(17) = Request("pax1homeareacode") arFormFields0(18) = "cruiseid" arFormDBFields0(18) = "cruiseid" arFormValues0(18) = Request("cruiseid") arFormFields0(19) = "cruisedesc" arFormDBFields0(19) = "cruisedesc" arFormValues0(19) = Request("cruisedesc") arFormFields0(20) = "travelinsurance" arFormDBFields0(20) = "travelinsurance" arFormValues0(20) = Request("travelinsurance") arFormFields0(21) = "ccexpyr" arFormDBFields0(21) = "ccexpyr" arFormValues0(21) = Request("ccexpyr") arFormFields0(22) = "airdepartmo" arFormDBFields0(22) = "airdepartmo" arFormValues0(22) = Request("airdepartmo") arFormFields0(23) = "pax1email" arFormDBFields0(23) = "pax1email" arFormValues0(23) = Request("pax1email") arFormFields0(24) = "comments" arFormDBFields0(24) = "comments" arFormValues0(24) = Request("comments") arFormFields0(25) = "airreturnyr" arFormDBFields0(25) = "airreturnyr" arFormValues0(25) = Request("airreturnyr") arFormFields0(26) = "airdepartstate" arFormDBFields0(26) = "airdepartstate" arFormValues0(26) = Request("airdepartstate") arFormFields0(27) = "numberincabin" arFormDBFields0(27) = "numberincabin" arFormValues0(27) = Request("numberincabin") arFormFields0(28) = "pax1ppexpda" arFormDBFields0(28) = "pax1ppexpda" arFormValues0(28) = Request("pax1ppexpda") arFormFields0(29) = "pax1city" arFormDBFields0(29) = "pax1city" arFormValues0(29) = Request("pax1city") arFormFields0(30) = "pax1middleinit" arFormDBFields0(30) = "pax1middleinit" arFormValues0(30) = Request("pax1middleinit") arFormFields0(31) = "hotelroompref" arFormDBFields0(31) = "hotelroompref" arFormValues0(31) = Request("hotelroompref") arFormFields0(32) = "hotelarriveyr" arFormDBFields0(32) = "hotelarryr" arFormValues0(32) = Request("hotelarriveyr") arFormFields0(33) = "pax1firstname" arFormDBFields0(33) = "pax1firstname" arFormValues0(33) = Request("pax1firstname") arFormFields0(34) = "airreturnda" arFormDBFields0(34) = "airreturnda" arFormValues0(34) = Request("airreturnda") arFormFields0(35) = "pax1workphone" arFormDBFields0(35) = "pax1workphone" arFormValues0(35) = Request("pax1workphone") arFormFields0(36) = "pax1zip" arFormDBFields0(36) = "pax1zip" arFormValues0(36) = Request("pax1zip") arFormFields0(37) = "pax1dobyr" arFormDBFields0(37) = "pax1dobyr" arFormValues0(37) = Request("pax1dobyr") arFormFields0(38) = "airdepartcity" arFormDBFields0(38) = "airdepartcity" arFormValues0(38) = Request("airdepartcity") arFormFields0(39) = "hotelsmokingpref" arFormDBFields0(39) = "hotelsmokingpref" arFormValues0(39) = Request("hotelsmokingpref") arFormFields0(40) = "pax1state" arFormDBFields0(40) = "pax1state" arFormValues0(40) = Request("pax1state") arFormFields0(41) = "ccname" arFormDBFields0(41) = "ccname" arFormValues0(41) = Request("ccname") arFormFields0(42) = "pax1ppexpmo" arFormDBFields0(42) = "pax1ppexpmo" arFormValues0(42) = Request("pax1ppexpmo") arFormFields0(43) = "pax1workareacode" arFormDBFields0(43) = "pax1workareacode" arFormValues0(43) = Request("pax1workareacode") arFormFields0(44) = "pax1lastname" arFormDBFields0(44) = "pax1lastname" arFormValues0(44) = Request("pax1lastname") arFormFields0(45) = "hotelarriveda" arFormDBFields0(45) = "hotelarrda" arFormValues0(45) = Request("hotelarriveda") arFormFields0(46) = "airdepartyr" arFormDBFields0(46) = "airdepartyr" arFormValues0(46) = Request("airdepartyr") arFormFields0(47) = "airoption" arFormDBFields0(47) = "airoption" arFormValues0(47) = Request("airoption") arFormFields0(48) = "pax1homephone" arFormDBFields0(48) = "pax1homephone" arFormValues0(48) = Request("pax1homephone") arFormFields0(49) = "departdate" arFormDBFields0(49) = "departdate" arFormValues0(49) = Request("departdate") arFormFields0(50) = "ccexpmo" arFormDBFields0(50) = "ccexpmo" arFormValues0(50) = Request("ccexpmo") arFormFields0(51) = "pax1dobda" arFormDBFields0(51) = "pax1dobda" arFormValues0(51) = Request("pax1dobda") arFormFields0(52) = "pax1ppnum" arFormDBFields0(52) = "pax1ppnum" arFormValues0(52) = Request("pax1ppnum") arFormFields0(53) = "backaddress" arFormDBFields0(53) = "backaddress" arFormValues0(53) = Request("backaddress") arFormFields0(54) = "airreturnmo" arFormDBFields0(54) = "airreturnmo" arFormValues0(54) = Request("airreturnmo") arFormFields0(55) = "pax1address1" arFormDBFields0(55) = "pax1address1" arFormValues0(55) = Request("pax1address1") 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 Country Line Dance Cruise

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

                            800-979-8687
 
   

 

 

 

 

Need Help?

 

800-979-8687

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Need Help?

 

800-979-8687

 

 

 

 

 

 

 

 

 

 

 

 

 

Need Help?

 

800-979-8687

 

 

 

7-Day Western Caribbean

Carnival Victory

Departing from Miami

March 11th - 18th, 2007

 

                                                

Book On-Line Now or Call to Book by Phone

  800-979-8687

 

PLEASE NOTE: 

The on-line booking form is set up to enter ONE PASSENGER at a time.  This has been done to allow two passengers in a cabin to book using separate credit cards, and to allow people sharing a cabin to book separately. 

Stateroom Information

 

Select Stateroom  
Stateroom Per Person

Double Occupancy
  Inside $669
  Ocean View $829
  Balcony $979

 

# of People in Cabin       
Roommate Name(s)  
Dining Option      
Travel Insurance     If Travel Insurance is requested, it must be purchased by everyone in the cabin.

                                               Travel Insurance is $99 per person. 

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

    
Address Line 1  
Address Line 2  
City  
State / Province  
Zip / Postal Code  
Home Telephone    
Work Telephone  
Email Address  
Passport Number  
Passport Exp. Date   MM    DD    YYYY

 

 

Payment Information
Payment Type    If paying by check, we will hold your reservation for 10 days to allow time to receive check.
Payment Amount                      A deposit of $250 per person is required to confirm your reservation.

                                     Final Payment is due by November 1st, 2006

Credit Card Number  
Credit Card Exp. Date   MM  YYYY

 

Name on Credit Card  
 

Optional Hotel Reservations
Hotel Reservations     
Arrive Date   MM    DD   YYYY 

 

Number of Nights  
Room Preference  
Smoking Preference  
 

Optional Air Reservations
Air Reservations     We will contact you with pricing before making your air reservations.
Departure City  
Departure State  
Departure Date  MM    DD    YYYY

 

Return Date  
 

Questions / Comments / Special Needs
           
 

Submit Your Reservation

 

 

 
Copyright Brunswick Tours, Inc. 2004