<% ' If date is in the future redirect to default if DateDiff("d",CDate(#12/11/2009#),date()) < 0 then response.redirect("default.asp") end if %> Minor Leagues

Daily Baseball Quiz

Friday, December 11, 2009
Today's theme is: Minor Leagues

Who had a 61 game hitting streak while playing in the Pacific Coast League?
Who was the first player to win the Most Valuable Player Award in the International League in back-to-back years?
Which was the first team to win the Governors' Cup of the International League three years in a row?
Who, in 2007, had a 43 game hitting streak while playing in the International League?
Which minor league had a team in Havana, Cuba?
In which league do the Omaha Royals play?
In which league do the Carolina Mudcats play?
Which league has teams in Bristol, Virginia, in Johnson City, Tennessee, and in Kingsport, Tennessee?
Which is the oldest minor league, established in the 19th century?

<% ' Get the current date currentDate = date() ' Convert the expiration date expdate = CDate(#12/11/2009#) ' Compare dates comparison = DateDiff("d",expdate,currentDate) ' If date is in the past display the link if comparison > 0 then %>

<% 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(345) set rs = conn.execute(sql) counter = cint(rs("Count")) counter = counter + 1 sql = "UPDATE counter set Count ='"& counter &"' WHERE counterID = 345" set rs = conn.execute(sql) Set rs = Nothing conn.close set conn = nothing %>