<% ' If date is in the future redirect to default if DateDiff("d",CDate(#5/22/2009#),date()) < 0 then response.redirect("default.asp") end if %> American League Pitchers With A Three Pitch Inning

Daily Baseball Quiz

Friday, May 22, 2009
Today's theme is: American League Pitchers With A Three Pitch Inning

  1. Who was the first American League pitcher to have a three pitch inning?
    1. Fritz Coumbe
    2. Walter Johnson
    3. Addie Joss
    4. Ed Klepfer
    5. Hippo Vaughn

  2. Who was the first American League pitcher to have a three pitch inning, and have thrown two no hitters?
    1. Walter Johnson
    2. Sam Jones
    3. Addie Joss
    4. Jimmy Key
    5. Sonny Siebert

  3. Who lead the American League in ERA in 1913?
    1. Fritz Coumbe
    2. Molly Craft
    3. Walter Johnson
    4. Ed Klepfer
    5. Hippo Vaughn

  4. Who was the first American League pitcher to four times have a three pitch innings?
    1. Hooks Dauss
    2. Walter Johnson
    3. Addie Joss
    4. Sonny Siebert
    5. Rube Walberg

  5. Who was the first pitcher to have 50 saves in one season in the 21st century?
    1. Floyd Bannister
    2. Tony Fossas
    3. Mariano Rivera
    4. Scott Sanderson
    5. Jay Witasick

  6. Who was the first pitcher to have a three pitch inning while pitching for the New York Yankees?
    1. Tiny Bonham
    2. Sam Jones
    3. Jack McDowell
    4. Scott Sanderson
    5. Hippo Vaughn

  7. Who, in 1997, won 12 consecutive games in 12 consecutive starts?
    1. Floyd Bannister
    2. Tony Fossas
    3. Jimmy Key
    4. Jack McDowell
    5. Brad Radke

  8. Who also played third base in the game he had a three pitch inning?
    1. Tiny Bonham
    2. Fritz Coumbe
    3. Molly Craft
    4. Ed Klepfer
    5. Jerry Terrell

  9. Who won the American League Cy Young Award in 1993?
    1. Floyd Bannister
    2. Jimmy Key
    3. Jack McDowell
    4. Brad Radke
    5. Mariano Rivera
[PREVIOUS DAY] [INDEX] <% ' Get the current date currentDate = date() ' Convert the expiration date expdate = CDate(#5/22/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(142) set rs = conn.execute(sql) counter = cint(rs("Count")) counter = counter + 1 sql = "UPDATE counter set Count ='"& counter &"' WHERE counterID = 142" set rs = conn.execute(sql) Set rs = Nothing conn.close set conn = nothing %>

© 2009 John Michael Pierobon