Asp Admin Sayfası Şifreleme
-
arkadaşlar sitemin admin.asp sayfasını şifrelicem admin.asp diyince herkez girebiliyor şuanda nasıl yapabilirm?
-
üyelik koy adam admin se ona göre sesion açıp admin.asp gönder admin admin.asp girdiğnide session açılmamışsa direk ana sayfaya gönder.
-
admin asp nin adını değiştir yönet.asp yap sana kamış bişey
sonra admin asp nin bulunduğu yere default.asp diye bi sayfa oluştur içine
<%
Dim parola
'parola değişkenine formdan gelen parola değikenine atadık
parola = request.form("parola")
'eger parola degiskeninin değeri 1 ise
if parola=1 then
'yonet.asp yönlen
response.Redirect("yonet.asp")
else
'değilse girişiniz yasak diye yazdır
response.Write("girişiniz yasak")
end if
%>sorun olursa müridim pm yolla çözelim
-
<%Response.buffer=True%>
<%
If Not Session("bLoginSuccessful") Then
Response.redirect "login.asp?comebackto=" &_
request.Servervariables("script_name") &_
"?" & Server.urlencode(request.querystring)
else
If Request.Querystring("logout") <> "" Then
Session("bLoginSuccessful") = False
Session.AbanDon
Response.write "<meta http-equiv='refresh' content='0; URL=sifreleneceksayfa.asp'>"
Response.redirect request.Servervariables("script_name")
End If
End If
%>
Burda da login sayfası
<%
Option Explicit
UserName = "kadi belirle"
Password = "sifreyi belirle"
Response.Buffer = True
Session.Timeout = 60
Dim sReferer, sGoBackTo, sUserName, sPassword, bLoginSuccessful, Error
Dim UserName, Password
if request.querystring("comebackto") <> "" then
sReferer = request.querystring("comebackto")
sGoBackTo = "?" & request.querystring
end if
if request.form("Status") = "FormSubmitted" then
sUserName = replace(request.form("txtUserName"),"'","")
sPassword = replace(request.form("txtPassword"),"'","")
If (sUserName = UserName) AND (sPassword = Password) then
bLoginSuccessful = True
Else
bLoginSuccessful = False
Error = "Hatalı! Tekrar deneyin"
Session("count") = Session("count") + 1
if Session("count") > 3 then
Session.abandon
response.redirect sGoBackTo
End if
End if
Session("bLoginSuccessful") = bLoginSuccessful
End if
if bLoginSuccessful Then
if sReferer = "" then
response.redirect "../"
else
response.redirect sReferer
end if
else
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><title>sayfa basligi</title>
<META http-equiv=Content-Type content="text/html; charset=windows-1254">
<META name="description" content="This page requires login">
</HEAD>
<body language="JavaScript" onLoad="document.Login.txtUserName.focus()">
<div align="center">bşlk
</div>
<table border="0" align="center" cellpadding="5" cellspacing="5" bordercolor="#FFFFFF" bgcolor=#FFFFFF>
<form action="login.asp<%=sGoBackTo%>" method="post" name="Login">
<tr>
<%
if Error <> "" then
response.Write "<meta http-equiv='content-type' content='text-html; charset=windows-1254'>"
response.write "<td align=center class=coltext bgcolor=#FFFFFF style=""border-bottom: 1px solid navy;"">" & Error
response.write "</td></tr><tr>"
response.Write "<meta http-equiv='refresh' content='1; URL=login.asp"&sGoBackTo&"'>"
End if
%>
<td width="158" height=80 align=center><table border="0" align="center" cellpadding="2" cellspacing="0">
<tr></tr>
<tr>
<td align="center"><span class="style111">Kullanıcı Adı :</span></td>
</tr>
<tr>
<td width="164" align="center"><input type="Text" name="txtUserName" size="30" class="inputBox"></td>
</tr>
<tr>
<td width="164" align="center"><span class="style111">Şifre:</span></td>
</tr>
<tr>
<td width="164" align="center"><input type="Password" name="txtPassword" size="30" class="inputBox"></td>
</tr>
<tr>
<td align="center"> </td>
</tr>
<tr>
<td width="164" align="center"><span class="text">
<input type="hidden" name="Status" value="FormSubmitted">
<input name="cmdLogin" type="submit" class="inputSubmit" value="Giriş">
</span></td>
</tr>
</table></td>
</tr></form></table>
<div align="center">
</div>
</BODY></HTML>
<% End if %>
-
hacı bu kadar uğraşana kadar web.configden şifrelesene
-
hocalar akşam denemeye çalışıcam da bunları phpde sayfa şifreleme kodu var ya o şekil bişi yapsam varmı asp dede öle bişi popup olarak kutu çıkıyorya sabit bi login pass olur
-
neden asp net e geçmekte bu kadar direniyorsunuz ki ? :D
-
ben aspden de asp.net dende anlamıyorum :) bi script yazdırmışım bi elemana şifrelememiş inek battı gitti bana kaldı şifrelemek:)
-
Asp'de session varmı bilmiorumda varsa onunla yaparsın.
