Daily Baseball Quiz

Sunday, August 9, 2009
Today's theme is: Saint Louis Cardinals Infielders

1. Who holds the record for most assists by a second baseman in a season with 641?
   1. Frankie Frisch
   2. Rogers Hornsby
   3. Julián Javier
   4. Red Schoendienst
   5. Ted Sizemore

2. Who was the first Saint Louis Cardinal to lead the league in doubles two years in a row?
   1. Sparky Adams
   2. Jim Bottomley
   3. Rogers Hornsby
   4. Ed Konetchy
   5. Marty Marion

3. In what year did the National League have four Saint Louis Cardinals infielders start the All-Star Game, one at each position?
   1. 1963
   2. 1964
   3. 1965
   4. 1967
   5. 1968

4. Who was the first player to have four consecutive seasons with exactly 24 home runs?
   1. Ken Boyer
   2. Marty Marion
   3. Red Schoendienst
   4. Mike Shannon
   5. Joe Torre

5. Who was the first Saint Louis Cardinal to hit 50 home runs in one season?
   1. Rogers Hornsby
   2. Mark McGwire
   3. Johnny Mize
   4. Stan Musial
   5. Albert Pujols

6. Who was the first Saint Louis Cardinal to have six consecutive seasons with 100 or more RBI?
   1. Jim Bottomley
   2. Rogers Hornsby
   3. Johnny Mize
   4. Stan Musial
   5. Albert Pujols

7. Who was the first to have 150 sacrifice hits as a Saint Louis Cardinal?
   1. Jim Bottomley
   2. Frankie Frisch
   3. Rogers Hornsby
   4. Stan Musial
   5. Ozzie Smith

8. Who holds the record for most assists by a shortstop in a season with 621?
   1. Marty Marion
   2. Edgar Rentería
   3. Ozzie Smith
   4. Garry Templeton
   5. Mike Tyson

9. Who was the first Saint Louis Cardinal to lead the league in RBI?
   1. Ken Boyer
   2. Orlando Cepeda
   3. Rogers Hornsby
   4. Stan Musial
   5. Joe Torre

---

<% ' Get the current date currentDate = date() ' Convert the expiration date expdate = CDate(#8/9/2009#) ' Compare dates comparison = DateDiff("d",expdate,currentDate) ' If date is in the past display the link if comparison > 0 then %> <% 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(221) set rs = conn.execute(sql) counter = cint(rs("Count")) counter = counter + 1 sql = "UPDATE counter set Count ='"& counter &"' WHERE counterID = 221" set rs = conn.execute(sql) Set rs = Nothing conn.close set conn = nothing %>

---

© 2009 John Michael Pierobon