home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
sau9.org
/
sau9.org.zip
/
sau9.org
/
mathapp
/
student_report.asp
< prev
next >
Wrap
Text File
|
2002-11-11
|
2KB
|
63 lines
<HTML>
<head>
<title> Mathworks Student Admin
</title>
</HEAD>
<body>
<table width="90%" border="0">
<tr>
<td><font face="Arial"> <font size="6">Mathworks Student Management <br>
</font></font></td>
<td>
<div align="center"><img src="math.gif" width="177" height="141"></div>
</td>
</tr>
</table>
<%
Dim csdConn
Dim csdStudent
filePath = Server.MapPath("math_proj.mdb")
set csdConn=server.createObject("ADODB.connection")
csdConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & filePath
%>
<%
set csdStudent=csdConn.execute ("SELECT tblStudent.idStudent, tblStudent.txtLName, tblStudent.txtFName, tblPerformance.intStatus, tblPerformance.cntPlaceAttempt, tblPerformance.cntOperBAttempt, tblPerformance.cntOperIAttempt, tblPerformance.cntOperAAttempt, tblStatusDescr.Description FROM tblStudent INNER JOIN (tblStatusDescr INNER JOIN tblPerformance ON tblStatusDescr.idStatusNum = tblPerformance.intStatus) ON tblStudent.idStudent = tblPerformance.idStudent ORDER BY tblStudent.txtLName")
%>
<table border=1><tr><td>Student ID</td><td>First Name</td><td>Last Name</td><td>Status</td><td>Place Value <br>Attempts</td><td>Beg Oper</td><td>Int Oper</td><td>Adv Oper</td></tr>
<%
do while not csdStudent.EOF
id=csdStudent("idStudent")
fname=csdStudent("txtFName")
lname=csdStudent("txtLName")
statusdesc=csdStudent("description")
placecount=csdStudent("cntPlaceAttempt")
OpBasic=csdStudent("cntOperBAttempt")
OpInt=csdStudent("cntOperIAttempt")
OpAdv=csdStudent("cntOperAAttempt")
response.write "<tr><td>"
response.write id
response.write "</td><td>"
response.write fname
response.write "</td><td>"
response.write lname
response.write "</td><td>"
response.write statusdesc
response.write "</td><td>"
response.write placecount
response.write "</td><td>"
response.write opBasic
response.write "</td><td>"
response.write opInt
response.write "</td><td>"
response.write opAdv
response.write "</td></tr>"
csdStudent.movenext
loop
response.write "</table>"
%>