Don't like ads? PRO users don't see any ads ;-)
Guest

Untitled

By: a guest on May 5th, 2012  |  syntax: None  |  size: 1.07 KB  |  hits: 13  |  expires: Never
download  |  raw  |  embed  |  report abuse  |  print
Text below is selected. Please press Ctrl+C to copy to your clipboard. (⌘+C on Mac)
  1. <%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
  2. <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
  3. <html>
  4. <head>
  5. </head>
  6. <body>
  7.         <%
  8.                 dim answer     
  9.                 answer = Request.QueryString("q_1")
  10.                 if (answer = "amazon") then
  11.                         Response.Write("Nice! You're right. The Amazon River is 4,000 mi long and 98 mi longer than the Mississippi")
  12.                 elseif (answer = "mississippi") then
  13.                         Response.Write("Oops! Not quite. The Mississippi is 3,902 mi long and 98 mi shorter thant the Amazon")
  14.                 end if
  15.         %>
  16.         <form method="get">
  17.         Which of the following two rivers is longer?<br />
  18.         <input type="radio" name="q_1" value="amazon"
  19.                 <%
  20.                           If Request.QueryString("q_1") = "amazon" Then
  21.                                 Response.Write " checked=""checked"""
  22.                           End If
  23.                  %>/>Amazon River<br />
  24.          <input type="radio" name="q_1" value="mississippi"
  25.                 <%
  26.                           If Request.QueryString("q_1") = "mississippi" Then
  27.                                 Response.Write " checked=""checked"""
  28.                           End If
  29.                  %>/>Mississippi River<br />
  30.         <input type="submit" value="Submit" /> | <a href = "test.asp">Reset</a>
  31. </body>
  32. </html>