home *** CD-ROM | disk | FTP | other *** search
/ sau9.org / sau9.org.zip / sau9.org / mathapp / dec_levelb.asp < prev    next >
Text File  |  2002-12-04  |  2KB  |  71 lines
  1. <HTML>
  2. <head>
  3. <title> Adding and Subtracting Decimals
  4. </title>
  5. </HEAD>
  6. <body>
  7.  
  8. <table width="90%" border="0">
  9.   <tr>
  10.     <td><font face="Arial"> <font size="6">Decimal Addition and Subtraction<br> Knowledge Check <br><font size=4> Level 1
  11.        </font></font></td>
  12.     <td>
  13.       <div align="center"><img src="math.gif" width="177" height="141"></div>
  14.     </td>
  15.   </tr>
  16. </table>
  17. <%
  18. Dim csdQues
  19. idStudent=Request.form ("idStudent")
  20. level=request.form ("level")
  21. difficulty=request.form("difficulty")
  22.  
  23. if level=0 then
  24. level=1
  25. end if
  26. if level <4 then
  27. response.write  "<font face=Tahoma>When answering these questions, please leave off any trailing zeroes (9.60 should be entered as 9.6)!"
  28. sql="SELECT tblOperationQues.IdQNum, tblOperationQues.txtLevel, tblOperationQues.numSet, tblOperationQues.txtQuestion, tblOperationQues.valAnswer FROM tblOperationQues WHERE tblOperationQues.txtLevel='"
  29. sql=sql & difficulty
  30. sql=sql & "' AND tblOperationQues.numset="
  31. sql=sql & level & " order by numset, idQNum"
  32. 'response.write sql
  33.  
  34. filePath = Server.MapPath("math_proj.mdb")
  35. set csdConn=server.createObject("ADODB.connection")
  36. csdConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & filePath
  37. set csdQues=csdConn.execute(sql)
  38.  
  39. intQues=csdQues("idQnum")
  40. intStart=csdQues("IdQNum")
  41. response.write "<form action=dec_check.asp method=post>"
  42. do while not csdQues.EOF
  43. response.write "<font face=tahoma>"
  44. response.write intQues & ".) "
  45. response.write csdQues("txtquestion")
  46. response.write "       "
  47. response.write "<input type=text name=stuAns"
  48. response.write intQues & ">"
  49. intQues=intQues + 1
  50.  
  51. response.write "<p>"
  52. csdQues.movenext
  53. loop
  54. intQues=intQues - 1
  55. response.write "</input>"
  56. response.write "<input type=hidden name=idStudent value="
  57. response.write idStudent & "><input type=hidden name=level value="
  58. response.write level
  59. response.write "><input type=hidden name=difficulty value="
  60. response.write difficulty & "><input type=hidden name=intQues value="
  61. response.write intQues & ">"
  62. response.write "<input type=hidden name=intStart value="
  63. response.write intStart 
  64. response.write "><input type=submit value='Check My Answers!'></form>"
  65.  
  66. csdConn.close
  67. else
  68. response.write "<font face=tahoma>Please contact your teacher, you have already had three attempts!"
  69. end if
  70. %>
  71.