%@ Language = "VBSCRIPT" %>
Check
<%
Set objCon = Server.CreateObject("ADODB.Connection")
strConnection = "DSN=ukc;Database=ukc;"
objCon.Open strConnection
sqlText = "select * from scoreboard"
set userSet = objCon.execute(sqlText)
do until userSet.eof
rname = userset("Name")
rscore = userset("Score")
rsch = userset("School")
rloc = userset("Location")
rcat = userset("Category")
response.write "" & rname & " ( " & rsch & " , " & rloc & " , " & rcat & " ) " & "'s score is : " & rscore
userSet.moveNext
loop
objCon.close
set objCon = nothing
%>