<%@ LANGUAGE="VBSCRIPT" %>
<% Response.Buffer = True %>
<% STATUS = Request.FORM("STATUS") %>
<% PASSWORD = Request.FORM("PASSWORD") %>
<% If PASSWORD = adminpass THEN %>
<% Session("password") = adminpass %>
<% RESPONSE.REDIRECT "book.asp" %>
<% else %>
<% If PASSWORD <> adminpass and password <> "" THEN %>
<%=error%>
<% End If %>
<% End If %>
<%=TITLE2%>
<%'=err%>
<%=RETU%>