📄 userupdate.asp
字号:
<!-- #include file="conn.asp" -->
<!-- #include file="usertop.asp" -->
<%
'判断用户是否具有添加数据的权限
if Session("level") < 3 then
Response.write"<br><br><br><br><br><br><font color=red>您没有操作权限或连接已经超时，请重新登录！</font>"
Response.end
end if
'取得被编辑记录的标识
user=Request("user")
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="Select * From t_user Where d_user='"&user&"'"
rs.Open sql,conn,1,1
%>
<script language="javascript">
function check()
{
if(document.formup.User.value=="")
{
document.getElementById("1").innerHTML = " <font color=red>*用户名不能为空！ </font>";
return false;
}
var str1 = document.getElementById("User").value;
if(str1.length>12)
{
document.getElementById("1").innerHTML = " <font color=red>*大于12个字符！ </font>";
return false;
}
if(document.formup.Pass.value=="")
{
document.getElementById("2").innerHTML = " <font color=red>*密码不能为空！ </font>";
return false;
}
var str2 = document.getElementById("Pass").value;
if(str2.length>12)
{
document.getElementById("2").innerHTML = " <font color=red>*大于12个字符！ </font>";
return false;
}
return true;
}
</script>
<script language="javascript" type="text/javascript">
function check1()
{
var stra = document.getElementById("User").value;
if(stra.length!=0 || stra.length <=12)
{
document.getElementById("1").innerHTML = "";
}
var strb = document.getElementById("Pass").value;
if(strb.length!=0 || strb.length <=12)
{
document.getElementById("2").innerHTML = "";
}
}
</script>
<html>
<head>
</head>
<body>
<table align="center" background="images/body3.gif" width="776" height="357">
<tr><td>
<h4 align="center">用户<% =Server.HTMLEncode(trim(rs("d_user"))) %>的数据</h4>
<form method="post" action="usermodify.asp" onSubmit="return check()" name="formup">
<table align="center" border="0" width="400">
<tr><td height="33">用户名：</td>
<td><input type="text" name="User" size="12" value="<% =Server.HTMLEncode(trim(rs("d_user"))) %>" onBlur="return check1()">(* 必填，最长12个字符)</td>
<td align="left" width="28%"><span id="1"></span></td>
</tr>
<tr><td height="33">密码：</td>
<td><input type="text" name="Pass" size="12" value="<% =Server.HTMLEncode(trim(rs("d_pass"))) %>" onBlur="return check1()">(* 必填，最长12个字符)</td>
<td><span id="2"></span></td>
</tr>
<tr><td height="34">权限：</td>
<td><select size="1" name="level">
<option value=1>1</option>
<option value=2>2</option>
<option value=3>3</option>
</select>
</td>
</tr>
<td><input type="hidden" name="huser" size="12" value="<% =Server.HTMLEncode(trim(rs("d_user"))) %>"></td>
<!--在回显数据的时候，在表单中使用了一个名为“huser”的隐藏域，其目的是为了向后面的数据修改页面“usermodify.asp”传递记录标识-->
</table>
<p>
<div align="center">
<input type="submit" value="确定" name="add">
<input type="reset" value="取消" name="res">
</div>
</form>
</td></tr>
</table>
<!-- #include file="userbottom.asp" -->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -