home *** CD-ROM | disk | FTP | other *** search
/ sau9.org / sau9.org.zip / sau9.org / mathapp / dec_leveli.asp < prev    next >
Text File  |  2002-12-04  |  2KB  |  71 lines
  1.  
  2. <HTML>
  3. <head>
  4. <title> Adding and Subtracting Decimals
  5. </title>
  6. </HEAD>
  7. <body>
  8. <%
  9. Dim csdQues
  10. idStudent=Request.form ("idStudent")
  11. level=request.form ("level")
  12. difficulty=request.form("difficulty")
  13. %>
  14. <table width="90%" border="0">
  15.   <tr>
  16.     <td><font face="Arial"> <font size="6">Decimal Addition and Subtraction<br> Knowledge Check <br><font size=4>Level 2
  17.        </font></font></td>
  18.     <td>
  19. <div align=center><img src=math.gif width=177 height=141></div></TABLE>     
  20. <%
  21.  
  22. if level=0 then
  23. level=1
  24. end if
  25. if level <4 then
  26. response.write  "<font face=Tahoma>When answering these questions, please leave off any trailing zeroes (9.60 should be entered as 9.6)!"
  27.  
  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.  
  43. do while not csdQues.EOF
  44. response.write "<font face=tahoma>"
  45. response.write intQues & ".) "
  46. response.write csdQues("txtquestion")
  47. response.write "       "
  48. response.write "<input type=text name=stuAns"
  49. response.write intQues & ">"
  50. intQues=intQues + 1
  51.  
  52. response.write "<p>"
  53. csdQues.movenext
  54. loop
  55. intQues=intQues - 1
  56. response.write "</input><input type=submit value='Check My Answers!'>"
  57. response.write "<input type=hidden name=idStudent value="
  58. response.write idStudent & "><input type=hidden name=level value="
  59. response.write level
  60. response.write "><input type=hidden name=difficulty value="
  61. response.write difficulty & "><input type=hidden name=intQues value="
  62. response.write intQues & ">"
  63. response.write "<input type=hidden name=intStart value="
  64. response.write intStart 
  65. response.write "></form>"
  66. else
  67. response.write "<font face=tahoma>Please contact your teacher, you have already had three attempts!"
  68. end if
  69.  
  70. %>
  71.