<%@ Language=VBScript %> <% Response.Status="301 Moved Permanently" Response.AddHeader "Location", "http://www.conference.navcanada.ca/reservations.php" response.end %> <% META_DESCRIPTION="" META_KEYWORDS="Request for Proposal" META_TITLE = "Request for Proposal" PAGE_TITLE = "Request for Proposal" PAGE_COLOR = COLOR_GREEN PAGE_KEY = "" SIDER_HTML = "" %> <% if CInt(Request.Form("hdnSubmit")) = 1 then dim strContent strContent = CreateHTMLEmailTemplate("EN") strContent = Replace(strContent,"%%Name%%",server.HTMLEncode(Request.Form("name"))) strContent = Replace(strContent,"%%CompanyName%%",server.HTMLEncode(Request.Form("companyname"))) strContent = Replace(strContent,"%%Address%%",server.HTMLEncode(Request.Form("address"))) strContent = Replace(strContent,"%%City%%",server.HTMLEncode(Request.Form("city"))) strContent = Replace(strContent,"%%Prov%%",server.HTMLEncode(Request.Form("provincestate"))) strContent = Replace(strContent,"%%Country%%",server.HTMLEncode(Request.Form("country"))) strContent = Replace(strContent,"%%PostalCode%%",server.HTMLEncode(Request.Form("postalzip"))) strContent = Replace(strContent,"%%Tel%%",server.HTMLEncode(Request.Form("tel"))) strContent = Replace(strContent,"%%Fax%%",server.HTMLEncode(Request.Form("fax"))) strContent = Replace(strContent,"%%Email%%",server.HTMLEncode(Request.Form("email"))) strContent = Replace(strContent,"%%Title%%",server.HTMLEncode(Request.Form("title"))) strContent = Replace(strContent,"%%Attendees%%",server.HTMLEncode(Request.Form("attendees"))) strContent = Replace(strContent,"%%Arrival%%",server.HTMLEncode(Request.Form("arrival"))) strContent = Replace(strContent,"%%Departure%%",server.HTMLEncode(Request.Form("departure"))) strContent = Replace(strContent,"%%Flexible%%",server.HTMLEncode(Request.Form("flexible"))) strContent = Replace(strContent,"%%Single%%",server.HTMLEncode(Request.Form("single"))) strContent = Replace(strContent,"%%Double%%",server.HTMLEncode(Request.Form("double"))) strContent = Replace(strContent,"%%Suites%%",server.HTMLEncode(Request.Form("suites"))) strContent = Replace(strContent,"%%MeetingRoom%%",server.HTMLEncode(Request.Form("mainmeetingroom"))) if Trim(Request.Form("peoplemeet")) = "" then strContent = Replace(strContent,"%%People%%","0") else strContent = Replace(strContent,"%%People%%",server.HTMLEncode(Request.Form("peoplemeet"))) end if if UCase(Request.Form("mainmeetingroom")) = "NO" then strContent = Replace(strContent,"%%MeetingType%%","N/A") else strContent = Replace(strContent,"%%MeetingType%%",server.HTMLEncode(Request.Form("mainmeetroomtype"))) end if if Trim(Request.Form("mainstartdate")) = "" then strContent = Replace(strContent,"%%MeetingStart%%","N/A") else strContent = Replace(strContent,"%%MeetingStart%%",server.HTMLEncode(Request.Form("mainstartdate"))) end if if Trim(Request.Form("mainenddate")) = "" then strContent = Replace(strContent,"%%MeetingEnd%%","N/A") else strContent = Replace(strContent,"%%MeetingEnd%%",server.HTMLEncode(Request.Form("mainenddate"))) end if if Trim(Request.Form("mainenddate")) = "" then strContent = Replace(strContent,"%%DepartureDate%%","N/A") else strContent = Replace(strContent,"%%DepartureDate%%",server.HTMLEncode(Request.Form("maindeparture"))) end if strContent = Replace(strContent,"%%Breakouts%%",server.HTMLEncode(Request.Form("breakoutroom"))) if Trim(Request.Form("numbreakoutrooms")) = "" then strContent = Replace(strContent,"%%BreakoutNum%%","0") else strContent = Replace(strContent,"%%BreakoutNum%%",server.HTMLEncode(Request.Form("numbreakoutrooms"))) end if if UCase(Request.Form("breakoutroom")) = "NO" then strContent = Replace(strContent,"%%BreakoutType%%","N/A") else strContent = Replace(strContent,"%%BreakoutType%%",server.HTMLEncode(Request.Form("breakoutroomtype"))) end if if Trim(Request.Form("breakoutstartdate")) = "" then strContent = Replace(strContent,"%%BreakoutStart%%","N/A") else strContent = Replace(strContent,"%%BreakoutStart%%",server.HTMLEncode(Request.Form("breakoutstartdate"))) end if if Trim(Request.Form("breakoutenddate")) = "" then strContent = Replace(strContent,"%%BreakoutEnd%%","N/A") else strContent = Replace(strContent,"%%BreakoutEnd%%",server.HTMLEncode(Request.Form("breakoutenddate"))) end if if Trim(Request.Form("avgpeoplebreakout")) = "" then strContent = Replace(strContent,"%%BreakoutAvg%%","N/A") else strContent = Replace(strContent,"%%BreakoutAvg%%",server.HTMLEncode(Request.Form("avgpeoplebreakout"))) end if if Trim(Request.Form("needs")) = "" then strContent = Replace(strContent,"%%BreakoutNeeds%%","N/A") else strContent = Replace(strContent,"%%BreakoutNeeds%%",server.HTMLEncode(Request.Form("needs"))) end if strContent = Replace(strContent,"%%CheckFood%%",server.HTMLEncode(Request.Form("foodandbev"))) strContent = Replace(strContent,"%%OtherInfo%%",server.HTMLEncode(Request.Form("foodneeds"))) 'Call Mail2000(TO_ADDRESS, Request.Form("email"), "Request for Proposal", strContent) Call SendMail(TO_ADDRESS, Request.Form("email"), "Request for Proposal", strContent) Response.Redirect "confirm.asp" end if %>

Request for Proposal

1. Your Contact Information

Name:

Company Name:

Address:

City:

Province/State:

Country:

Postal Code/Zip Code

Tel #:

Fax #:

Email Address:

2. Meeting Information

Title of Conference / Training:

Number of Attendees:

Arrival Date (mm/dd/yyyy):

Departure Date (mm/dd/yyyy):

Are your dates flexible?
Yes    No

3. Sleeping Room Requirements

Please enter the maximum number of each type of room you will need. Enter 0 if you need none of a particular type of room.
Single Rooms:    Double Rooms:    Suites:

4. Meeting Room Needs

Do you need a main meeting room?
Yes    No

Number of People:

Setup Type:

Start Date (mm/dd/yyyy):    End Date (mm/dd/yyyy):

Departure Date (mm/dd/yyyy):

Do you need any breakout rooms?
Yes    No

Number of rooms:

Setup Type:

Start Date (mm/dd/yyyy):    End Date (mm/dd/yyyy):

Average Number of People:

Describe any special needs for these meeting rooms, such as audio-visual requirements:

5. Food and Beverage Details

Check all Food and Beverage requirements that may apply.
Breakfast    Lunch    Dinner    Reception

Is there any other information you'd like to provide about your Food & Beverage functions?