📄 login.asp
字号:
<!--#include File="../ConnDB.asp"-->
<%
'根据录入的用户信息查询数据
AdminId = Trim(Session("admin_id"))
AdminPwd = Trim(Session("admin_pwd"))
If AdminId <> "" Then
sql="Select * From Admin Where AdminId= '" & AdminId & "' And Passwd='" & AdminPwd & "'"
Set rsa = Conn.Execute(sql)
'如果用户存在，则转向到AdminIndex.asp
If Not rsa.EOF Then
Response.Redirect("AdminIndex.asp")
End If
End If
%>
<html>
<head>
<title>管理员登录</title>
<link rel="stylesheet" href="../style.css">
</head>
<body>
<form name="myform" action="putSession.asp" method="Post">
<br>
<table border="0" align="center">
<tr><td align=center><h2>管理员登录</h2></td></tr>
</table>
<table border="0" align="center">
<tr>
<td align="right">管理员账号:</td>
<td><input maxLength="20" name="loginname" size="30"></td>
</tr>
<tr>
<td align="right">管理员密码:</td>
<td><input maxLength="20" name="password" size="30" type="password"></td>
</tr>
<tr>
<td align="right"> </td>
<td align="center"> </td>
</tr>
<tr>
<td align="right"> </td>
<td align="center"><input type="submit" value=" 登 陆 "></td>
</tr>
</table>
</form>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -