<% dim tzaddsucs tzaddsucs=0 if not isempty(request("errnumsd")) then errnum=cint(request("errnumsd")) else errnum=0 end if if errnum=1 then response.write"错误!
密码不能为空!" end if if errnum=2 then response.write"科室管理密码输入错误!
请重新输入!" end if if errnum=0 then response.write"添加新通知" end if if errnum=3 then response.write"通知标题不能为空!" end if if errnum=4 then response.write"通知正文不能为空!" end if if errnum=5 then tzaddsucs=1 response.write"



通知添加成功!" end if %>
 
     
 

 

 
 
<% if not isempty(session("tzadminpwd")) then if tzaddsucs=0 then%>
标题
正文
附件
  (附件功能暂不开放)
    
   
<%else end if else%>
所在科室
<%response.write session("chkkeshi")%>
科室密码
 
<%end if%>