alogin.asp
来自「online sales system of texttile mill was」· ASP 代码 · 共 29 行
ASP
29 行
<!-- #include file="conn.asp" -->
<html>
<head>
</head>
<body>
<%
count = 0
total_cost = 0
id = request.form("id")
pass = request.form("pass")
Set oRs = Server.CreateObject("ADODB.RecordSet")
SQL = "select * from users where UserName='"&id&"' and password='"&pass&"'"
Set oRs = Objcon.execute(SQL)
if oRs.EOF then
oRs.close
Set oRs = nothing
response.redirect "administrator.asp?invalid=1"
'incorrect values for email or password, do processin
else
oRs.close
Set oRs = nothing
session("admin") = id
response.redirect "reminder.asp"
end if
%>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?