<% ' If date is in the future redirect to default if DateDiff("d",CDate(#11/18/2009#),date()) < 0 then response.redirect("default.asp") end if %> All-Star Catchers

Daily Baseball Quiz

Wednesday, November 18, 2009
Today's theme is: All-Star Catchers

  1. Who holds the record for most innings caught in one All-Star game with 15?
    1. Johnny Bench
    2. Yogi Berra
    3. Bill Freehan
    4. Mike Piazza
    5. Iván Rodríguez

  2. Who was the first catcher to throw out three runners attempting to steal a base in one All-Star game?
    1. Johnny Bench
    2. Yogi Berra
    3. Lance Parrish
    4. Ted Simmons
    5. Iván Rodríguez

  3. Who holds the Detroit Tigers record for most home runs in one season by a catcher with 33?
    1. Bill Freehan
    2. Matt Nokes
    3. Lance Parrish
    4. Iván Rodríguez
    5. Mickey Tettleton

  4. Who was the first catcher to win the All-Star Most Valuable Player award?
    1. Sandy Alomar, Jr.
    2. Gary Carter
    3. Mike Piazza
    4. Iván Rodríguez
    5. Terry Steinbach

  5. Whose father was the first player in the major leagues from the Dominican Republic?
    1. Sandy Alomar, Jr.
    2. Ramón Hernández
    3. Victor Martínez
    4. Manny Sanguillén
    5. Ozzie Virgil, Jr.

  6. In how many All-Star games was Iván Rodríguez the starting catcher for the American League?
    1. 7
    2. 8
    3. 9
    4. 10
    5. 12

  7. Who was the host of the syndicated television show "The Baseball Bunch"?
    1. Johnny Bench
    2. Yogi Berra
    3. Gary Carter
    4. Terry Kennedy
    5. Mike Piazza

  8. Which All-Star catcher went to the same high school as Paul Molitor?
    1. Darren Daulton
    2. Joe Mauer
    3. Thurman Munson
    4. Terry Steinbach
    5. Jason Varitek

  9. Who was the first catcher to play in the All-Star game the year he won his league's Most Valuable Player award?
    1. Yogi Berra
    2. Roy Campanella
    3. Mickey Cochrane
    4. Gabby Hartnett
    5. Ernie Lombardi
[PREVIOUS DAY] [INDEX] <% ' Get the current date currentDate = date() ' Convert the expiration date expdate = CDate(#11/18/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(322) set rs = conn.execute(sql) counter = cint(rs("Count")) counter = counter + 1 sql = "UPDATE counter set Count ='"& counter &"' WHERE counterID = 322" set rs = conn.execute(sql) Set rs = Nothing conn.close set conn = nothing %>

© 2009 John Michael Pierobon