<% GOTOIT = REquest("GOTOIT") IF GOTOIT = "SearchFor" then Session("PRice")= REquest("Price") Session("HoldType") = Request("HoldType") Session("HeadlineSize") = Request("HeadlineSize") ' = PurchaseType in PropertyInfo ' ssql = "Select * From PropertyType Where TypeID = " & Session("HoldType") 'set srs = Server.createobject("ADODB.recordset") 'srs.open ssql,oconn,1,3,adcmdtext 'Session("HoldTypeWord") = srs("PropertyType") 'srs.close select case Session("HoldType") case 0 Session("HoldTypeWord")="TO LET" P = "(Tenure =0) " case 1 Session("HoldTypeWord")="FOR SALE" P = "(Tenure =1) " End select PRopertyType = REquest("PRopertyType") If Len(PropertyType)=0 then errcnt1 = "Please Select a property Type from the list below" end if sqlBuild = "Select * From PropertyInfo Where " SqlBuild = SqlBuild & P & " AND (" PropertyCategory = PropertyType PIR= " PropertyCategory = " PC = PropertyCategory PCl = instr(PC,"11") if PCl>0 then ' response.write "yep" PC = " PropertyCategory Like '%%' " PIR = "" Else PC = Replace(PropertyCategory,", ", " OR PropertyCategory=") end if 'Now Look at the sort order variable and decide what order to sort If SearchResOrder = "HighToLow" then vSearchRes = " ORDER BY AskingPrice DESC, AskingRent DESC" end if If SearchResOrder = "LowToHigh" then vSearchRes =" ORDER BY AskingPrice , AskingRent" end if 'Now deal with Headline size If Session("HeadlineSize") > 0 then Headline = " AND (HeadlineSize >=" & Session("HeadlineSize") & ")" End if Session("SQL") = sqlBuild & PIR & PC & ")" & Headline & " AND (Retired=0)" & vSearchRes ' Response.write PRopertyType if request("g") =1 then noprop = "Sorry we have no proprties meeting your request" end if If LEn(errcnt1)=0 then response.redirect "searchres2.asp" end if end if If Request.Servervariables("REMOTE_ADDR") ="82.38.1.36" then Response.write Session("SQL") & "
" Response.write errcnt1 end if %> Drivers & Norris - Properties for Sale North London
 


Drivers & Norris Estate Agents London Residential And Commercial Sales and Lettings, Property Auctions, Surveyors And Mortgage Advisors

Property Holloway Highgate Crouch End Islington Angel

SURVEYS & VALUATION

ESTATE AGENTS | AUCTIONEERS | SURVEYORS & VALUERS

407/409 HOLLOWAY ROAD LONDON N7 6HP
TEL: 020 7607 5001 FAX: 020 7609 5031
WEB: www.drivers.co.uk
EMAIL : survey@drivers.co.uk

FOR SALE Property for sale in North London TO LET Property to let in North London COMMERCIAL Commercial Property North London Shops Offices Industrial Premises AUCTIONS Property Auctions London MANAGEMENT Property Management London SURVEYS Surveyors London MORTGAGES Mortages Online London property OVERSEAS Overseas Property Spanish Villas Apartments London Agent COMPANY Overseas Property Spanish Villas Apartments London Agent


Drivers & Norris Estate Agents London Residential And Commercial Sales and Lettings, Property Auctions, Surveyors And Mortgage Advisors North London PropertySurveys & Valuations

Our Survey and Valuation Department provides professional advice on all aspects of residential and commercial property for private individuals, companies, lending institutions, Banks and Building Societies.

North London Property Open market valuation
North London Property Retrospective valuations
North London Property Valuations for Probate
North London Property Valuations for matrimonial purposes
North London Property Building Insurance Valuations
North London Property Valuations for Capital Gains Tax (or taxation)
North London Property RICS Homebuyer Survey and Valuations
North London Property Full Building Surveys
North London Property Expert Witness
North London Property Schedules of Dilapidations
North London Property Rating appeals and negotiations
North London Property Building Defect reports
North London Property Preparation of Specification
North London Property Administering Building Contracts
North London Property Inspection of building work onsite
North London Property Party Wall matters

 


Drivers & Norris Estate Agents London Residential And Commercial Sales and Lettings, Property Auctions, Surveyors And Mortgage Advisors
<% If ISObject(Oconn) then oconn.close set oconn = nothing End if %>