<%
Dim cnnSimple ' ADO connection
Dim rstSimple ' ADO recordset
Dim strDBPath ' path to our Access database (*.mdb) file
dim typecondo
dim typecommercial
dim typesingle
dim typetownhouse
dim hometype
dim price
typecondo = 0
typecommercial = 0
typesingle = 0
typetownhouse = 0
dim i
dim last_visit
dim property_count
strDBPath = Server.MapPath("fpdb/database1.mdb")
Set cnnSimple = Server.CreateObject("ADODB.Connection")
cnnSimple.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDBPath & ";"
%>
Home
| Service Areas |
Service Plans |
How Does it Work? |
MLS Listing Sample
Realtor.com® Sample |
MLS Agreement Sample |
Free Internet Listing |
FAQs |
C4S Property Listings
MLS
Property Search | Open House Schedule |
Dream Home Finder |
C4S Buyer Rebate
Promos and Useful Links |
FSBO Resources |
Send Us a Referral |
En Espanol
Contact Us | List Your Property Now
in 3 Easy Steps!
Copyright © 2005 Choice4Selling
Real Estate, LLC All Rights Reserved
website by
LABORIS
