<%
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%>
<%end if%>
|