check.asp

一个人事管理系统

<!-- #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
%>