📄 usernew.asp
字号:
<!--#include file="..\pub\ChkAdmin.asp"-->
<!--#include file="..\CONN.INC"-->
<html>
<head>
<title>Driver Register</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="..." type="text/css">
<link rel="stylesheet" href="..." type="text/css">
</head>
<body bgcolor="#FFFFFF" topmargin="8">
<%
Sqlstring="select d.* from DriverInfo d where d.UserID is null"
set rs=Conn.execute(Sqlstring)
DriverInfo="<Select name=DriverID>"
while not rs.eof
DriverInfo=DriverInfo&"<option value="&rs("DriverID")&">"&rs("DriverName")&"</option>"
rs.movenext
wend
DriverInfo=DriverInfo&"</select>"
set rs=nothing
Response.write "<table border=1 width=700>"
response.write "<form name=UserForm action=UserNew_OK.asp method=post>"
response.write "<tr><td>用户姓名</td><td><input name=RealName></td></tr>"
response.write "<tr><td>账号名称</td><td><input name=UserName></td></tr>"
response.write "<tr><td>账号密码</td><td><input name=Password></td></tr>"
response.write "<tr><td>登记日期</td><td><input name=RegDate ></td></tr>"
response.write "<tr><td>用户类别</td><td><select name=UserType onchange=UserTypeChange()><option value=1>系统管理员</option><option value=2>司机</option><option value=3>普通系统用户</option></select><span id=HiddenLayer></span></td></tr>"
response.write "<tr><td>所属单位</td><td><input name=Affiliation ></td></tr>"
response.write "</tr>"
response.write "</table>"
response.write "<br>"
response.write "<table width=700>"
response.write "<tr><td><center><input type=submit value=确认添加></center></td></tr>"
response.write "</table>"
response.write "</form>"
%>
</body>
</html>
<script>
function UserTypeChange()
{
if (UserForm.UserType.value==2 )
{
HiddenLayer.innerHTML="<%=DriverInfo%>";
}
else
{
HiddenLayer.innerHTML="";
}
}
</script>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -