<% if request("page") = "lands" and request("ID") > "" then if request("show") = 1 then SQL = "Select * from lands where randomid = '" & request("ID") &"'" Else SQL = "Select * from lands where ID = " & request("ID") &" and status = 1" End if set rslands= Con.execute(SQL) if rslands.EOF OR rslands.BOF Then %> <%=siteinfo("sitename")%> "> "> <% Else %> <% if (rslands.Fields.Item("pictures").Value) > "," then a = split(rslands("pictures"),",") for i=0 to 0 img = "uploads/lands/" & a(i) next Else img = "images/lands.jpg" End if %> <% End if %> <% End if %> <% if request("page") = "aqar" and request("ID") > "" then if request("show") = 1 then SQL = "Select * from house where randomid = '" & request("ID") &"'" Else SQL = "Select * from house where ID = " & request("ID") &" and status = 1" End if set rsaqar= Con.execute(SQL) if rsaqar.EOF OR rsaqar.BOF Then %> <%=siteinfo("sitename")%> "> "> <% Else %> <%=rsaqar("title")%> "> "> <% if (rsaqar.Fields.Item("picture").Value) > "," then a = split(rsaqar("picture"),",") for i=0 to 0 img = "uploads/house/" & a(i) next Else img = "images/house.jpg" End if %> <% End if %> <% End if %> <% if request("newsID") > "" then set keys = con.execute("select headline, summary from news where newsid = " & request("newsID") &";") %> <%=keys("headline")%> ,<%=keys("summary")%>"> "> <% Elseif request("page") = "one" and request("cat") > "" then set keys = con.execute("select top 1 headline, summary from news where cat = " & request("cat") &";") if keys.EOF OR keys.BOF Then %> <%=siteinfo("sitename")%> "> "> <% else do while not keys.Eof %> <%=siteinfo("sitename")%> | <%=keys("headline")%> ,<%=keys("summary")%>"> ,<%=keys("summary")%>"> <% keys.Movenext loop End if keys.Close set keys = nothing %> <% Else %> <%=siteinfo("sitename")%> "> "> <% ENd if %>
whatsapp Facebook youtube

مستكشف فلسطين
<% if Request.querystring("page") = "" then %> <% Else %> <% End if %>