ASP代碼最新新聞顯示NEW圖標

<% dim m,n
   n = (Rs("newsdate").Value)
   m = datediff("d", n, date() )
   if m<=7 then %><img src="images/new.gif" width="27" height="9" />
<% end If%>
   
   
   
<% if datediff("d",rs("newsdate"),date())<=7 then%><img src="images/new.gif" width="27" height="9">
<%end if%>

經測試有效

順便提供一套new圖標．請使用右鍵另存為下載．謝謝