left2.asp
来自「办公自动化系统 适用于办公室的各种几本功能的操作 功能比较简单」· ASP 代码 · 共 41 行
ASP
41 行
<%dim ThisKey
'ThisKey = "a"
%>
<!--include file="../inc/permission.asp"-->
<!--#include file="../inc/connection.asp"-->
<!--#Include file="../inc/Tree1.asp"-->
<%
'if not Session("CheckedYes") then
' Set ASPObj = Server.CreateObject("aspRegister.aspReg")
' ASPObj.CheckReg
' Set ASPObj=Nothing
' Session("CheckedYes") = true
'end if
if lcase(Session("LoginName"))="administrator" then
oConn.close
set oConn=nothing
response.redirect "Left.asp"
end if
%>
<html>
<head>
<title>用户管理查询</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="../CSS/main.css"></head>
</head>
<body>
<p></p>
<p><a href="../User/Main.asp?SelectID=0" target="Right">添加新用户</a></p>
<%
'Session("LoginID")="32"
ATree "tblUser","Right","main.asp"
%>
</body>
<form method="post">
<input type="hidden" name="id" value="<%=CID%>">
</form>
</html>
<!--#include file="../inc/connclose.asp"-->
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?