<% ' If date is in the future redirect to default if DateDiff("d",CDate(#8/28/2009#),date()) < 0 then response.redirect("default.asp") end if %> Most Games Played By Position For The Saint Louis Cardinals

Daily Baseball Quiz

Friday, August 28, 2009
Today's theme is: Most Games Played By Position For The Saint Louis Cardinals

  1. Which pitcher started the most number of games for the Saint Louis Cardinals?
    1. Bill Doak
    2. Bob Forsch
    3. Bob Gibson
    4. Jesse Haines
    5. Bill Sherdel

  2. Who caught the most number of games for the Saint Louis Cardinals?
    1. Tim McCarver
    2. Tom Pagnozzi
    3. Del Rice
    4. Ted Simmons
    5. Jimmie Wilson

  3. Who played the most number of games for the Saint Louis Cardinals at first base?
    1. Jim Bottomley
    2. Keith Hernández
    3. Ed Konetchy
    4. Stan Musial
    5. Albert Pujols

  4. Who played the most number of games for the Saint Louis Cardinals at second base?
    1. Frankie Frisch
    2. Rogers Hornsby
    3. Julián Javier
    4. Red Schoendienst
    5. Fernando Viña

  5. Who played the most number of games for the Saint Louis Cardinals at third base?
    1. Ken Boyer
    2. Terry Pendleton
    3. Ken Reitz
    4. Mike Shannon
    5. Joe Torre

  6. Who played the most number of games for the Saint Louis Cardinals at shortstop?
    1. Dal Maxvill
    2. Edgar Rentería
    3. Ozzie Smith
    4. Garry Templeton
    5. Marty Marion

  7. Who played the most number of games for the Saint Louis Cardinals in left field?
    1. Lou Brock
    2. Vince Coleman
    3. Joe Medwick
    4. Stan Musial
    5. Tip O'Neill

  8. Who played the most number of games for the Saint Louis Cardinals in center field?
    1. Jim Edmonds
    2. Curt Flood
    3. Ray Lankford
    4. Willie McGee
    5. Terry Moore

  9. Who played the most number of games for the Saint Louis Cardinals in right field?
    1. Patsy Donovan
    2. Steve Evans
    3. George Hendrick
    4. Stan Musial
    5. Enos Slaughter
[PREVIOUS DAY] [INDEX] <% ' Get the current date currentDate = date() ' Convert the expiration date expdate = CDate(#8/28/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(240) set rs = conn.execute(sql) counter = cint(rs("Count")) counter = counter + 1 sql = "UPDATE counter set Count ='"& counter &"' WHERE counterID = 240" set rs = conn.execute(sql) Set rs = Nothing conn.close set conn = nothing %>

© 2009 John Michael Pierobon