<% ' If date is in the future redirect to default if DateDiff("d",CDate(#11/24/2009#),date()) < 0 then response.redirect("default.asp") end if %> Second Basemen

Daily Baseball Quiz

Tuesday, November 24, 2009
Today's theme is: Second Basemen

  1. Who was the first second baseman to hit for the cycle?
    1. Sam Barkley
    2. Fred Dunlap
    3. Napoleon Lajoie
    4. Bid McPhee
    5. Danny Murphy

  2. Who was the first second baseman to win the American League Most Valuable Player award?
    1. Nellie Fox
    2. Frankie Frisch
    3. Charlie Gehringer
    4. Joe Gordon
    5. Dustin Pedroia

  3. Who was the first second baseman to hit 30 home runs in three different seasons?
    1. Joe Gordon
    2. Rogers Hornsby
    3. Alfonso Soriano
    4. Dan Uggla
    5. Chase Utley

  4. Who played the most number of games at second base?
    1. Eddie Collins
    2. Nellie Fox
    3. Joe Gordon
    4. Joe Morgan
    5. Red Schoendienst

  5. Who hit the most doubles in his career while playing second base?
    1. Roberto Alomar
    2. Craig Biggio
    3. Charlie Gehringer
    4. Jeff Kent
    5. Napoleon Lajoie

  6. Who hit the most triples in his career while playing second base?
    1. Eddie Collins
    2. Frankie Frisch
    3. Charlie Gehringer
    4. Rogers Hornsby
    5. Buddy Myer

  7. Who, in 2007, broke Luis Castillo's record for consecutive errorless chances at second base?
    1. Mark Ellis
    2. Dustin Pedroia
    3. Plácido Polanco
    4. Chase Utley
    5. Rickie Weeks

  8. Who holds the major league career record for most double plays by a second baseman?
    1. Eddie Collins
    2. Frankie Frisch
    3. Charlie Gehringer
    4. Rogers Hornsby
    5. Bill Mazeroski

  9. Who was the last second baseman to play without a glove?
    1. Sam Barkley
    2. Fred Dunlap
    3. Hobe Ferris
    4. Bid McPhee
    5. Fred Pfeffer
[PREVIOUS DAY] [INDEX] <% ' Get the current date currentDate = date() ' Convert the expiration date expdate = CDate(#11/24/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(328) set rs = conn.execute(sql) counter = cint(rs("Count")) counter = counter + 1 sql = "UPDATE counter set Count ='"& counter &"' WHERE counterID = 328" set rs = conn.execute(sql) Set rs = Nothing conn.close set conn = nothing %>

© 2009 John Michael Pierobon