<% Set RS = my_conn.Execute("SELECT * FROM news where bz1=true and xwgk=true order by bz,T_date desc") '日期降序,BZ1为真 '###打开指定的校园新闻数据用于首页显示 %> 镇海中学网站
   
   
  您现在的位置:菁菁校园>>校务公开

◇ 校 务 公 开 ◇

标 题
发布日期
<% i=1 '开始显示数据库滚动记录 Do While Not RS.EOF and i<=maxCount '仅仅显示前10条滚动新闻%> <%'''###处理下条记录 i=i+1 RS.MoveNext Loop RS.Close '关闭记录集 set rs=nothing '释放系统资源 %>
·
<%'''#显示新闻标题 链接颜色和链接下划线需要调整 titleshow1=replace(rs("T_subject"),"","") titleshow1=replace(titleshow1,"","") titleshow1=replace(titleshow1,"","") titleshow1=replace(titleshow1,"","") titleshow1=replace(titleshow1,"","") titleshow1=replace(titleshow1,"
","") titleshow2=rs("T_subtitle") if titleshow2<>"" then %> <%=rs("T_Subject")%> <%else%> <%=rs("T_Subject")%> <%end if%>
<%=cstr(year(rs("T_date")))&"-"&cstr(month(rs("T_date")))&"-"&cstr(day(rs("T_date")))%>

更多>>

 
   

 
     
◇ 学府概览  
◇ 校长简介  
◇ 办学思想  
◇ 爱教基地  
◇ 镇中简史  
◇ 富的润泽  
◇ 硕德清芬  
◇ 历任领导  
◇ 镇中团队  
◇ 镇中相册  
◇ 校园网络  
◇ 校务公开  
◇ 家校互通