%
'*****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 drugtesting.schools.institution_ID,drugtesting.schools.institution_name,drugtesting.schools.response,drugtesting.schools.sportsconference,drugtesting.drugtesting.schoolwide_policy,drugtesting.drugtesting.random,drugtesting.drugtesting.firsttime_suspension FROM drugtesting.schools LEFT JOIN drugtesting.drugtesting ON drugtesting.drugtesting.institution_ID = drugtesting.schools.institution_ID"
if len(request.querystring("conf")) >0 then
sqlquery=sqlquery& " WHERE sportsconference='"& request.querystring("conf")&"'"
end if
sqlquery=sqlquery& " order by "&ListOrder
'
'*****Execute query, assign results to SQLquery
Set QueryResult= OBJdbConnection.Execute(SQLquery)
'
'
'
%>
Salt Lake Tribune - College Drug Testing
Collegiate Drug Testing: A National Survey A Salt Lake Tribune
survey of all schools in Division I-A college athletics has found
vast differences in the way drug-testing programs are administered.
Using the open-records laws applicable in each state, The Tribune requested detailed information on student-athlete drug testing programs administered by the schools themselves, separate from the NCAA.
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 at right are every school's basic responses, and links to narrow the list by conference. Click on a school name for more details on that school's policies and results. If you have have a comment or additional information to add, please email us webmaster@sltrib.com
<%
'**** 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
'
%>