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

Daily Baseball Quiz

Thursday, June 18, 2009
Today's theme is: New York Mets

  1. Which New York Met pitcher lost 27 consecutive games in which he had a decision between 1992 and 1993?
    1. Eric Hillman
    2. Jeff Innis
    3. Bobby Jones
    4. Wally Whitehurst
    5. Anthony Young

  2. Who lead the New York Mets in caught stealing, strikeouts and home runs in 1986?
    1. Gary Carter
    2. Kevin Mitchell
    3. Howard Johnson
    4. Darryl Strawberry
    5. Mookie Wilson

  3. Who was the first New York Met to lead the National League in home runs?
    1. Howard Johnson
    2. Dave Kingman
    3. Kevin Mitchell
    4. Eddie Murray
    5. Darryl Strawberry

  4. What was the first year the New York Mets did not lose 100 or more games in a season?
    1. 1966
    2. 1968
    3. 1969
    4. 1970
    5. 1971

  5. Who is the first New York Met to have 100 walks in one season?
    1. Edgardo Alfonzo
    2. Bud Harrelson
    3. Keith Hernandez
    4. John Olerud
    5. Darryl Strawberry

  6. Who is the first New York Met to have a hitting steak of at least 30 games?
    1. Moisés Alou
    2. Hubie Brooks
    3. Cleon Jones
    4. Mike Piazza
    5. Mike Vail

  7. Which team did the New York Mets defeat in the 1973 National League playoffs?
    1. Atlanta Braves
    2. Cincinnati Reds
    3. Los Angeles Dodgers
    4. Saint Louis Cardinals
    5. San Francisco Giants

  8. Who was the first New York Met pitcher to allow 10 runs in one game?
    1. Craig Anderson
    2. Jack Fisher
    3. Orlando Hernandez
    4. Jon Matlack
    5. Bill Wakefield

  9. Who was the first New York Met pitcher to win 20 games in one season?
    1. David Cone
    2. Dwight Gooden
    3. Jerry Koosman
    4. Tom Seaver
    5. Frank Viola
[PREVIOUS DAY] [INDEX] <% ' Get the current date currentDate = date() ' Convert the expiration date expdate = CDate(#6/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(169) set rs = conn.execute(sql) counter = cint(rs("Count")) counter = counter + 1 sql = "UPDATE counter set Count ='"& counter &"' WHERE counterID = 169" set rs = conn.execute(sql) Set rs = Nothing conn.close set conn = nothing %>

© 2008 - 2009 John Michael Pierobon