<% ' If date is in the future redirect to default if DateDiff("d",CDate(#1/29/2009#),date()) < 0 then response.redirect("default.asp") end if %> Those Who Hit A Home Run In Their Last At Bat

Daily Baseball Quiz

Thursday, January 29, 2009
Today's theme is: Those Who Hit A Home Run In Their Last At Bat

  1. Who was the first player to hit home runs for 10 different teams?
    1. Willie Aikens
    2. Albert Belle
    3. Matt Mieske
    4. Robin Ventura
    5. Todd Ziele

  2. Who is the first player to twice hit for the cycle while playing for the Athletics?
    1. Willie Aikens
    2. Mickey Cochrane
    3. Walt Kinney
    4. Ken McMullen
    5. Todd Ziele

  3. Who was the first player to hit 50 doubles and 50 home runs in the same season?
    1. Albert Belle
    2. Mickey Cochrane
    3. Joe Rudi
    4. Ted Williams
    5. Todd Ziele

  4. Who received a one year suspension without pay from commissioner Bowie Kuhn for using illegal drugs?
    1. Willie Aikens
    2. Albert Belle
    3. Tony Brewer
    4. Ken McMullen
    5. Tim Stoddard

  5. Who hit the first home run in the Kingdome?
    1. Willie Aikens
    2. Mike Cubbage
    3. Ken McMullen
    4. Joe Rudi
    5. Todd Ziele

  6. Whose playing career came to a sudden end when he was hit in the head by a pitch?
    1. Albert Belle
    2. Mickey Cochrane
    3. Tony Kubek
    4. Rufino Linares
    5. Ted Williams

  7. Who was the first player to win a Gold Glove award for the Athletics?
    1. Willie Aikens
    2. Marv Blaylock
    3. Ken McMullen
    4. Joe Rudi
    5. Todd Ziele

  8. Which American League third baseman had a 19-game hit streak in 1967 and a 17-game hit streak in 1972?
    1. Mike Cubbage
    2. Ken McMullen
    3. Joe Rudi
    4. Robin Ventura
    5. Todd Ziele

  9. Who is the first player to hit a home run in his last regular season at bat and his last at bat in a World Series?
    1. Wille Aikens
    2. Joe Rudi
    3. Robin Ventura
    4. Ted Williams
    5. Todd Ziele
[PREVIOUS DAY] [INDEX] <% ' Get the current date currentDate = date() ' Convert the expiration date expdate = CDate(#1/29/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(29) set rs = conn.execute(sql) counter = cint(rs("Count")) counter = counter + 1 sql = "UPDATE counter set Count ='"& counter &"' WHERE counterID = 29" set rs = conn.execute(sql) Set rs = Nothing conn.close set conn = nothing %>

© 2008 - 2009 John Michael Pierobon