<% ' If date is in the future redirect to default if DateDiff("d",CDate(#10/9/2009#),date()) < 0 then response.redirect("default.asp") end if %> New York Yankee Outfielders

Daily Baseball Quiz

Friday, October 9, 2009
Today's theme is: New York Yankee Outfielders

  1. Which New York Yankee outfielder had a 56 game hitting streak in 1941?
    1. Ben Chapman
    2. Joe DiMaggio
    3. Tommy Henrich
    4. Charlie Keller
    5. George Selkirk

  2. Who was the first rookie to hit two home runs in one World Series game?
    1. Hank Bauer
    2. Joe DiMaggio
    3. Charlie Keller
    4. Mickey Mantle
    5. Bernie Williams

  3. Who is the only New York Yankee to have three seasons with more than 20 triples?
    1. Earle Combe
    2. Birdie Cree
    3. Tommy Henrich
    4. Mickey Mantle
    5. Mickey Rivers

  4. Who was the first New York Yankee to hit four doubles in one game?
    1. Johnny Damon
    2. Joe DiMaggio
    3. Johnny Lindell
    4. Bob Meusel
    5. Bernie Williams

  5. Who was the first New York Yankee outfielder to win a Gold Glove award?
    1. Mickey Mantle
    2. Roger Maris
    3. Bobby Murcer
    4. Norm Siebern
    5. Tom Tresh

  6. Which one time New York Yankee outfielder lead the National League in RBI in 1946?
    1. Jackie Jensen
    2. Johnny Lindell
    3. Johnny Mize
    4. Enos Slaughter
    5. Dixie Walker

  7. Who hit ten home runs in only 67 at bats in his first year with the New York Yankees?
    1. Ricky Ledéee
    2. Mickey Mantle
    3. Bobby Murcer
    4. Joe Pepitone
    5. Shane Spencer

  8. Who was the first player to appear in 3 consecutive All-Star games with 3 different teams?
    1. Jesse Barfield
    2. Johnny Damon
    3. Reggie Jackson
    4. Roberto Kelly
    5. Gary Sheffield

  9. Who is the youngest New York Yankee to hit a walk-off home run?
    1. Sammy Byrd
    2. Melky Cabrera
    3. Joe DiMaggio
    4. Jackie Jensen
    5. Mickey Mantle
[PREVIOUS DAY] [INDEX] <% ' Get the current date currentDate = date() ' Convert the expiration date expdate = CDate(#10/9/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(282) set rs = conn.execute(sql) counter = cint(rs("Count")) counter = counter + 1 sql = "UPDATE counter set Count ='"& counter &"' WHERE counterID = 282" set rs = conn.execute(sql) Set rs = Nothing conn.close set conn = nothing %>

© 2009 John Michael Pierobon