<% ' If date is in the future redirect to default if DateDiff("d",CDate(#9/30/2009#),date()) < 0 then response.redirect("default.asp") end if %> Last Place Teams

Daily Baseball Quiz

Wednesday, September 30, 2009
Today's theme is: Last Place Teams

  1. Which team came in last in the National League in 1961?
    1. Chicago Cubs
    2. Milwaukee Braves
    3. Philadelphia Phillies
    4. Pittsburgh Pirates
    5. Saint Louis Cardinals

  2. Which team came in last in the National League in 1962?
    1. Chicago Cubs
    2. New York Mets
    3. Philadelphia Phillies
    4. Pittsburgh Pirates
    5. Saint Louis Cardinals

  3. Which last place team, in 2003, won its last series against the Minnesota Twins, to end up with 43 wins and 119 losses for the season?
    1. Chicago Whites Sox
    2. Cleveland Indians
    3. Detroit Tigers
    4. Kansas City Royals
    5. Tampa Bay Devil Rays

  4. What was the first year the Boston Red Sox finished in last place?
    1. 1906
    2. 1922
    3. 1923
    4. 1925
    5. 1926

  5. Which was the first team to finish in last place and have its ace win the Cy Young Award?
    1. Chicago Cubs
    2. Cleveland Indians
    3. Los Angeles Dodgers
    4. New York Mets
    5. Philadelphia Phillies

  6. Which team came in last in the American League in 1966?
    1. Boston Red Sox
    2. California Angels
    3. Kansas City Athletics
    4. New York Yankees
    5. Washington Senators

  7. How many times did the Philadelphia Athletics end up in last place under Connie Mack?
    1. 7
    2. 8
    3. 14
    4. 16
    5. 17

  8. Which last place team lost 108 games in 1998?
    1. Arizona Diamondbacks
    2. Detroit Tigers
    3. Florida Marlins
    4. Pittsburgh Pirates
    5. Tampa Bay Devil Rays

  9. Which team had the worst record in the National League in 1988, in 1989, and in 1990?
    1. Atlanta Braves
    2. Houston Astros
    3. Montreal Expos
    4. Philadelphia Phillies
    5. San Diego Padres
[PREVIOUS DAY] [INDEX] <% ' Get the current date currentDate = date() ' Convert the expiration date expdate = CDate(#9/30/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(273) set rs = conn.execute(sql) counter = cint(rs("Count")) counter = counter + 1 sql = "UPDATE counter set Count ='"& counter &"' WHERE counterID = 273" set rs = conn.execute(sql) Set rs = Nothing conn.close set conn = nothing %>

© 2009 John Michael Pierobon