check.asp

来自「一个人事管理系统」· ASP 代码 · 共 18 行

<!-- #include file = "data.asp" -->
<%
name=request.form("name")
pwd=request.form("pwd")

sql="select * from admin where name='"&name&"' and pwd='"&pwd&"'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,2
if rs.eof then
response.Redirect "index.htm"
else
session("name")=RS("name")
session("pwd")=rs("pwd")
session("key")="ok"
response.redirect "main.asp"
end if
rs.close
%>