login_ok.asp

具有计划、任务、通告、公文、员工档案、等网络办公功能

<%
adminname=request.form("adminname")
adminpass=request.form("adminpass")
admincode=request.form("admincode")

if adminname="" or adminpass="" then
	response.write("<script language='javascript'>alert('用户名或密码不能为空，请输入！');history.back();</script>")
	response.end
end if
if admincode="" or admincode<>cstr(session("admincode")) then
	response.write("<script language='javascript'>alert('附加码错误，请重新输入！');history.back();</script>")
	response.end
end if
%>
<!--#include file="../include/conn.asp"-->
<%
sqlstr="select adminid from tbl_admin where adminname='"&adminname&"' and adminpass='"&adminpass&"'"
set rs=conn.execute(sqlstr)
if rs.eof then
	response.write("<script language='javascript'>alert('用户名或密码不正确，请输入！');history.back();</script>")
	response.end
end if
session("adminname")=adminname

response.redirect "admin_index.asp"
%>