<% Loc = request.querystring("LOCT") '--------Initiliasing variables------------------- Dim ProID Dim AdoCon Dim RsProject Dim SQLProj Dim RsPrc Dim SQLPrc '------Create Connection----------------------------------- Set AdoCon = server.createobject("ADODB.CONNECTION") AdoCon.Open "Driver={MICROSOFT ACCESS DRIVER (*.mdb)};DBQ=" & server.mappath("/DB/fh.mdb") '--------------- SQL Statements ------------------- Set RsMain = server.createobject("ADODB.RECORDSET") Set Rsmenu = server.createobject("ADODB.RECORDSET") '--------------- SQL Statements ------------------- SQLProjList = "select * from emirates where ID='" & Loc &"'" SQLMENU = "select * from FreeHoldLocations where EmirateID='" & Loc &"'" 'response.write SQLMENU '---------------------------------------------------------------- RsMain.Open SQLProjList,AdoCon,3,3 Rsmenu.Open SQLMENU,AdoCon,3,3 %> Freehold locations | Dubai | Ajman | Properties
 
 Home  Dubai City Guide  Investors  Plots  Property Classifieds Awards
Freehold Locations:-
" width="650" />
<%=RsMain("Name")%> Introduction

<%=RsMain("Description")%>

Contact Us |  About us | Disclaimer | Careers
 
This website and all content is © 2007 - futurehomesdubai.com
All rights reserved. Please read our Privacy Policy