Brian Thomas Partnership:U.K Property Services

<%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

Buy

Let

Type

Beds (min)




		Sales

		Get information on every property for sale in the area. Brian Thomas advanced network provides you with pertinent information fast! After determining your specific needs, your friendly Brain Thomas Sales Associate will provide a list of every available property that meets your exact specifications... a process that can take days at other companies!




















		Copyright © All rights reserved by Brian Thomas Partnership - Website by www.ByteShop.co.uk

<% Set oRcProperty1=nothing Set oRcProperty2=nothing set oConn=nothing %>