📄 用户授权.asp
字号:
<%
username=request("username")
userpass=request("userpass")
enterpass=request("enterpass")
memo=request("memo")
username=ltrim(rtrim(username))
if username="" or len(username)=0 then
Response.Write "用户名不能为空<a href=用户添加.htm>返回</a>"
Response.end
end if
set conn=server.CreateObject("adodb.connection")
conn.Open "database=school;uid=sa;pwd=;dsn=school"
set rs=server.CreateObject("adodb.recordset")
sql="select * from userset where 用户名='"&username&"'"
rs.Open sql,conn,3
if rs.RecordCount>0 then
Response.Write "此用户名已被注册,用户名不能同名,请重新输入<a href=用户添加.htm>返回</a>"
Response.end
END IF
RS.Close
IF USERPASS<>ENTERPASS THEN
Response.Write "用户密码错误,请重新输入<a href=用户添加.htm>返回</a>"
Response.end
END IF
SQL="INSERT USERSET(用户名,用户口令,描述) VALUES('"&USERNAME&"','"&USERPASS&"','"&MEMO&"')"
RS.Open SQL,CONN,3
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
<title>用户添加 欢迎使用欣科软件</title>
</head>
<body background="../imagesBkg35.jpg">
<p><font color="#0000FF" size="6">用户授权</font></p>
<hr color="#0000ff">
<div align="center"><center>
<OBJECT classid=clsid:BD96C556-65A3-11D0-983A-00C04FC29E33 height=14 id=rds1
width=14>
<PARAM NAME="ExecuteOptions" VALUE="2">
<PARAM NAME="FetchOptions" VALUE="3">
<PARAM NAME="SortDirection" VALUE="-1">
<PARAM NAME="InternetTimeout" VALUE="500000">
</OBJECT>
<table border="2" cellpadding="2" cellspacing="3" width="659" height="871">
<tr>
<td width="143" height="23"><p align="center"><strong><font face="楷体_GB2312" size="4">用户名</font></strong></td>
<td width="492" height="23"><input type="text" name="user_name" size="27"
VALUE="<%=USERNAME%>" readonly style="font-family: 宋体; font-size: 15"></td>
</tr>
<tr>
<td width="143" height="23"><p align="center"><strong><font face="楷体_GB2312" size="4">用户口令</font></strong></td>
<td width="492" height="23"><input type="password" name="user_pass" size="27"
VALUE="<%=USERPASS%>" readonly style="font-family: 宋体; font-size: 15"></td>
</tr>
<tr>
<td width="143" height="23"><p align="center"><strong><font face="楷体_GB2312" size="4">用户确认口令</font></strong></td>
<td width="492" height="23"><input type="password" name="enter_pass" size="27"
VALUE="<%=ENTERPASS%>" readonly style="font-family: 宋体; font-size: 15"></td>
</tr>
<tr>
<td width="143" height="23"><p align="center"><strong><font face="楷体_GB2312" size="4">描述</font></strong></td>
<td width="492" height="23"><input type="text" name="user_memo" size="27"
VALUE="<%=MEMO%>" readonly style="font-family: 宋体; font-size: 15"></td>
</tr>
<tr>
<td width="575" colspan="2" height="729">学生管理<p> <input type="checkbox"
name="C1" value="没授权" ONCLICK="C1_CLICK()">基本资料 <input
type="checkbox" name="C2" value="没授权" ONCLICK="C2_CLICK()" >个人档案
<input type="checkbox" name="C3" value="没授权" ONCLICK="C3_CLICK()">班级管理  
<input type="checkbox" name="C46" value="ON" ONCLICK="C46_CLICK()">学生学号
<input type="checkbox" name="C4" value="没授权" ONCLICK="C4_CLICK()">初始设置</p>
<p>成绩管理</p>
<p> <input type="checkbox" name="C5" value="没授权" ONCLICK="C5_CLICK()">成绩输入
<input type="checkbox" name="C6" value="没授权" ONCLICK="C6_CLICK()">综合报表
<input type="checkbox" name="C7" value="没授权" ONCLICK="C7_CLICK()"
>成绩查询 <input type="checkbox"
name="C8" value="没授权" ONCLICK="C8_CLICK()">统计分析</p>
<p> <input type="checkbox" name="C9" value="没授权" ONCLICK="C9_CLICK()">课程设置</p>
<p>教师管理</p>
<p> <input type="checkbox" name="C10" value="没授权" ONCLICK="C10_CLICK()">基本资料
<input type="checkbox" name="C11" value="没授权" ONCLICK="C11_CLICK()">个人档案
<input type="checkbox" name="C12" value="没授权" ONCLICK="C12_CLICK()">初始设置</p>
<p>图书管理</p>
<p> <input type="checkbox" name="C13" value="没授权" ONCLICK="C13_CLICK()">图书类别设置 <input
type="checkbox" name="C14" value="没授权" ONCLICK="C14_CLICK()">图书借阅登记 <input
type="checkbox" name="C15" value="没授权" ONCLICK="C15_CLICK()">图书借还 <input type="checkbox"
name="C16" value="没授权" ONCLICK="C16_CLICK()">待借图书目录浏览</p>
<p> <input type="checkbox" name="C17" value="没授权" ONCLICK="C17_CLICK()">打印催还单 <input
type="checkbox" name="C18" value="没授权" ONCLICK="C18_CLICK()">借书记录维护 <input
type="checkbox" name="C19" value="没授权" ONCLICK="C19_CLICK()">图书目录查询 <input type="checkbox"
name="C20" value="没授权" ONCLICK="C20_CLICK()">查询借书证目录 </p>
<p> <input type="checkbox" name="C21" value="没授权" ONCLICK="C21_CLICK()">图书库存查询 <input
type="checkbox" name="C22" value="没授权" ONCLICK="C22_CLICK()">查询外借图书目录 <input
type="checkbox" name="C23" value="没授权" ONCLICK="C23_CLICK()">查询图书总册数 <input type="checkbox"
name="C24" value="没授权" ONCLICK="C24_CLICK()">打印图书目录</p>
<p> <input type="checkbox" name="C25" value="没授权" ONCLICK="C25_CLICK()">打印图书库存 <input
type="checkbox" name="C26" value="没授权" ONCLICK="C26_CLICK()">打印借书证目录 <input
type="checkbox" name="C27" value="没授权" ONCLICK="C27_CLICK()">打印外借图书目录 <input
type="checkbox" name="C28" value="没授权" ONCLICK="C28_CLICK()">图书增加</p>
<p> <input type="checkbox" name="C29" value="没授权" ONCLICK="C29_CLICK()">输入图书内容 <input
type="checkbox" name="C30" value="没授权" ONCLICK="C30_CLICK()">图书目录维护 <input
type="checkbox" name="C31" value="没授权" ONCLICK="C31_CLICK()">图书分类输入 <input
type="checkbox" name="C32" value="没授权" ONCLICK="C32_CLICK()">出版社输入</p>
<p> <input type="checkbox" name="C33" value="没授权" ONCLICK="C33_CLICK()">发放借书证
<input type="checkbox" name="C34" value="没授权" ONCLICK="C34_CLICK()">收回借书证
<input type="checkbox" name="C35" value="没授权" ONCLICK="C35_CLICK()">更换IC卡
<input type="checkbox" name="C36" value="没授权" ONCLICK="C36_CLICK()">借书证维护</p>
<p> <input type="checkbox" name="C37" value="没授权" ONCLICK="C37_CLICK()">读者类别设置 <input
type="checkbox" name="C38" value="没授权" ONCLICK="C38_CLICK()">查IC卡更换记录 </p>
<p>校产管理</p>
<p> <input type="checkbox" name="C39" value="没授权" ONCLICK="C39_CLICK()">基本资料
<input type="checkbox" name="C40" value="没授权" ONCLICK="C40_CLICK()">校产管理
<input type="checkbox" name="C41" value="没授权" ONCLICK="C41_CLICK()">报表输出
<input type="checkbox" name="C42" value="没授权" ONCLICK="C42_CLICK()">初始设置
</p>
<p><input type="checkbox" name="C43" value="没授权" ONCLICK="C43_CLICK()">公告栏</p>
<p><input type="checkbox" name="C44" value="没授权" ONCLICK="C44_CLICK()">讨论园地</p>
<p><input type="checkbox" name="C45" value="没授权" ONCLICK="C45_CLICK()">电子邮件</p>
<p> </td>
</tr>
</table>
</center></div>
<p align="center"><input type="button" value="用户授权" name="update"
ONCLICK="UPDATE_CLICK()" style="font-family: 宋体; font-size: 15">
<input
type="button" value="取 消" name="CANCLE" style="font-family: 宋体; font-size: 15"></p>
<SCRIPT LANGUAGE="VBSCRIPT">
i1="没授权"
i2="没授权"
i3="没授权"
i4="没授权"
i5="没授权"
i6="没授权"
i7="没授权"
i8="没授权"
i9="没授权"
i10="没授权"
i11="没授权"
i12="没授权"
i13="没授权"
i14="没授权"
i15="没授权"
i16="没授权"
i17="没授权"
i18="没授权"
i19="没授权"
i20="没授权"
i21="没授权"
i22="没授权"
i23="没授权"
i24="没授权"
i25="没授权"
i26="没授权"
i27="没授权"
i28="没授权"
i29="没授权"
i30="没授权"
i31="没授权"
i32="没授权"
i33="没授权"
i34="没授权"
i35="没授权"
i36="没授权"
i37="没授权"
i38="没授权"
i39="没授权"
i40="没授权"
i41="没授权"
i42="没授权"
i43="没授权"
i44="没授权"
i45="没授权"
i46="没授权"
SUB C1_CLICK()
IF C1.checked=TRUE THEN
C1.value="已授权"
i1=c1.value
else
c1.value="没授权"
i1=c1.value
end if
END SUB
SUB C46_CLICK()
IF C46.checked=TRUE THEN
C46.value="已授权"
i46=c46.value
else
c46.value="没授权"
i46=c46.value
end if
END SUB
SUB C2_CLICK()
IF C2.checked=TRUE THEN
C2.value="已授权"
i2=c2.value
else
c2.value="没授权"
i2=c2.value
end if
END SUB
SUB C3_CLICK()
IF C3.checked=TRUE THEN
C3.value="已授权"
i3=c3.value
else
c3.value="没授权"
i3=c3.value
end if
END SUB
SUB C4_CLICK()
IF C4.checked=TRUE THEN
C4.value="已授权"
i4=c4.value
else
c4.value="没授权"
i4=c4.value
end if
END SUB
SUB C5_CLICK()
IF C5.checked=TRUE THEN
C5.value="已授权"
i5=c5.value
else
c5.value="没授权"
i5=c5.value
end if
END SUB
SUB C6_CLICK()
IF C6.checked=TRUE THEN
C6.value="已授权"
i6=c6.value
else
c6.value="没授权"
i6=c6.value
end if
END SUB
SUB C7_CLICK()
IF C7.checked=TRUE THEN
C7.value="已授权"
i7=c7.value
else
c7.value="没授权"
i7=c7.value
end if
END SUB
SUB C8_CLICK()
IF C8.checked=TRUE THEN
C8.value="已授权"
i8=c8.value
else
c8.value="没授权"
i8=c8.value
end if
END SUB
SUB C9_CLICK()
IF C9.checked=TRUE THEN
C9.value="已授权"
i9=c9.value
else
c9.value="没授权"
i9=c9.value
end if
END SUB
SUB C10_CLICK()
IF C10.checked=TRUE THEN
C10.value="已授权"
i10=c10.value
else
c10.value="没授权"
i10=c10.value
end if
END SUB
SUB C11_CLICK()
IF C11.checked=TRUE THEN
C11.value="已授权"
i11=c11.value
else
c11.value="没授权"
i11=c11.value
end if
END SUB
SUB C12_CLICK()
IF C12.checked=TRUE THEN
C12.value="已授权"
i12=c12.value
else
c12.value="没授权"
i12=c12.value
end if
END SUB
SUB C13_CLICK()
IF C13.checked=TRUE THEN
C13.value="已授权"
i13=c13.value
else
c13.value="没授权"
i13=c13.value
end if
END SUB
SUB C14_CLICK()
IF C14.checked=TRUE THEN
C14.value="已授权"
i14=c14.value
else
c14.value="没授权"
i14=c14.value
end if
END SUB
SUB C15_CLICK()
IF C15.checked=TRUE THEN
C15.value="已授权"
i15=c15.value
else
c15.value="没授权"
i15=c15.value
end if
END SUB
SUB C16_CLICK()
IF C16.checked=TRUE THEN
C16.value="已授权"
i16=c16.value
else
c16.value="没授权"
i16=c16.value
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -