% 'Database query by Josh Huckabee 'Variable to hold the querystring from referer Dim strCity strCity = request.querystring("city") 'Database Name accessdb="headstart" 'The connections string cn="DRIVER={Microsoft Access Driver (*.mdb)};" cn=cn & "DBQ=" & server.mappath(accessdb) 'Create new record set to hold retrieved records Set rs = Server.CreateObject("ADODB.Recordset") 'SQL query sql = "select * from centers where city = '" & strCity & "' " 'Open record set rs.Open sql, cn %>
|
|
|
|
<%= strCity%> Links
Home | Mission | Program Information | Centers | Components | Support Svcs | Governance Staff | Employment | Organizational Chart | Calendar | Newsletter | Links |
|
|
Best Viewed With IE 4+ 800x600 Resolution |
NACOG Head Start, 121 E. Aspen Ave., Flagstaff, AZ 86001 Phone: 928.774.9504 Fax: 928.779.0514 Email: HeadStart@NACOG.org |