%
'*****Assign value of order to ListOrder
ListOrder= request.querystring("order")
'
'*****If the ListOrder is blank, make it District,School
'
If LEN(LISTORDER)=0 then ListOrder="institution_name"
'
'*****Open DB ConnectionA Connection to AYP.mdb in same folder
'
Set OBJdbConnection = Server.CreateObject("ADODB.Connection")
OBJdbConnection.Open "drugtesting",_
"DATABASE=drugtesting;UID=sltrib;PWD=;DSN=drugtesting"
'
'*****Build SELECT with variables, ORDER BY variable ListerOrder
SQLquery="select * FROM drugtesting order by "&ListOrder
'
'*****Execute query, assign results to SQLquery
Set QueryResult= OBJdbConnection.Execute(SQLquery)
'
'
'
%>
Using the open-records laws applicable in each state, The Salt Lake Tribune requested detailed information on the student-athlete drug testing programs for every school in Division I-A college athletics and three additional schools in the state of Utah.
Our standard request sought an accounting of all positive tests; drug testing schedules; records related to punishments for positives; program budgets or allocations by year; policies and procedures; any audits or reports discussing the program; copies of contracts with drug-test vendors; and information provided by vendors in the course of submitting bids to run the program.
Listed below are schools that provided some response, even if it was to reject our request. Schools not listed did not reply in any way.
If you have have a comment or additional information to add, please email us webmaster@sltrib.com OTHER LINKS:
<%
'**** DO WHILE for contents of QueryResult
'
do while not QueryResult.eof
'
'**** Alternate bgcolor for each record of QueryResult
'
if bgcolor="#FFFFFF" then
bgcolor="#E7E7D6"
else bgcolor="#FFFFFF"
end if
'
'****
'
' deliver bgcolor, var: District
'
%>