即時公告：

<%=session("跑馬燈")%>

<%set rs=conn.execute("select 自動編號,標題,網頁分類代號 from 網頁文章 where 首頁顯示='是' and 網頁分類代號 in (select 自動編號 from 網頁分類 where 階層=117 ) order by 排序") do while not rs.eof %>
1. &p=<%=rs("自動編號")%>" ><%=rs("標題")%>
<%rs.movenext loop%>

<%set rs=conn.execute("select 自動編號,標題,圖檔 from 網頁文章 where 首頁顯示='是' and 網頁分類代號=120 order by 排序")%> <%set rs1=conn.execute("select count(*) from 網頁文章 where 首頁顯示='是' and 網頁分類代號=120") p=int(100/rs1(0)) a=rs1(0) %>