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

Daily Baseball Quiz

Thursday, June 11, 2009
Today's theme is: Florida Marlins

Who collected the first hit in the history of the Florida Marlins?
Who was the first Florida Marlin to hit two home runs in one inning?
Who was the first player to play for both the Marlins and the Rockies?
Who was the first Florida Marlin to steal four bases in one game?
Who was the first Florida Marlin to walk five times in one game?
Who is the first Florida Marlin to lead the National League in stolen bases?
Who was the first Florida Marlin to collect 50 doubles in one season?
Who was the first Florida Marlin to hit a grand slam on opening day?
Who was the first Marlin to hit 40 home runs in one season?

<% ' Get the current date currentDate = date() ' Convert the expiration date expdate = CDate(#6/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(162) set rs = conn.execute(sql) counter = cint(rs("Count")) counter = counter + 1 sql = "UPDATE counter set Count ='"& counter &"' WHERE counterID = 162" set rs = conn.execute(sql) Set rs = Nothing conn.close set conn = nothing %>