<% set rs=con.execute("select id,heading from press where new='Y' and show='Y' ") if not rs.eof then while not rs.eof intId=rs("id") strHeader=rs("heading") %>

 <%=strHeader%>

<% rs.movenext wend else response.write "

Will be updated soon

" end if rs.close set rs=nothing response.write "

Archives

" set rs=con.execute("select id,heading from press where new='N' and show='Y' order by date_posted desc") if not rs.eof then while not rs.eof intId=rs("id") strHeader=rs("heading") %>

 <%=strHeader%>

<% rs.movenext wend else response.write "

Will be updated soon

" end if rs.close set rs=nothing %>