login.asp

来自「C# SQL 齐齐哈尔职业学院学生成绩管理系统」· ASP 代码 · 共 18 行

<!--#include file="conn.asp"-->
<%
Dim strsql
strsql="Select * From admin where admin='" + Request("name") + "'"  
Set rs=conn.Execute(strsql)

If Not rs.Bof and Not rs.Eof Then
pw=rs("password")
if pw<>trim(request("pwd")) then
Response.Redirect"login.htm"
else
Session("admin")=rs("admin")
rs.close
set rs=nothing
Response.Redirect"index.asp"
End If
End If
%>