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

📄 worker_power.asp

📁 基于b/s的酒店管理系统asp源码
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../login/check_power.asp"-->
<%
if check_power("权限管理")=0 then
  response.redirect("/login/check_false.asp")
else%>  <%
set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = "dsn=hotel;"
Recordset1.Source = "SELECT *  FROM view_power where id="&request.querystring("id")
'Recordset1.Source = "SELECT *  FROM view_power"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 3
Recordset1.Open
Recordset1_numRows = 0
set rsfields=Recordset1.fields
%> 
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language=javascript>
<!--
function goworker_show(){
  location.assign("worker_show.asp");
}
//-->
</script>
</head>

<body bgcolor="#FFFFFF">
员工编号: <%=(Recordset1.Fields.Item("id").Value)%> 
姓名: <%=(Recordset1.Fields.Item("name").Value)%> 
<hr>
<form name="form1" method="post" action="op_worker_power.asp">
  <p><%for i=2 to rsfields.count-1%> 
    <%=rsfields(i).name%>: 
    <input type="checkbox" name="<%=rsfields(i+1).name%>" value=1 
    <%if rsfields(i).value=1 then%>checked<%end if%>>
    &nbsp;&nbsp; <%i=i+1
    next%> 
  </p>
  <p> 
    <input type="hidden" name="id" value=<%=(Recordset1.Fields.Item("id").Value)%>>
    <input type="submit" name="Submit" value="保 存">
    <input type="reset" name="Submit2" value="恢 复">
    <input type="button" name="Submit3" value="返 回" onclick="goworker_show()">
  </p>
</form>
</body>
</html>
<%end if%>

⌨️ 快捷键说明

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