Missouri River Resource Database

home | email

The table and graph below list the number of records in the database grouped by Document Type*.

<% 'Dim DataConnection1, cmdDC1, RecordSet1, DataConnection2, cmdDC2, RecordSet2 'Dim RecordToEdit, Updated, strUserName, strPassword '-- Create object and open database Set DataConnection1 = Server.CreateObject("ADODB.Connection") DataConnection1.Open "DSN=MRCDC" Set cmdDC1 = Server.CreateObject("ADODB.Command") cmdDC1.ActiveConnection = DataConnection1 '---------------------------------------- 'Write Login Info to DB '-- default SQL SQL = "SELECT * FROM qry_Count_byLocation_byType_crosstab" cmdDC1.CommandText = SQL Set RS1 = Server.CreateObject("ADODB.Recordset") RS1.Open cmdDC1, , 0, 2 Response.Write "" Response.Write "" For each objField in RS1.Fields if objField.name <> "spatial_general_order" Then Response.Write "" end if Next 'Write the column headers 'Response.Write "" Response.Write "" While Not RS1.EOF Response.Write "" For each objField in RS1.Fields if objField.name <> "spatial_general_order" Then if objField.value <> "" Then Response.Write "" else Response.Write "" end if End if Next Response.Write "" RS1.MoveNext Wend Response.Write "

" & objField.Name & "	General Location	Document Type	Count
" & objField.value & "	-

" %>
* - AP=Aerial Photography; AT=Audio Tape; Bk=Book; Bro=Brochure/Pamphlet; CAD=CAD Data; Con=Conference Proceedings; Crt=Court Hearing Db=Database; DVD=DVD Video; Eml=Email; GIS=GIS Data; JA=Journal Article; Ltr=Letter; Mag=Magazine Article; Map=Map; Mem=Memo; Mic=Microfiche; NR=News Release; Oth=Other; Per=Person; Ph=Photographs; Pst=Poster; Rpt=Report; Sym=Symposium; Tbl=Data Table; Th=Thesis/Dissertation; VHS=VHS Tape; Web=Web Site

<% Response.Write "

"%> <%'Graph the data Response.Write "

"%> <%Response.Write "

" %>

Information
The data on this page has been created dynamically from the information in the database. As additional information is added to the database, the table and graph on this page will automatically be updated to reflect the new data.