<% ' If date is in the future redirect to default if DateDiff("d",CDate(#10/25/2009#),date()) < 0 then response.redirect("default.asp") end if %> Those Who Hit Exactly 50 Doubles In One Season

Daily Baseball Quiz

Sunday, October 25, 2009
Today's theme is: Those Who Hit Exactly 50 Doubles In One Season

  1. Whose daughter, Jada, was diagnosed with a rare genetic disease resulting in loss of vision?
    1. Bobby Abreu
    2. Juan González
    3. Matt Holliday
    4. Derrek Lee
    5. Brian Roberts

  2. Who holds the single season record for doubles by a Detroit Tiger?
    1. Miguel Cabrera
    2. Charlie Gehringer
    3. Juan González
    4. Hank Greenberg
    5. Harry Heilmann

  3. Who lead the American League in stolen bases and caught stealing in 1931, in 1932, and in 1933?
    1. Ben Chapman
    2. Charlie Gehringer
    3. Hank Greenberg
    4. Odell Hale
    5. Harry Heilmann

  4. Who was the first player to have an extra base hit in 14 consecutive games?
    1. Miguel Cabrera
    2. Charlie Gehringer
    3. Hank Greenberg
    4. Stan Musial
    5. Paul Waner

  5. Who, at age 5, had open heart surgery?
    1. Miguel Cabrera
    2. Matt Holliday
    3. Brian Roberts
    4. Stan Spence
    5. Miguel Tejada

  6. Who was the first switch hitter in the American League to hit 50 doubles in one season?
    1. Tris Speaker
    2. Miguel Cabrera
    3. Juan González
    4. Harry Heilmann
    5. Brian Roberts

  7. Who was the first player to lead the American League in assists seven times?
    1. Ben Chapman
    2. Charlie Gehringer
    3. Harry Heilmann
    4. Tris Speaker
    5. Miguel Tejada

  8. Who lead the major leagues in doubles with 50 in 1928?
    1. Ben Chapman
    2. Kiki Cuyler
    3. Charlie Gehringer
    4. Chuck Klein
    5. Paul Waner

  9. Who had the nickname "Bad News"?
    1. Bobby Abreu
    2. Odell Hale
    3. Stan Musial
    4. Stan Spence
    5. Paul Waner
[PREVIOUS DAY] [INDEX] <% ' Get the current date currentDate = date() ' Convert the expiration date expdate = CDate(#10/25/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(298) set rs = conn.execute(sql) counter = cint(rs("Count")) counter = counter + 1 sql = "UPDATE counter set Count ='"& counter &"' WHERE counterID = 298" set rs = conn.execute(sql) Set rs = Nothing conn.close set conn = nothing %>

© 2009 John Michael Pierobon