Şifre korumali giriş
<%
logstatus=request.QueryString("logadm")
if logstatus="true" then
session("user_admin")=""
session.Contents.RemoveAll()
session.Abandon()
'response.Redirect("Cikistamamlaninca yonlenecek sayfa")
end if
action=request.form("action")
if action="login" then
kullanici=trim(request.Form("kullanici"))
sifre=trim(request.Form("sifre"))
if kullanici="fatihdursun" AND sifre="fatihdursun" then
session.Timeout=180
session("user_admin")="admin"
response.Redirect("giristamam.asp")
else
error_msg="Yanlış kullanıcı veya şifre"
end if
end if
%>
<html>
<head>
<title>fatihdursun65.tr.gg Admin giris</title>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1254">
<link href="../nar_css.css" rel="stylesheet" type="text/css">
</head>
<body>
<p> </p>
<p> </p>
<form action="default.asp" method="post" name="giris" target="_top" id="giris" >
<table width="256" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#FF0099">
<tr>
<td>
<table width="254" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#CCCCCC">
<tr>
<td colspan="2"><div align="center"><font color="#990000"><%=error_msg%></font></div></td>
</tr>
<tr>
<td width="95">Kullanıcı</td>
<td width="305"><input name="kullanici" type="text" id="kullanici" size="19" maxlength="20" style="width:100"></td>
</tr>
<tr>
<td>Şifre</td>
<td><input name="sifre" type="password" id="sifre" size="20" maxlength="20" style="width:100"></td>
</tr>
<tr>
<td> </td>
<td><input name="Submit" type="submit" class="submit" value="Giriş">
<input name="action" type="hidden" id="action" value="login"></td>
</tr>
</table>
</td></tr></table>
</form>
</body>
</html>
|
