<%Dim fldone, fldtwo, fldthree, strTime_Entered Dim objrs,stSQL,strSQL2 Set objrs = CreateObject("ADODB.RECORDSET") 'CONNECT TO DATABASE ' DSNless connection to Access Database DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; " DSNtemp=dsntemp & "DBQ=" & server.mappath("residents/information.mdb") Set objcon = Server.CreateObject("ADODB.Connection") objcon.Open DSNtemp strSQL2 = "SELECT * FROM PRICES " objrs.Open strSQL2,objcon DO WHILE NOT objrs.EOF fldone = objrs("one") fldtwo = objrs("two") fldthree = objrs("three") fldtime = objrs ("Time_Entered") objrs.MoveNext LOOP 'response.write "The sql statement is: " & strsql2 & "
" 'response.write "field a is " & flda objrs.close objcon.close set objcon = Nothing set objrs = Nothing %>

 

FLOOR PLANS


CLICK TO ENLARGE
 

ONE BEDROOM APARTMENT
860 SQUARE FEET

Featuring full size washer/dryer connections, large bedroom with a spacious walk-in closet, large great room and coat closet in entry foyer.

 

Starting at $697

     

CLICK TO ENLARGE
 

TWO BEDROOM APARTMENT
1085 SQUARE FEET

Featuring full size washer/dryer connections, large bedrooms with spacious walk-in closets, lots of kitchen counter space and a large living room.

Starting at $827

     

CLICK TO ENLARGE
 

THREE BEDROOM APARTMENT
1413 SQUARE FEET

Featuring full size washer/dryer connections, coat closet in entry foyer, large living area and ample kitchen counter space.

Starting at $1,023


*Prices may change without notice
Copyright © 2002 Kenney Properties, Inc.