|
|
<%
strSQL = "SELECT QuizTypeID, " &_
"Title " &_
"FROM MH_QuizType "
cmdSQL.CommandText = strSQL
Set rsQuizTypes = Server.CreateObject("ADODB.Recordset")
Set rsQuizzes = Server.CreateObject("ADODB.Recordset")
rsQuizTypes.Open cmdSQL, , 3, 1
%>
|
|
|
<% rsQuizTypes.MoveFirst
Do While Not rsQuizTypes.EOF
strSQL = "SELECT QuizID, " &_
"Title " &_
"FROM MH_Quiz " &_
"WHERE (QuizTypeID = " & rsQuizTypes("QuizTypeID") & ") AND (Live = 1)" &_
" ORDER BY Title "
cmdSQL.CommandText = strSQL
rsQuizzes.Open cmdSQL, , 3, 1 %>
<% Do While Not rsQuizzes.EOF %>
"><%=rsQuizzes("Title")%>
<% rsQuizzes.MoveNext
Loop %>
|
<% rsQuizTypes.MoveNext
rsQuizzes.Close
Loop %>
|
|
|
This activity includes links outside of Scholastic.com
Every Web site we link to was visited by our team to make sure it's
appropriate for kids. But we don't monitor or control these sites
and they may change. In addition, many of these sites may have links
to other sites which we haven't reviewed.
Be sure to get permission from a parent or teacher before leaving
Scholastic.com, and remember to read the Privacy Policy and Terms
of Use of any site you visit. Technical Requirements: To play Math
Hunt, you must have your browsers set to accept cookies. Scholastic
uses cookies to keep track of your Math Hunt score. For more information
about cookies, see our Privacy Policy
Statement. |
|
|