下面的程序是阿喔动感管理通用程序,非常简单不用解释了吧!
if username="admin" and password="admin" then
请记得修改两个admin分别用户名和密码!
login.asp
|
|
__________________________________________________________________
chklogin.asp
<%
dim sql
dim rs
dim seekerrs
dim founduser
dim username
dim companyid
dim password
dim errmsg
dim founderr
founderr=false
FoundUser=false
username=request.form("username")
password=request.Form("password")
if username="" then
response.redirect "index.asp"
end if
if password="" then
response.redirect "index.asp"
end if
if username="admin" and password="admin" then
response.cookies("adminok")=true
response.redirect "manage.asp"
else
response.redirect "index.asp"
end if
%>
作者:阿喔 出处:
(待续)

