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

📄 usermodify.asp

📁 在线考试系统
💻 ASP
字号:
<?xml version="1.0" encoding="gb2312"?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<script>
function checkForm(){
	if(form1.Uid.value==""){
	alert("请填写用户名!");
	form1.Uid.focus();
	return false;
	}
	if(form1.Pwd.value==""){
	alert("请填写密码!");
	form1.Pwd.focus();
	return false;
	}
	if(form1.Pwd.value==""){
	alert("请填写密码!");
	form1.Pwd.focus();
	return false;
	}
	if(form1.Name.value==""){
	alert("请填写姓名!");
	form1.Name.focus();
	return false;
	}
	return true;
}
</script>
<!---#include file="conn.asp"--->
<link href="main.css" rel="stylesheet" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<%
id=request.QueryString("id")
set rst=conn.execute("select * from manager where id="&id)
%>
</head>

<body>
<h3 align="center">添加用户</h3>
<form name="form1" id="form1" method="post" action="UserUpdate.asp?oper=modify&id=<%=id%>" onsubmit="return checkForm();">
  <table width="234" border="1" align="center" cellpadding="2" cellspacing="2" bordercolor="#999999">
    <tr bgcolor="#E0F1FC"> 
      <td width="66" align="right">用户名:</td>
      <td width="159"> 
        <input name="Uid" type="text" id="Uid"  value="<%=rst("Uid")%>"/></td>
    </tr>
    <tr bgcolor="#E0F1FC"> 
      <td align="right">密码:</td>
      <td> 
        <input name="Pwd" type="text" id="Pwd"  value="<%=rst("Pwd")%>"/></td>
    </tr>
    <tr bgcolor="#E0F1FC"> 
      <td align="right">姓名:</td>
      <td> 
        <input name="Name" type="text" id="Name" value="<%=rst("Name")%>"/></td>
    </tr>
    <tr bgcolor="#E0F1FC"> 
      <td align="right">角色:</td>
      <td> 
        <select name="Role" id="Role">
          <option value="manager" <%if(ucase(rst("Role"))="MANAGER")then response.Write("selected")%>>管理员</option>
          <option value="teacher" <%if(ucase(rst("Role"))="TEACHER")then response.Write("selected")%>>教师</option>
        </select></td>
    </tr>
    <tr align="center" bgcolor="#E0F1FC"> 
      <td colspan="2"> 
        <input type="submit" name="Submit" value="提交" />
        &nbsp; <input type="submit" name="Submit2" value="提交" /> </td>
    </tr>
  </table>
  <%
    rst.close()
  conn.close()
  set rst=nothing
  set conn=nothing
  %>
</form>
</body>
</html>

⌨️ 快捷键说明

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