📄 login.asp
字号:
<!--#include file="conn.asp"-->
<%
dim sql
dim rs
dim username
dim password
username=replace(trim(request("username")),"'","")
password=replace(trim(Request("password")),"'","")
set rs=server.createobject("adodb.recordset")
sql="select * from admin where password='"&password&"' and username='"&username&"'"
' response.write ""&sql&""
' response.end
rs.open sql,conn,1,1
if not(rs.bof and rs.eof) then
if password=rs("password") then
response.cookies("users")("username")=username
response.cookies("users")("userpass")=password
Session("open")=True
Response.Redirect "main.asp"
end if
end if
rs.close
conn.close
set rs=nothing
set conn=nothing
%>
<html>
<head>
<title>更新登陆</title>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<style type="text/css">
<!--
input {
background-color: #FFFFFF;
border: 1px solid #CCCCCC;
}
table {
font-size: 9pt;
}
-->
</style>
</head>
<body bgColor=#ffffff leftMargin=0 topMargin=0>
<br>
<br><br>
<form method="post">
<table border="0" cellspacing="1" cellpadding="2" bordercolordark="#FFFFFF" bordercolorlight="#88E8F8" align="center">
<!--DWLayoutTable-->
<tr>
<td width="165" valign="top">用户名:
<input name="username" type="text" class="input01" id="username" size="10">
<input name="comurl" type="hidden" id="comurl" value="<%=url%>"> <br> <br>
密 码:
<input name="password" type="password" class="input01" id="password" size="10"></td>
</tr>
<tr>
<td valign="top"> <input name="Submit" type="submit" class="button1" value="提交">
<input name="Submit2" type="reset" class="button1" value="重写">
</td>
</tr>
</table>
</form>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -