Siteme Kullanıcı adı şifre bölümü ACİL
5
●697
- 11-01-2013, 09:08:53Üyeliği durdurulduKodlarımın arasında eski bi projem için yazdığım basit şifre kontrol sistemi buldum.
şifrelemek istediğiniz klasörde default.asp şeklinde atın.
default.asp
<!--#include file="sifre.asp"--> <%response.Redirect("yonlendirilecek anasayfa")%>
sifre.asp
<% Session.Timeout = 120 %> <% sifremiz = "buraya şifrenizi gireceksiniz" %> <% if session("usersifre") <> sifremiz then if request.form("usersifre") <> sifremiz then call parolaform else session("usersifre") = sifremiz end if end if %> <% sub parolaform THISPAGE = "http://" & Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("URL") %> <head> <STYLE> BODY {font-family: verdana; font-size: 11} input {font-family: verdana; font-size: 11} </STYLE> <title>Şifreleme Sistemi</title> </head> <body bgcolor="#FFFFFF" text="#000000" link="#000000"> <p align="center"> <form method=post action="<%= thispage%>"> <p align="center"> <p align="center"><span class="style1">Lütfen Gecerli Sifreyi Giriniz. </span><br> <input type="PASSWORD" name="usersifre" value="" size="20" style="font-family: Arial; color: #000000; font-size: 18pt; font-weight: bold"> <br><br> <input type="submit" value="Giris" style="background-color: #FFCC00; font-family: Arial; color: #000000; font-size: 8pt; font-weight: bold"> </p> </form> <br> <p align="center"> <%response.end end sub %>
yönlendirilecek(şifrelenecek) anasayfa dosyanızın başına
<!--#include file="sifre.asp"-->
şeklinde sifre dosyasını include etmeyi unutmayın, şifre giriş kontrol bu dosyada yapılmakta, ayrıca serverınızın asp çalıştırıyor olması gerekmekte.