%@language="VBScript" %>
<%
'''''''''''''''''''''''''''''''''''''Preiau'''''''''''''''''''''
dim ceLoca,ceFacility_name,ceAcomodation,ceStar,sqlString
ceLoca=Request.Form("location")
ceFacility_name=Request.Form("facility_name")
ceAcomodation=Request.Form("acomodation")
ceStar=Request.Form("star")
if ceLoca="" then
ceLoca="%"
else
if LCase( ceLoca)="bucuresti" or ceLoca="bucarest" or ceLoca="bukarest" then
ceLoca="bucharest%"
elseif ceLoca="schassburg" or ceLoca="Schassburg" then
ceLoca="sighisoara%"
else
ceLoca="%" & ceLoca & "%"
end if
end if
if ceFacility_name="" then
ceFacility_name="%"
else
ceFacility_name=ceFacility_name & "%"
end if
if ceAcomodation="" then
ceAcomodation="%"
else
ceAcomodation=ceAcomodation & "%"
end if
if ceStar="" then
ceStar="%"
else
ceStar=ceStar & "%"
end if
sqlString="LOCATION like '" & ceLoca & "' and FacilityName like '" & ceFacility_name & "' and type like '" & ceAcomodation & "' and Class like '" & ceStar & "'"
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
dim conHoteluri, paginaCurenta
paginaCurenta=Request.QueryString("pagina")
if paginaCurenta="" then
paginaCurenta=1
end if
set conHoteluri=Server.CreateObject("ADODB.CONNECTION")
conHoteluri.connectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("hoteluri_ro_2003.mdb") & ";"
conHoteluri.Open
dim recLocation
set recLocation=Server.CreateObject("ADODB.RECORDSET")
recLocation.Open "SELECT * from hoteluri where " & sqlString & " order by Location",conHoteluri
%>
ROMANIA - Travel and Tourism Information
|
|
Please Enter Your Search Criteria
|
Additional information about hotels and all other accommodation facilities in any city or town in Romania will be provided upon request.
For reservations, please contact your travel agent or the hotel directly.
When contacting a hotel or a travel agency in Romania, please remember there is a time zone difference of seven hours between Romania and the U.S. (eastern time).
Reservation departments at individual properties may be closed during weekends/ public holidays.
If you need assistance in communicating with a hotel in Romania, please do not hesitate to contact us.
To make hotel reservations on-line please check our links section.
|
|
|
|
<%
recLocation.Close
set recLocation=nothing
conHoteluri.Close
set conHoteluri=nothing
%>