<% dim rsNewsFlash set rsNewsFlash = db.execute("select *, Datename(m,NewsCat) as MonthL, Datepart(yyyy,NewsCat) as YearL from tNewsFlash where DateExpired > getdate() and Brand <> 'H' order by NewsCat desc, NewsDisplayPriority desc") while NOT rsNewsFlash.EOF %> <% rsNewsFlash.movenext wend rsNewsFlash.close db.close set db=nothing %>
<%=rsNewsFlash.fields("MonthL")%> <%=rsNewsFlash.fields("YearL")%> - " class="link2"><%=rsNewsFlash.fields("Magazine")%>
<%if len(trim(rsNewsFlash.fields("URLNewsImageSmall"))) > 0 then%> "> " align=left vspace=3 border=0> <%end if%> <%if len(trim(rsNewsFlash.fields("URLNewsInsideSmall"))) > 0 then%> " align=left vspace=3 border=0> <%end if%> <%=rsNewsFlash.fields("NewsShortDescription")%>