⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 helpleft.asp

📁 一套简单的OA系统
💻 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>&nbsp;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 + -