addstaf.asp

来自「很好的OA办公系统」· ASP 代码 · 共 57 行

ASP
57
字号
<!--#include file="asp/sqlstr.asp"-->
<!--#include file="asp/addstaf.asp"-->
<!--#include file="asp/bgsub.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
%>
<%
set conn=opendb("oabusy","conn","accessdsn")
set rs=server.createobject("adodb.recordset")
sql="select * from userinf where username='" & oabusyusername&"'"
rs.open sql,conn,1
cook_allow_control_all_user=rs("allow_control_all_user")     
conn.close
set conn=nothing
set rs=nothing
if cook_allow_control_all_user="no" then
response.write("<font color=red size=""+1"">对不起,您没有这个权限!</font>")
	response.end
	end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="css/css.css">
<title>增加下属用户</title>
</head>
<body bgcolor="#ffffff" topmargin="5" leftmargin="5">
<%
 
%>
<center>
<b>增加<%=oabusyuserdept%>员工用户</b><br><font color=red>*</font>项必须填写
</center>
<%
 
%>
&nbsp;<br>
<center>
<%
call addstaf("addstaf.asp")
%>
</center>
<%
 
%>
</body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?