Untitled

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
</head>
<body>
        <%
                dim answer
                answer = Request.QueryString("q_1")
                if (answer = "amazon") then
                        Response.Write("Nice! You're right. The Amazon River is 4,000 mi long
                        and 98 mi longer than the Mississippi")
                elseif (answer = "mississippi") then
                        Response.Write("Oops! Not quite. The Mississippi is 3,902 mi long and
                        98 mi shorter thant the Amazon")
                end if
        %>
        <form method="get">
        Which of the following two rivers is longer?<br />
        <input type="radio" name="q_1" value="amazon"
                <%
                          If Request.QueryString("q_1") = "amazon" Then
                                Response.Write " checked=""checked"""
                          End If
                 %>/>Amazon River<br />
         <input type="radio" name="q_1" value="mississippi"
                <%
                          If Request.QueryString("q_1") = "mississippi" Then
                                Response.Write " checked=""checked"""
                          End If
                 %>/>Mississippi River<br />
        <input type="submit" value="Submit" /> | <a href = "test.asp">Reset</a>
</body>
</html>