<% 'declare some variables Dim Conn, RS, SQL SQL = "SELECT * FROM feature" Set Conn = Server.CreateObject("ADODB.Connection") 'ms access dsnless connection Conn.Open "DBQ=" & Server.Mappath("data/nca.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};" Set RS = Server.CreateObject("ADODB.Recordset") RS.Open SQL, Conn %> Northcrest Auto - Home

 

Driving Directions

120 New Dallas Hwy.
MapQuest Directions

6412 N. 19th (China Spring Rd.)
MapQuest Directions

 

 

 

<% 'Clean up... RS.Close Set RS = Nothing Conn.Close Set Conn = Nothing %>