<%
dim strSql
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open(Server.Mappath("dands.mdb"))
set rs = Server.CreateObject("ADODB.recordset")
strSql="SELECT Countyname FROM County ORDER BY Countyname ASC"
rs.open strSql,conn%>
Use
the boxes below to search for PLACES TO
VISIT or alternatively use the map on the right.
