<% ' If date is in the future redirect to default if DateDiff("d",CDate(#5/31/2009#),date()) < 0 then response.redirect("default.asp") end if %> College World Series

Daily Baseball Quiz

Sunday, May 31, 2009
Today's theme is: College World Series

  1. Where is the College World Series played?
    1. Kalamazoo, Michigan
    2. Lincoln, Nebraska
    3. Omaha, Nebraska
    4. Pittsburgh, Pennsylvania
    5. Williamsport, Pennsylvania

  2. Which was the first university to twice win the College World Series?
    1. University of Arizona
    2. University of Miami
    3. University of Minnesota
    4. University of Southern California
    5. University of Texas

  3. How many times did the University of Minnesota win the College World Series?
    1. 1
    2. 2
    3. 3
    4. 4
    5. 5

  4. Which former president of the United States of America played in the College World Series?
    1. George Herbert Walker Bush
    2. Jimmy Carter
    3. Bill Clinton
    4. Gerald Ford
    5. Ronald Reagan

  5. Which was the first university to win five consecutive College World Series?
    1. Arizona State University
    2. Louisiana State University
    3. University of Minnesota
    4. University of Southern California
    5. University of Texas

  6. Who was the first player to win the College World Series Most Outstanding Player Award, be on a team that won the College World Series, and also be on a team that won the World Series?
    1. Sal Bando
    2. Terry Francona
    3. Bob Horner
    4. Mark Kotsay
    5. Calvin Schiraldi

  7. Who was the first player to play in three College World Series and win the American League Rookie of the Year award?
    1. Ryan Braun
    2. Bob Horner
    3. Evan Longoria
    4. Mark McGwire
    5. Houston Street

  8. Which team won the 2008 College World Series?
    1. Cal State Fullerton
    2. Stanford University
    3. University of Georgia
    4. University of Miami
    5. University of North Carolina

  9. Who was the first player from Cal State Fullerton to win the College World Series Most Outstanding Player Award?
    1. John Fishel
    2. Tony Hudson
    3. Mark Kotsay
    4. Phil Nevin
    5. Jason Windsor
[PREVIOUS DAY] [INDEX] <% ' Get the current date currentDate = date() ' Convert the expiration date expdate = CDate(#5/31/2009#) ' Compare dates comparison = DateDiff("d",expdate,currentDate) ' If date is in the past display the link if comparison > 0 then %> [NEXT DAY] <% End if %> <% ' Set the connection string and open the connection set conn = server.Createobject("ADODB.Connection") conn.Open ("DSN=counter") sql = "SELECT * from counter WHERE counterID = " & cint(151) set rs = conn.execute(sql) counter = cint(rs("Count")) counter = counter + 1 sql = "UPDATE counter set Count ='"& counter &"' WHERE counterID = 151" set rs = conn.execute(sql) Set rs = Nothing conn.close set conn = nothing %>

© 2008 John Michael Pierobon