Sayfalara Parola Koruması Eklemek

Web tasarım, Web Programlama ve script dilleri konuları buraya
Cevapla
Kullanıcı avatarı
PeeRLeeSS
Megabyte1
Megabyte1
Mesajlar: 928
Kayıt: 15 Mar 2006, 18:12
Konum: Osmaniye
İletişim:

Sayfalara Parola Koruması Eklemek

Mesaj gönderen PeeRLeeSS »

<%if request("cikis")="evet" then session("administrator") = "yok"
if request("cikis")="evet" then response.redirect Request.ServerVariables("HTTP_REFERER")
%>

<%
dim parola
parola = "forumsordum" ‘---> 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 sifrenizi 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
%>
Kullanıcı avatarı
ccasper
Byte4
Byte4
Mesajlar: 153
Kayıt: 10 Ara 2006, 15:24
cinsiyet: Erkek
Konum: Kocaeli / İzmit
İletişim:

slm

Mesaj gönderen ccasper »

calısma sıstemını de eklersenız sevınırız sanırım kodu kullanırken ıcıne bırseyler eklememız gerekıyor
Cevapla