<% ' If date is in the future redirect to default if DateDiff("d",CDate(#5/1/2009#),date()) < 0 then response.redirect("default.asp") end if %> First Overall Draft Picks

Daily Baseball Quiz

Friday, May 1, 2009
Today's theme is: First Overall Draft Picks

  1. In what year did the New York Yankees select Brien Taylor as the first overall draft pick?
    1. 1988
    2. 1989
    3. 1990
    4. 1991
    5. 1993

  2. Which team picked Mike Ivie as the first overall draft pick of 1970?
    1. Detroit Tigers
    2. Houston Astros
    3. San Diego Padres
    4. San Francisco Giants
    5. Washington Senators

  3. Which team picked Tim Belcher as the first overall draft pick of 1983?
    1. Chicago White Sox
    2. Cincinnati Reds
    3. Kansas City Royals
    4. Los Angeles Dodgers
    5. Minnesota Twins

  4. Who was not selected as the number one draft pick by Tampa Bay?
    1. Timothy Beckham
    2. Pat Burrell
    3. Josh Hamilton
    4. David Price
    5. Delmon Young

  5. Who was the first overall draft pick in 1971 and in 1975?
    1. Bill Almon
    2. Steve Chilcott
    3. David Clyde
    4. Danny Goodwin
    5. Dave Roberts

  6. Which team picked Floyd Bannister as the first overall draft pick of 1976?
    1. California Angels
    2. Chicago White Sox
    3. Houston Astros
    4. Kansas City Royals
    5. Texas Rangers

  7. Which team picked Harold Baines as the first overall draft pick of 1977?
    1. Baltimore Orioles
    2. Chicago White Sox
    3. Cleveland Indians
    4. Oakland Athletics
    5. Texas Rangers

  8. Which team picked Tim Foli as the first overall draft pick of 1968?
    1. California Angels
    2. Montreal Expos
    3. New York Mets
    4. Pittsburgh Pirates
    5. San Francisco Giants

  9. Which team picked Phil Nevin as the first overall draft pick of 1992?
    1. Chicago Cubs
    2. Detroit Tigers
    3. Houston Astros
    4. San Diego Padres
    5. Texas Rangers
[PREVIOUS DAY] [INDEX] <% ' Get the current date currentDate = date() ' Convert the expiration date expdate = CDate(#5/1/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(121) set rs = conn.execute(sql) counter = cint(rs("Count")) counter = counter + 1 sql = "UPDATE counter set Count ='"& counter &"' WHERE counterID = 121" set rs = conn.execute(sql) Set rs = Nothing conn.close set conn = nothing %>

© 2009 John Michael Pierobon