<%@LANGUAGE="VBSCRIPT" CODEPAGE="CP_ACP"%> 无标题文档
       
<%response.write session("chkkeshi")%> 通知管理
 
<% sql ="select * from tongzhi where 科室='"&trim(session("chkkeshi"))&"' Order By 日期 DESC" openrs rs,sql,1,2 if rs.recordcount=0 then response.write"没有通知可以管理!" else %> <%do while not rs.eof%> <% rs.movenext loop rs.close set rs=nothing set conn=nothing %>
标题
发布日期
修改
删除
<%response.write rs("标题")%>
<%response.write year(rs("日期"))&"-"&month(rs("日期"))&"-"&day(rs("日期"))%>
<%response.write"修改"%>
<%response.write"删除"%>
<%end if%>