📄 helpleft.asp
字号:
<%response.expires=0%>
<!--#include file="asp/bgsub.asp"-->
<!--#include file="asp/opendb.asp"-->
<!--#include file="asp/getpopedom.asp"-->
<!--#include file="asp/keepformat.asp"-->
<%
'-----------------------------------------
oabusyname=request.cookies("oabusyname")
oabusyusername=request.cookies("oabusyusername")
oabusyuserdept=request.cookies("oabusyuserdept")
oabusyuserlevel=request.cookies("oabusyuserlevel")
if oabusyusername="" then
response.write("<script language=""javascript"">")
response.write("window.top.location.href='default.asp';")
response.write("</script>")
response.end
end if
helppopedom=getpopedom("allow_manage_help",oabusyusername)
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="css/css.css">
<title>企业办公自动化IE37-OA系统</title>
<base target="main">
<script language="javascript">
window.parent("main").location.href="helpinf.asp?helpsort=工作计划帮助";
</script>
</head>
<body background="images/head_r1_c3.jpg" leftMargin=1 topMargin=0 marginwidth="0" marginheight="0">
<table id=table1 width="100%" border="0" cellspacing="0" cellpadding="0" class="borderon">
<tr>
<td height="20" style="padding-top:3px"><a href="left.asp" target="_self"><nobr> IE37办公导航</nobr></a></td>
</tr>
</table>
<table border="0" width="100%" cellspacing="0" cellpadding="0" height="94">
<tr>
<td width="124" height="114" bgcolor="#FFFFFF" align="left">
<%
'打开数据库显示帮助类别
set conn=opendb("oabusy","conn","accessdsn")
set rs=server.createobject("adodb.recordset")
sql="select * from helpsort"
rs.open sql,conn,1
while not rs.eof and not rs.bof
%>
<img src="images/bookhelp.gif" width=16 height=16 border=0><a href="helpinf.asp?helpsort=<%=rs("helpsort")%>"><%=keepformat(rs("helpsort"))%></a><br>
<%
rs.movenext
wend
%>
<center>
<%
if helppopedom="" then
%>
</center>
<img src="images/bookhelp.gif" width=16 height=16 border=0><a href="edithelpsort.asp">管理帮助类别</a><br>
<img src="images/bookhelp.gif" width=16 height=16 border=0><a href="inputhelpinf.asp">输入帮助信息</a>
<%
end if
rs.close
on error resume next
rs.open "select count(*) as countss from userinf",conn,1,1
usercount=rs("countss")
if usercount >500 then
rs.close
set rs=nothing
%>
<script language=javascript>
window.alert("对不起,超过了最大使用用户数,请删除部分用户!");
parent("main").location.href="/usercontrol.asp";
</script>
<%
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</p>
</td>
<td bgcolor="#FFFFFF" width="1" height="114"></td>
</tr>
<tr>
<td width="124" bgcolor="#FFFFFF" height="1" align="center"> </td>
<td width="1" bgcolor="#FFFFFF" height="1"> </td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -