%@ Page Language="vb" AutoEventWireup="false" Codebehind="whatsnew.aspx.vb" Inherits="chomel.whatsnew"%>
<% dim day as Integer dim mth as Integer dim year as Integer dim flag as Integer flag = 1 day = CInt(DateTime.Now.ToString("dd")) mth = CInt(DateTime.Now.ToString("MM")) year = CInt(DateTime.Now.ToString("yyyy")) if year < 2008 then flag = 0 end if if year <= 2008 and mth < 8 then flag = 0 end if if year <= 2008 and mth <= 8 and day < 20 then flag = 0 end if if year <= 2009 and mth <= 1 and day < 9 then flag = 0 end if %> <%if flag=1 then%> <%else%> <%end if%>