IKAMA has classified the
Furnished Apartments in Lebanon into two categories:
1- Residential Furnished Apartments (Located in Apartment buildings)
2- Private Furnished Apartments (Located in private buildings amongst
local citizens)
1- Residential Furnished Apartments:
2- Private Furnished Apartments:
To simplify your search further, IKAMA has classified the
apartments by town/village name, by type and by rent's budget.
Select the type of accommodation you're looking for from the drop down
lists below
(Please note that the listed furnished apartments currently
available are rented out on yearly basis)
<%
if len(request.form("submit"))>0 then
vil = request.form("vil")
typ = request.form("typ")
result = request.form("result")
bfrom = request.form("bfrom")
btype = request.form("btype")
bprice = request.form("bprice")
bto = request.form("bto")
else
vil = request.querystring("vil")
typ = request.querystring("typ")
result = request.querystring("result")
bfrom = request.querystring("bfrom")
btype = request.querystring("btype")
bprice = request.querystring("bprice")
bto = request.querystring("bto")
end if
if len(vil)>0 then
if len(cond)>0 then
cond = cond & " "&result&" vil = '"&vil&"'"
else
cond = "vil = '"&vil&"'"
end if
end if
if len(typ)>0 then
if len(cond)>0 then
cond =cond & " "&result&" typ = '"&typ&"'"
else
cond = "typ = '"&typ&"'"
end if
end if
if len(btype)> 0 and len(bprice) >0 then
if bprice = 1 then
if len(cond)>0 then
cond = cond &" "&result&" "&btype&" < 500 "
else
cond = btype&" < 500 "
end if
elseif bprice = 2 then
if len(cond)>0 then
cond = cond &" "&result&" ("&btype&" > 500 and "&btype& "< 1500) "
else
cond =btype&" > 500 and "&btype& "< 1500 "
end if
elseif bprice = 3 then
if len(cond)>0 then
cond = cond &" "&result&" ("&btype&" > 1500 and "&btype& "< 4000) "
else
cond =btype&" > 1500 and "&btype& "< 4000 "
end if
elseif bprice = 4 then
if len(cond)>0 then
cond = cond &" "&result & " " &btype&" > 4000 "
else
cond = btype &" > 4000 "
end if
end if
elseif len(bprice) >0 then
if bprice = 1 then
if len(cond)>0 then
cond = cond &" "&result&" "&"(smr_rent< 500 or smr_month<500 or wtr_rent<500 or wtr_month<500 or yrly_rent<500) "
else
cond = "smr_rent < 500 or smr_month < 500 or wtr_rent < 500 or wtr_month < 500 or yrly_rent < 500"
end if
elseif bprice = 2 then
if len(cond)>0 then
cond = cond &" "&result&" ((smr_rent > 500 and smr_rent< 1500) or (smr_month > 500 and smr_month< 1500) or (wtr_rent > 500 and wtr_rent< 1500) or (wtr_month > 500 and wtr_month< 1500) or (yrly_rent > 500 and yrly_rent< 1500) )"
else
cond ="(smr_rent > 500 and smr_rent< 1500) or (smr_month > 500 and smr_month< 1500) or (wtr_rent > 500 and wtr_rent< 1500) or (wtr_month > 500 and wtr_month< 1500) or (yrly_rent > 500 and yrly_rent< 1500) "
end if
elseif bprice =3 then
if len(cond)>0 then
cond = cond &" "&result&" ((smr_rent > 1500 and smr_rent< 4000) or (smr_month > 1500 and smr_month< 4000) or (wtr_rent > 1500 and wtr_rent< 4000) or (wtr_month > 1500 and wtr_month< 4000) or (yrly_rent > 1500 and yrly_rent< 4000) )"
else
cond ="(smr_rent > 1500 and smr_rent< 4000) or (smr_month > 1500 and smr_month< 4000) or (wtr_rent > 1500 and wtr_rent< 4000) or (wtr_month > 1500 and wtr_month< 4000) or (yrly_rent > 1500 and yrly_rent< 4000)"
end if
elseif bprice = 4 then
if len(cond)>0 then
cond = cond &" "&result&" "&"(smr_rent > 4000 or smr_month> 4000 or wtr_rent> 4000 or wtr_month> 4000 or yrly_rent> 4000) "
else
cond = "smr_rent > 4000 or smr_month > 4000 or wtr_rent > 4000 or wtr_month > 4000 or yrly_rent > 4000"
end if
end if
end if
%>
<%
if len(cond)>0 then
order=request.querystring("order")
way=request.querystring("way")
if len(order)=0 then
order="ref"
session("order")=""
end if
if len(way)=0 then
way="asc"
end if
if session("order")<> order then
session("order")= order
way="asc"
end if
conn.open
rst.cursorlocation = 3
sql = "select * from [apartments info] where "&cond&" order by "& order
if (way="desc") then
sql= sql & " desc"
way2="asc"
else
sql= sql & " asc"
way2="desc"
end if
rst.open sql, conn, 3,2
if not rst.eof then
rst.pagesize = pgsize
rst.absolutepage = page
pgcount = rst.pagecount
if rst.eof then
rst.absolutepage =pgcount
page = pgcount
end if
%>
<%if page>1 then%>
<<
<%end if%>
<% if pgcount > 1 then
for i = 1 to pgcount
if i = page then
response.write " "& i &" "
else
response.write " " & i & " "
end if
next
else
response.write " "
end if %>
<%if page>>
<%end if %>
<%if pgcount > 1 then %>
(page <%=page%>
of <%=pgcount%>)
<%end if %>