<% ' If date is in the future redirect to default if DateDiff("d",CDate(#3/29/2009#),date()) < 0 then response.redirect("default.asp") end if %> Baltimore Orioles Opening Day Pitchers

Daily Baseball Quiz

Sunday, March 29, 2009
Today's theme is: Baltimore Orioles Opening Day Pitchers

  1. Who was the first Baltimore Orioles opening day starting pitcher?
    1. Hal Brown
    2. Connie Johnson
    3. Lou Kretlow
    4. Don Larsen
    5. Bill Wight

  2. Who was the first Baltimore Orioles pitcher to win 25 games in a season?
    1. Steve Barber
    2. Pat Dobson
    3. Dave McNally
    4. Jim Palmer
    5. Steve Stone

  3. Who was the first Baltimore Orioles opening day starting pitcher get the win on opening day?
    1. Steve Barber
    2. Hal Brown
    3. Don Larsen
    4. Tom Phoebus
    5. Bill Wight

  4. Who lead the American League in ERA in 1984?
    1. Mike Boddicker
    2. Storm Davis
    3. Dennis Martínez
    4. Jim Palmer
    5. Rick Sutcliffe

  5. Who, at age 20, became the youngest pitcher ever to start an All-Star game?
    1. Jack Harshman
    2. Billy Hoeft
    3. Scott McGregor
    4. Jim Palmer
    5. Jerry Walker

  6. Who is the first pitcher to have an opening day start for both the Baltimore Orioles and the Seattle Mariners?
    1. Erik Bédard
    2. Jeremy Guthrie
    3. Dennis Martínez
    4. Bob Milacki
    5. Dave Schmidt

  7. Who was the first Baltimore Orioles opening day starting pitcher not born in the United States of America?
    1. Jeff Ballard
    2. Erik Bédard
    3. Rodrigo López
    4. Dennis Martínez
    5. Sidney Ponson

  8. Who pitched eight seasons for the Baltimore Orioles and hit 20 career home runs?
    1. Mike Flanagan
    2. Mike Mussina
    3. Dave McNally
    4. Jim Palmer
    5. Milt Pappas

  9. Who won the American League Cy Young Award in 1979?
    1. Mike Flanagan
    2. Pat Hentgen
    3. Jim Palmer
    4. Steve Stone
    5. Rick Sutcliffe
[PREVIOUS DAY] [INDEX] <% ' Get the current date currentDate = date() ' Convert the expiration date expdate = CDate(#3/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(88) set rs = conn.execute(sql) counter = cint(rs("Count")) counter = counter + 1 sql = "UPDATE counter set Count ='"& counter &"' WHERE counterID = 88" set rs = conn.execute(sql) Set rs = Nothing conn.close set conn = nothing %>

© 2008 John Michael Pierobon