<%@ LANGUAGE="VBSCRIPT" %> <% Option Explicit %> <% If Session("ValidatedStudent") <> True Then Response.Redirect "error.asp?error=denied" End If %> <% Dim objRS 'Recordset Object Dim sSQL 'SQL string Dim i Dim strUser 'Email of User Dim strPath Dim strTmp strUser = Request.QueryString("email") strPath = Request.QueryString("path") sSQL = "SELECT * FROM Students WHERE email = '" & strUser & "';" Set objRS = Server.CreateObject("ADODB.Recordset") objRS.Open sSQL, objConn, adOpenDynamic, adLockOptimistic, adCmdText 'Make sure the student's account exists If Not (objRS.EOF And objRS.BOF) Then %>

Project Scores
1	2	3	4	5	6	7	8	9	10	11	12
<%=objRS("score1")%>	<%=objRS("score2")%>	<%=objRS("score3")%>	<%=objRS("score4")%>	<%=objRS("score5")%>	<%=objRS("score6")%>	<%=objRS("score7")%>	<%=objRS("score8")%>	<%=objRS("score9")%>	<%=objRS("score10")%>	<%=objRS("score11")%>	<%=objRS("score12")%>

If you have questions or comments please contact your Instructor: "><%=objRS("teacher")%>

<% Else Response.Write ("

Account Not Found!

") End If objRS.Close Set objRS = Nothing objConn.Close Set objConn = Nothing %>