%Option Explicit
dim oRcProperty1, oRcProperty2, oConn, sqlProperty1, sqlProperty2, pid1, pid2, pid3
dim pid4, pid5, pid6, pdline1, pdline2, pdline3, pdline4, pdline5, pdline6, image1
dim image2, image3
%>
<%
Set oRcProperty1=Server.CreateObject("Adodb.RecordSet")
Set oRcProperty2=Server.CreateObject("Adodb.RecordSet")
sqlProperty1 = "SELECT top 3 tblAddNewProperty.Property_Id AS tblAddNewProperty_Property_Id,"
sqlProperty1 = sqlProperty1 + "tblAddNewProperty.Property_Line_Description,"
sqlProperty1 = sqlProperty1 + "tblPropertyImage.Image_Path1"
sqlProperty1 = sqlProperty1 + " FROM tblPropertyImage INNER JOIN tblAddNewProperty"
sqlProperty1 = sqlProperty1 + " ON tblPropertyImage.Property_Id = tblAddNewProperty.Property_Id"
sqlProperty1 = sqlProperty1 + " WHERE tblAddNewProperty.Property_Status='" & "active"&"'"
sqlProperty1 = sqlProperty1 + " AND tblAddNewProperty.Property_For='" & "sale"&"'"
sqlProperty1 = sqlProperty1 + " ORDER BY tblAddNewProperty.Id DESC"
oRcProperty1.open sqlProperty1,oConn,3
pid1=oRcProperty1("tblAddNewProperty_Property_Id")
image1=oRcProperty1("Image_Path1")
pdline1=oRcProperty1("Property_Line_Description")
oRcProperty1.movenext
pid2=oRcProperty1("tblAddNewProperty_Property_Id")
image2=oRcProperty1("Image_Path1")
pdline2=oRcProperty1("Property_Line_Description")
oRcProperty1.movenext
pid3=oRcProperty1("tblAddNewProperty_Property_Id")
image3=oRcProperty1("Image_Path1")
pdline3=oRcProperty1("Property_Line_Description")
sqlProperty2="select top 3 * from tblAddNewProperty where Property_For='rent' and Property_Status='active' order by Id desc"
oRcProperty2.open sqlProperty2,oConn,3
pid4=oRcProperty2("Property_Id")
pdline4=oRcProperty2("Property_Line_Description")
oRcProperty2.movenext
pid5=oRcProperty2("Property_Id")
pdline5=oRcProperty2("Property_Line_Description")
oRcProperty2.movenext
pid6=oRcProperty2("Property_Id")
pdline6=oRcProperty2("Property_Line_Description")
%>
Brian Thomas Partnership:U.K Property Services
Home
|
About Us
Property Search
Any
75,000
100,000
150,000
175,000
200,000
250,000
300,000
350,000
400,000
450,000
500,000
Type
Any
House
Flat
Bungalow
About Us
Established in 1980 , Brian
Thomas Partnership , is a leading company in Sales ,
Letting and Management of properties .
Located in Seven Kings (Ilford),
our firm is providing services in and around the East
of London . Ever since inception our firm's name is well
known in the area for providing a quality service to our
clients.
Apart from residents of the area and
local community, we provide services to organizations ,
and to the Social Services of five boroughs of
London .
Copyright © All rights reserved by Brian Thomas Partnership
-
Website by www.ByteShop.co.uk
<%
Set oRcProperty1=nothing
Set oRcProperty2=nothing
set oConn=nothing
%>