<% 'ON ERROR RESUME NEXT '--------Initiliasing variables------------------- Dim ProID Dim AdoCon Dim RsProject Dim SQLProj Dim RsPrc Dim SQLPrc '--------Get The Project Name--------------------------------- LOCID = request.querystring("LOC") '------------------------------------------------------------ '------Create Connection----------------------------------- Set AdoCon = server.createobject("ADODB.CONNECTION") AdoCon.Open "Driver={MICROSOFT ACCESS DRIVER (*.mdb)};DBQ=" & server.mappath("/DB/fh.mdb") Set RsProject = server.createobject("ADODB.RECORDSET") '--------------- SQL Statements ------------------- SQLProj = "select * from FreeHoldLocations WHERE LName='" & LOCID &"'" '---------------------------------------------------------------- RsProject.Open SQLProj,AdoCon,3,3 Set Rsmenu = server.createobject("ADODB.RECORDSET") '--------------- SQL Statements ------------------- SQLProjList = "select projectID,project_name,property_name from project_details WHERE project_name='" & LOCID & "'" '---------------------------------------------------------------- Rsmenu.Open SQLProjList,AdoCon,3,3 %> <%=RsProject("LName")%> Details | Dubai Freehold Properties | Ajman Freehold Properties :: Future Homes LLC , <%=RsProject("LName")%> properties" /> details" />
 
 Home  Dubai City Guide  Investors  Plots  Property Classifieds Awards
UAE Freehold Locations:-
" alt="Freehold Maps" width="700" border="1" />
<%=RsProject("LName")%> Overview:-

<%=RsProject("Description")%>

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