<%if request("cikis")="evet" then session("administrator") = "yok" 
if request("cikis")="evet" then response.redirect Request.ServerVariables("HTTP_REFERER")
%>
 
<%
dim parola
parola = "123456" ‘---> Parolanızı yazın
if session("administrator") <> parola then
if request.form("administrator") <> parola then
call parolaform
else
session("administrator") = parola
end if
end if
%>
 
<%
sub parolaform
parolasayfa = "http://" & Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("URL")
%>
 
<%'-----------Parola Formu -------------------------------------'%>
 
<p align="center"><font color="#FFFFFF"><b>Lütfen yönetici şifrenizi giriniz</b>
</font>
<form method=post action="<%=parolasayfa%>">
<p align="center"> 
<input type="password" name="administrator" value="" size="20" class="form">
<br>
<font face="tahoma, verdana, ms Sans Serif" size="2">
<input name="submit" style="font-family:Tahoma;font-size:11;border-width:1;width:100" type=submit value=::Login::>
</font> 
</form>
 
<%
response.end
end sub
%>