<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
'setup connection string
set cn=server.createobject("ADODB.Connection")
cn.open="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("..\db\mccullohreunion.mdb") & ";Persist Security Info=False"
set rs=server.createobject("ADODB.Recordset")
rs.activeconnection=cn
set rs2=server.createobject("ADODB.Recordset")
rs2.activeconnection=cn
'get the pid from the previous page incase of accidental navigation
pid=request("pid")
if request("do")="login" then
pwd=request.form("pwd")
if pwd="ce1t1c" then
session("admin")="true"
session("allow")="true"
response.redirect("../admin")
else
session("admin")="false"
end if
else
session("admin")=""
end if
%>
Admin Login