<% ' If date is in the future redirect to default if DateDiff("d",CDate(#3/25/2009#),date()) < 0 then response.redirect("default.asp") end if %> Players Who Hit 25 Doubles And 25 Triples In The Same Season

Daily Baseball Quiz

Wednesday, March 25, 2009
Today's theme is: Players Who Hit 25 Doubles And 25 Triples In The Same Season

  1. Who hit the first grand slam in major league history?
    1. Roger Connor
    2. Dave Orr
    3. John Reilly
    4. Sam Thompson
    5. George Treadway

  2. Whose record for career home runs did Babe Ruth break in 1921?
    1. Roger Connor
    2. Larry Doyle
    3. Dave Orr
    4. Sam Thompson
    5. Jimmy Williams

  3. Who lead the major leagues in triples in 1903?
    1. Larry Doyle
    2. John Reilly
    3. Sam Thompson
    4. George Treadway
    5. Jimmy Williams

  4. Who had a stroke at age 31, ending his playing career?
    1. Larry Doyle
    2. Dave Orr
    3. Joe Jackson
    4. John Reilly
    5. George Treadway

  5. Who was the first National League player in the 20th century to hit 25 doubles and 25 triples in the same season?
    1. Kiki Cuyler
    2. Larry Doyle
    3. Sam Thompson
    4. George Treadway
    5. Jimmy Williams

  6. Who split his pants running into second base for a double in his first major league game?
    1. Kiki Cuyler
    2. Larry Doyle
    3. Joe Jackson
    4. Sam Thompson
    5. Jimmy Williams

  7. Who is the first player to have 100 RBI, hit 35 doubles, hit 20 home runs and steal 20 bases in the same season?
    1. Kiki Cuyler
    2. Larry Doyle
    3. Joe Jackson
    4. John Reilly
    5. Sam Thompson

  8. Who lead the major leagues in triples in 1885 and 1886?
    1. Roger Connor
    2. Dave Orr
    3. John Reilly
    4. Sam Thompson
    5. George Treadway

  9. Who lead the major leagues in doubles in 1890 and 1893?
    1. Roger Connor
    2. John Reilly
    3. Sam Thompson
    4. George Treadway
    5. Jimmy Williams
[PREVIOUS DAY] [INDEX] <% ' Get the current date currentDate = date() ' Convert the expiration date expdate = CDate(#3/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(84) set rs = conn.execute(sql) counter = cint(rs("Count")) counter = counter + 1 sql = "UPDATE counter set Count ='"& counter &"' WHERE counterID = 84" set rs = conn.execute(sql) Set rs = Nothing conn.close set conn = nothing %>

© 2008 John Michael Pierobon