<%
Msg = ""
Session("AdminID")=""
Session("AdminPd")=""
EventType = Left(UCase(Request("EventType")),16)
If EventType = "LOGIN" Then
if Request("AdminID")="aaa" and Request("AdminPd")="bbb" then
Session("AdminID")=Request("AdminID")&""
Session("AdminPd")=Request("AdminPd")&""
'Msg="you are logged in successfully!"
'go to URL
Response.Redirect "adminMainMenu.asp"
else
Msg="Please make sure the user ID and password!"
end if
end if
'Closing connection
EvtType = ""
%>
SNINY Admin Login
