The stunning Savoy Hotel enjoys a tranquil position right on the spectacular White Knight beach in the beautiful area of Sharks Bay. It has an atmosphere of gracious sophistication which is matched by its impeccable service and stylish design. Tropical foliage and waterfalls adorn the superb lagoon-style pool area that offers quiet corners for relaxation in the sun and a garden health spa inviting guests to indulge in alfresco massages.
<% If IsAvailable = "N" Then %>
Holidays to The Savoy Hotel 5* are not currently available to book online, to check the latest availability, or for alternative holidays to Sharm El Sheikh, please call <%=PhoneNo%>.
<% Else %>
<% If (Request.ServerVariables("QUERY_STRING") <> "") Or (Request.ServerVariables("REQUEST_METHOD") = "POST") Then %>
|
|
<%
RowLimit = 10
SQL = "SELECT MIN(CAST(Adult_Price AS UNSIGNED)) AS Price, Booking_URL AS URL, Accom_Code AS Tour_Code, Hotel_Name, Country AS Holiday_Country, Resort AS Holiday_Resort, Star_Rating, Board, OB_Depdate AS Depart_Date, Duration, OB_Departure_Airport AS Depart_Airport_Code, Prio " _
& "FROM Libra_Lates.AVLABL " _
& "INNER JOIN Libra_Lates.Airport_Prio " _
& "ON Libra_Lates.AVLABL.OB_Departure_Airport = Libra_Lates.Airport_Prio.Airport_Code " _
& "WHERE (Accom_Code = '11256') " _
& " AND (CAST(CONCAT(SUBSTRING(OB_Depdate, 7, 4), '-', SUBSTRING(OB_Depdate, 4, 2), '-', SUBSTRING(OB_Depdate, 1, 2)) AS DATETIME) > CAST('" & DatePart("yyyy", DateAdd("d", 1, Now())) & "-" & Right("00" & DatePart("m", DateAdd("d", -7, Now())), 2) & "-" & Right("00" & DatePart("d", DateAdd("d", -7, Now())), 2) & "' AS DATETIME)) "
If Request.Form("Depart_Date") <> "" Then
SQL = SQL & " AND (CAST(CONCAT(SUBSTRING(OB_Depdate, 7, 4), '-', SUBSTRING(OB_Depdate, 4, 2), '-', SUBSTRING(OB_Depdate, 1, 2)) AS DATETIME) > CAST('" & DatePart("yyyy", DateAdd("d", -7, CDate(Request.Form("Depart_Date")))) & "-" & Right("00" & DatePart("m", DateAdd("d", -7, CDate(Request.Form("Depart_Date")))), 2) & "-" & Right("00" & DatePart("d", DateAdd("d", -7, CDate(Request.Form("Depart_Date")))), 2) & "' AS DATETIME)) " _
& " AND (CAST(CONCAT(SUBSTRING(OB_Depdate, 7, 4), '-', SUBSTRING(OB_Depdate, 4, 2), '-', SUBSTRING(OB_Depdate, 1, 2)) AS DATETIME) < CAST('" & DatePart("yyyy", DateAdd("d", 7, CDate(Request.Form("Depart_Date")))) & "-" & Right("00" & DatePart("m", DateAdd("d", 7, CDate(Request.Form("Depart_Date")))), 2) & "-" & Right("00" & DatePart("d", DateAdd("d", 7, CDate(Request.Form("Depart_Date")))), 2) & "' AS DATETIME)) "
ElseIf (Request.QueryString("Depart_Month") <> "") And (Request.QueryString("Depart_Year") <> "") Then
SQL = SQL & " AND (SUBSTRING(OB_Depdate, 7, 4) = '" & SafeSQL(Request.QueryString("Depart_Year")) & "') AND (SUBSTRING(OB_Depdate, 4, 2) = '" & SafeSQL(Right("00" & Request.QueryString("Depart_Month"), 2)) & "') "
Else
If DisplaySeason = "Summer" Then
SQL = SQL & "AND (CAST(CONCAT(SUBSTRING(OB_Depdate, 7, 4), '-', SUBSTRING(OB_Depdate, 4, 2), '-', SUBSTRING(OB_Depdate, 1, 2)) AS DATETIME) > CAST('" & Season2 & "' AS DATETIME)) "
Else ' If (Request.QueryString("Season") = "Winter") Or (Session("CurrentSeason") = "Winter") Then
SQL = SQL & "AND (CAST(CONCAT(SUBSTRING(OB_Depdate, 7, 4), '-', SUBSTRING(OB_Depdate, 4, 2), '-', SUBSTRING(OB_Depdate, 1, 2)) AS DATETIME) < CAST('" & Season2 & "' AS DATETIME)) "
End If
End If
If Request.Form("Depart_Airport_Code") <> "" Then
SQL = SQL & " AND (OB_Departure_Airport = '" & SafeSQL(Request.Form("Depart_Airport_Code")) & "') "
ElseIf Request.QueryString("Depart_Airport_Code") <> "" Then
SQL = SQL & " AND (OB_Departure_Airport = '" & SafeSQL(Request.QueryString("Depart_Airport_Code")) & "') "
RowLimit = 999
End If
If Request.Form("Board") <> "" Then SQL = SQL & " AND (Board = '" & SafeSQL(Request.Form("Board")) & "') "
If Request.Form("Duration") <> "" Then SQL = SQL & " AND (Duration = '" & SafeSQL(Request.Form("Duration")) & "') "
SQL = SQL & "GROUP BY OB_Depdate, Duration, OB_Departure_Airport " _
& "ORDER BY Prio, (CAST(CONCAT(SUBSTRING(OB_Depdate, 7, 4), '-', SUBSTRING(OB_Depdate, 4, 2), '-', SUBSTRING(OB_Depdate, 1, 2)) AS DATETIME)), (CAST(Adult_Price AS UNSIGNED))"
Set RS = Conn.Execute(SQL)
If RS.EOF Then
%>
| please call <%=PhoneNo%> for special offers to The Savoy Hotel 5* |
<% Else %>
| Departures from
<% For i = 0 To UBound(Airports) %>
<% If Trim(Airports(i) & " ") <> "" Then %>
• <%=AirportName(Airports(i))%>
<% End If %>
<% Next %>
|
<%
i = 0
Do While Not RS.EOF
ThisAirport = Trim(RS("Depart_Airport_Code"))
ThisMonth = DatePart("m", CDate(RS("Depart_Date")))
ThisURL = Trim(RS("URL"))
ThisURL = Replace(ThisURL, "holidays1.asp", "packages1.asp")
ThisURL = Replace(ThisURL, "&NoAdults=", "&NumRooms=1&NoAdults_1=")
ThisURL = Replace(ThisURL, "&NoChildren=", "&NoChildren_1=")
ThisURL = Replace(ThisURL, "&NoInfants=", "&NoInfants_1=")
ThisURL = Replace(ThisURL, "&Resort=&", "&Resort=ESH&")
ThisURL = Replace(ThisURL, "&", "&")
%>
<% If StrComp(ThisAirport, LastAirport, vbTextCompare) <> 0 Then %>
|
| Departures from <%=AirportName(Trim(RS("Depart_Airport_Code")))%> |
<% i = 0 %>
<% End If %>
<% If (StrComp(ThisMonth, LastMonth, vbTextCompare) <> 0) And (Request.QueryString("Depart_Airport_Code") <> "") Then %>
| |
| <%=MonthName(ThisMonth)%> |
<% End If %>
<% If i < RowLimit Then %>
>
" class="Text"><%=FormatDate(RS("Depart_Date"), "Y")%> |
<%=StarRatingImage(RS("Star_Rating"))%> |
<%=BoardBasis(RS("Board"))%> |
<%=Trim(RS("Duration"))%> nights |
" class="Text">fr
£ <%=FormatNumber((CDbl(RS("Price")) / 100), 0)%>  |
<% End If %>
<% If i = RowLimit Then %>
">
| " class="Headline" onClick="document.getElementById('More_<%=Trim(RS("Depart_Airport_Code"))%>').style.display='block';document.getElementById('MoreLink_<%=Trim(RS("Depart_Airport_Code"))%>').style.display='none';">Show more holidays from <%=AirportName(Trim(RS("Depart_Airport_Code")))%> |
<% End If %>
<%
LastAirport = ThisAirport
LastMonth = ThisMonth
i = i + 1
RS.MoveNext
Loop
End If
Set RS = Nothing
%>
<% Else %>
<%
SQL = "SELECT DISTINCT SUBSTRING(OB_Depdate, 4, 2) AS Month, SUBSTRING(OB_Depdate, 7, 4) AS Year " _
& "FROM Libra_Lates.AVLABL " _
& "WHERE (Country NOT LIKE 'holiday country') AND (Accom_Code = '11256') " _
& "GROUP BY SUBSTRING(OB_Depdate, 4, 2), SUBSTRING(OB_Depdate, 7, 4) " _
& "ORDER BY CAST(CONCAT(SUBSTRING(OB_Depdate, 7, 4), SUBSTRING(OB_Depdate, 4, 2)) AS UNSIGNED)"
Set RS = Conn.Execute(SQL)
If Not RS.EOF Then
%>
To find your holiday to The Savoy Hotel 5*, click on price below or use the search box on the right of the page.
<%
Months = RS.GetRows()
ReDim Cols(UBound(Months, 2))
SQL = "SELECT MIN(CAST(Adult_Price AS UNSIGNED)) AS Price, Country, Area, Resort, SUBSTRING(OB_Depdate, 4, 2) AS Month, SUBSTRING(OB_Depdate, 7, 4) AS Year, Airport_Prio.Airport_Code " _
& "FROM Libra_Lates.AVLABL " _
& "INNER JOIN Libra_Lates.Board_Prio ON Libra_Lates.AVLABL.Board = Libra_Lates.Board_Prio.Board_Code " _
& "INNER JOIN Libra_Lates.Airport_Prio ON Libra_Lates.AVLABL.OB_Departure_Airport = Libra_Lates.Airport_Prio.Airport_Code " _
& "WHERE (Country NOT LIKE 'holiday country') AND " _
& "(CAST(CONCAT('20', SUBSTRING(OB_Depdate, 7, 2), '-', SUBSTRING(OB_Depdate, 4, 2), '-', SUBSTRING(OB_Depdate, 1, 2)) AS DATETIME)) > (CAST('" & DatePart("yyyy", DateAdd("d", 1, Now())) & "-" & Right("00" & DatePart("m", DateAdd("d", 1, Now())), 2) & "-" & Right("00" & DatePart("d", DateAdd("d", 1, Now())), 2) & "' AS DATETIME)) AND " _
& "(Board_Prio.Prio > 1) AND (Board_Prio.Prio < 7) AND (Accom_Code = '11256') " _
& "GROUP BY Airport_Prio.Airport_Code, SUBSTRING(OB_Depdate, 4, 2) " _
& "ORDER BY Airport_Prio.Prio, CAST(CONCAT('20', SUBSTRING(OB_Depdate, 7, 4), SUBSTRING(OB_Depdate, 4, 2)) AS UNSIGNED), MIN(CAST(Adult_Price AS UNSIGNED))"
Set RS = Server.CreateObject("ADODB.Recordset")
RS.CursorLocation = 3 ' adUseClient
RS.Open SQL, Conn
i = 0
k = 0
If RS.EOF Then
%>
| please call <%=PhoneNo%> for our latest holiday deals. |
<% Else %>
| |
<% For j = 0 To UBound(Months, 2) %>
<%=MonthName(CDbl(Months(0, j)), True)%> |
<% Next %>
<%
Do While Not RS.EOF
ThisAirport = Trim(RS("Airport_Code"))
If StrComp(ThisAirport, LastAirport, vbTextCompare) <> 0 Then
i = 0
k = k + 1
End If
RS.MoveNext
If Not RS.EOF Then
NextAirport = Trim(RS("Airport_Code"))
Else
NextAirport = ""
End If
RS.MovePrevious
'CurCol = j
'CurCol = CDbl(RS("Month")) - Month(Now()) : If CurCol < 0 Then CurCol = CurCol + 11
CurCol = 0
For j = 0 To UBound(Months, 2)
If (CDbl(Months(0, j)) = CDbl(RS("Month"))) And (CDbl(Months(1, j)) = CDbl(RS("Year"))) Then
CurCol = j
Exit For
End If
Next
Cols(CurCol) = RS("Month") & ":" & RS("Year") & ":" & Trim(RS("Price"))
If StrComp(ThisAirport, NextAirport, vbTextCompare) <> 0 Then
%>
>
<%=AirportName(ThisAirport)%> |
<% For j = 0 To UBound(Cols) %>
<%
If Trim(Cols(j) & " ") <> "" Then
TempArr = Split(Cols(j), ":", -1, 1)
%>
from <%=AirportName(ThisAirport)%>">£<%=FormatNumber((CDbl(TempArr(2)) / 100), 0)%> |
<% Else %>
--- |
<% End If %>
<% Next %>
<% ReDim Cols(UBound(Months, 2)) %>
<% i = i + 1 %>
<% End If %>
<%
LastAirport = ThisAirport
RS.MoveNext
Loop
End If
Set RS = Nothing
%>
<% End If %>
<% End If %>
<% End If %>
Location
Overlooking Tiran Island and located in the Sharks bay area of Sharm el Sheikh.
Facilities
· 24hr Reception · 3 Swimming Pools (2 heated in winter months) · loodlit Tennis Courts* · Beach Volleyball · Beach Soccer · Table Tennis* · Gym* · Aerobics* · Spa* · Sauna · Massage* · Beauty Treatments* · Steam Bath* · Money Exchange · Cash Machine · Laundry/Dry Cleaning* · Internet Café · Mini Market · Small International Library · Souvenir Shop · Within the grounds of the Savoy Hotel, there is a wide array of Bars, Lounges and Restaurants. Come and savour a lavish Italian meal or enjoy cocktails at the disco which goes on until the early hours of the morning.
Children Facilities
· 2 Children's Pool · Kid's Club (4-12 yrs) · Highchairs & Cots.
Entertainment
International animation team for daily day & evening activity programme.
Accommodation
2/3 beds, All rooms come with an en suite bathroom, individually controllable Air conditioning and heating, Satellite/ Cable TV, Mini Bar, Safety Deposit Box, Telephone, Hairdryer in Twin/Double bed Garden View Room. (The Royal Savoy Suite, a 'Hotel within a Hotel', is the Savoy's Exclusive 'Club' wing. It offers guests all the regular privileges of the prestigious Savoy Sharm El Sheikh, with some impressiveextra features.There is throughout an atmosphere of privacy and luxury with impeccable service, elegantly designed, the suites are roomy and spacious, each offering unrivalled pool views and Sea Views over Tiran Island. Marbled bathrooms, sumptuous Queen/king size beds and expansive balconies are just a few hidden secrets. A stay in one of our suites will provide you with a whole new Savoy experience.)
Board Basis
Prices are based on 2 adults sharing a Garden View Room on Bed & Breakfast basis.
Supplements
Half Board, Full Board, All Inclusive, Pool View, Sea View, Royal Savoy, Diplomatic Suite, Royal Savoy Suite, Single.
Honeymoon
Fruit basket, room upgrade (subject to availability)
Winter Variation
Christmas & New Year's Eve gala dinners are included in the price (Please note: That for Christmas/New Years Eve & Christmas/New Years Day the dress code is Tuxedo's for men and evening gowns for ladies.)
All Inclusive
Available at a Supplement:· Breakfast, Lunch & Dinner (Buffet Style)· Gala dinner and à la carte restaurants - reservations required· Soft drinks, Juices, Local and/or International drinks including:Wine, Draught Beer and selected Spirits during Meals· Snacks from the Pool Bar· Ice Cream by the Scoop· Afternoon Tea· Soft Drinks, Juices, Local and/or International drinksincluding: Wine, Draught Beer, selected Spirits, Cocktails &Hot Drinks from the Bar (11:00 - 24:00)· Daytime Activities (25 Minute Anti Stress Massage, Jacuzzi,Steam Room, Sauna (1hr per Day) Free Laundry (7 Pieces perstay), One free Aquasport or Ice skating, One free hour perstay including table tennis, tennis court, billiards or bowling· Evening Entertainment
No of Rooms
463
No of Floors
3
No of Lifts
3
Official Rating
5*
Our Rating
LLLLL
Additional Information
* Payable Locally SOHO Square is a new complex featuring dining, shopping and entertainment options conveniently located next to the Savoy. Please note that not all facilities may be open at the time of your visit. · Approximately 50 shops · Casino · Zen Restaurant, Featuring Malaysian and Northern Chinese Cuisine · Bombay Indian Restaurant · Saffron Middle Eastern Restaurant · Kalina Restaurant, Featuring Traditional Ukrainian Cuisine (opening soon) · Ice Skating Rink · 'Culture' show - a panoramic multimedia experience visiting key moments in the history of Egypt · Ice Bar · Pangaea Night Club · 'English House', featuring Sushi Bar, Steak House, Bowling and Pub · Kids' Arcade
Hotels in Sharm El Sheikh
The Savoy Hotel 5*,
Sofitel Sharm Hotel 5*,
Sierra Hotel 5*,
Ritz Carlton Hotel 5*,
Renaissance Golden View Beach Hotel 5*,
Novotel Palms Hotel 5*,
Novotel Beach Sharm Hotel 5*,
Maritim Jolieville Golf & Resort 5*,
Maritim Jolie Ville Royal Peninsula 5*,
Jaz Mirabel Club Hotel 5*,
Jaz Belvedere Hotel 5*,
Hyatt Regency Sharm Hotel 5*,
Hilton Sharm Waterfalls Resort Hotel 5*,
Hilton Sharm Dreams Resort Hotel 5*,
Hauza Beach Hotel 5*,
Baron Resort Hotel 5* Deluxe,
Baron Palms Hotel 5*,
Sol Y Mar Sharming Inn Hotel 4*,
Laguna Vista Garden Resort Hotel 4*,
Iberotel Club Fanara Hotel 4*,
Hilton Sharm Fayrouz Resort Hotel 4*,
Hilton Sharks Bay Resort Hotel 4*,
El Hayat Sharm El Sheikh Resort 4*,
Eden Rock Hotel 4*,
Amarante Garden Palms Hotel 4*,
Sol Y Mar Shams Suites 3*,
