%@ LANGUAGE="VBSCRIPT" %> <% 'CATA Database School List Retrival Name = Request.Form("Name") School = Request.Form("School") City = Request.Form("City") Region = Request.Form("Region") LocType = Request.Form("Type") Sort = Request.Form("Sort") Format = Request.Form("Format") Set ObjConn = Server.CreateObject("ADODB.Connection") ObjConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=e:\calaged\databases\aged.mdb") Set ObjRst = Server.CreateObject("ADODB.RecordSet") SaveID=0 ' saved location ID SaveRegionID = 0 %>
| ||||||