%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 |
|
| |
|
|
| |
|
|
| |
 |
| |
|
|
|
|
|
| |
|
|
Type |
|
|
| |
|
|
|
| |
|
| |
 |
| |
|
|
 |
 |
 |
 |
|
|
| |
|
|
| |
 |
|
|
 |
 |
|
|
|
|
|
|
|
|
|
|
|
|
Contact Us |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Brian Thomas Partnership |
|
|
|
|
|
|
|
|
|
Green Lane Branch |
High Road Branch |
|
|
|
|
|
|
|
|
|
420 Green Lane |
230 High Road
Ilford |
|
|
|
|
|
|
|
|
|
Seven Kings |
Ilford, Essex |
|
|
|
|
|
|
|
|
|
Ilford, Essex |
IG1 1QF |
|
|
|
|
|
|
|
|
|
IG3 9JX |
|
|
|
|
|
|
|
|
|
|
Tel:
020 8597 7699 |
Tel:
020 8478
1500 |
|
|
|
|
|
|
|
|
|
Fax: 020
8597 5775 |
Fax: 020
8478 3322 |
|
|
|
|
|
|
|
|
|
Email:
info@brianthomas.co.uk |
Email:
sales@brianthomas-ilford.co.uk |
|
|
|
|
|
|
|
|
|
Opening hours:
|
|
|
|
|
|
|
|
|
|
9am – 6:30pm Monday to Friday |
|
|
|
|
9am – 6:00pm Saturday |
|
|
|
|
10am – 1pm Sunday |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Copyright © All rights reserved by Brian Thomas Partnership
-
Website by www.ByteShop.co.uk |
|
|
|
|
<%
Set oRcProperty1=nothing
Set oRcProperty2=nothing
set oConn=nothing
%>