hocam giriş yaparken panele
giris.asp
<SCRIPT LANGUAGE="JavaScript">
<!-- Begin
if (window != top) top.location.href = location.href;
// End -->
</SCRIPT>
<!--#include file="conn.asp"-->
<!-- #include file=admin/sifrele.asp -->
<head>
<title>BAYİİ GİRİŞİ</title>
<link href="images/style.css" rel="stylesheet" type="text/css" />
<%
durum=request.QueryString("durum")
sayfa=request.QueryString("sayfa")
select case sayfa
case ""
%>
</head>
<table width="689" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="181" height="338"><table width="181" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="181"><img src="images/turkcell.gif"></td>
</tr>
<tr>
<td> </td>
</tr>
</table></td>
<td width="327" align="center"><table width="260" height="150" border="0" cellpadding="0" cellspacing="0">
<tr>
<td><div align="center">
<form method="post" action="?sayfa=parola_kontrol" onSubmit="return check_frmm()" name="kontrol">
<script language="JavaScript">
function check_frmm(){
if (document.kontrol.kullanici.value == ""){
alert ("Lütfen Kullanıcı Adınızı giriniz.");
document.kontrol.kullanici.focus();
return false;
}
if (document.kontrol.kullanici.value.length<4 || document.kontrol.kullanici.value.length>30){
alert ("Kullanıcı Adı 4-30 Karakter Uzunluğunda Olmalı !");
document.kontrol.kullanici.focus();
return false;
}
if (document.kontrol.kullanici.value.search(" ") != -1){
alert("Kullanıcı Adınızda Boşluk Bırakamazsınız. Bütün Harf ve/veya Rakamlar Yan Yana Olmalı.");
document.kontrol.kullanici.focus();
return false;
}
var deg="ABCÇDEFGĞHIİJKLMNOÖPQRSŞTUÜVYZWXabcçdefgğhıijklmnoöpqrsştuüvyzxw0123456789";
var kod=document.kontrol.kullanici.value;
for (var i=0;i<kod.length;i++){
if (deg.indexOf (kod.substr(i,1),0) == -1){
alert ("Kullanıcı Adınızda Özel Karakterler Kullanamazsınız!");
document.kontrol.kullanici.focus();
return false;
}
}
if (document.kontrol.sifre.value == ""){
alert ("Lütfen Şifrenizi Giriniz!");
document.kontrol.sifre.focus();
return false;
}
if (document.kontrol.sifre.value.length<4 || document.kontrol.sifre.value.length>20){
alert ("Şifre 4-20 Karakter Uzunluğunda Olmalı !");
document.kontrol.sifre.focus();
return false;
}
if (document.kontrol.sifre.value.search(" ") != -1){
alert("Şifrenizde Boşluk Bırakamazsınız. Bütün Karakterler Yan Yana Olmalı.");
document.kontrol.sifre.focus();
return false;
}
var kod=document.kontrol.sifre.value;
for (var i=0;i<kod.length;i++){
if (deg.indexOf (kod.substr(i,1),0) == -1){
alert ("Şifrenizde Özel Karakterler Kullanamazsınız!");
document.kontrol.sifre.focus();
return false;
}
}
}
</script>
<table width="268" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="120" height="51"> </td>
<td width="140"> </td>
</tr>
<tr>
<td class="style5"> Kullanıcı Adı:</td>
<td>
<div align="left">
<input name="kullanici" type="text" id="kullanici" style="background-image: url('images/001.gif')" value="Kullanıcı Adınız" size="19">
</div></td></tr>
<tr <%if durum="kullanici_adi_sifre_hata" then response.Write("bgcolor=#FF0000")%>>
<td class="style5"> Şifre</span> : </td>
<td>
<div align="left">
<input name="sifre" type="password" id="sifre" style="background-image: url('images/001.gif')" value="aaaaa" size="17">
</div></td></tr>
<tr>
<td height="25" class="style5"><div align="left"><span class="style5"> Güvenlik Kodu </span> : </div></td>
<td height="25"><div align="left"><img src="admin/captcha.asp" alt="Lütfen Güvenlik Kodunu Giriniz" /> </div></td>
</tr>
<tr <%if durum="guvenlik_kodunda_hata" then response.Write("bgcolor=#FF0000")%>>
<td height="25" class="style5"><div align="left"><span class="style5"> Güvenlik Kodu </span> : </div></td>
<td height="25"><div align="left">
<input type="text" name="gkod" style="background-image: url('images/001.gif')" size="15">
</div></td>
</tr>
<tr>
<td> </td>
<td>
<div align="left">
<input name="Submit" src="images/021.gif" type="image" id="Submit" value="Giriş">
</div></td>
</tr>
<tr>
<td> </td>
<td><a href="sifremi_unuttum.asp" class="style3"><img border="0" src="images/035.gif"></a> </td>
</tr>
</table>
</form>
</div></td>
</tr>
</table></td>
<td width="181" align="left" valign="top"><table width="181" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><div align="center"><img src="images/vodafone.gif" width="121" height="86"></div></td>
</tr>
<tr>
<td height="252"><div align="center"><img src="images/avea.gif" width="144" height="77"></div></td>
</tr>
</table></td>
</tr>
</table>
<%case "parola_kontrol"%>
<%
Function CheckCAPTCHA(valCAPTCHA)
SessionCAPTCHA = Trim(Session("CAPTCHA"))
Session("CAPTCHA") = vbNullString
if Len(SessionCAPTCHA) < 1 then
CheckCAPTCHA = False
exit function
end if
if CStr(SessionCAPTCHA) = CStr(valCAPTCHA) then
CheckCAPTCHA = True
else
CheckCAPTCHA = False
end if
End Function
kullanici=request.Form("kullanici")
sifre=md(request.Form("sifre"))
gkod = Trim(Request.Form("gkod"))
if CheckCAPTCHA(gkod) = false then
response.Redirect("giris.asp?durum=guvenlik_kodunda_hata")
end if
set kayit=conn.execute("select uyeid,adsoyad,mail from uyeler where kullanici='" & kullanici & "' and sifre='" & sifre & "'")
if kayit.eof then
response.Redirect("giris.asp?durum=kullanici_adi_sifre_hata")
end if
%>
<form method="POST" action="?sayfa=kontrol" target="_top" onSubmit="return check_frmm()" name="kontrol">
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="200">
<tr>
<td height="200"> </td>
</tr>
</table>
<table align="center">
<tr>
<td><div align="right" class="style5">Parola : </div></td>
<td><font color="#FFFFFF">
<input name="parola" type="password" id="parola" style="width:180" value="aaaaa" size="24" maxlength="25">
</font></td>
</tr>
<tr>
<td> </td>
<td>
<div align="left">
<input name="kullanici" id="kullanici" type="hidden" value="<%=kullanici%>">
<input name="sifre" id="sifre" type="hidden" value="<%=sifre%>">
<input name="submit" type="image" src="images/021.gif" value="Giriş Yap">
</div></td></tr>
<tr>
<td> </td>
<td>
<a href="parolami_unuttum.asp"><img border="0" src="images/036.gif">
</td>
</tr>
</table>
</form>
<%case "kontrol"%>
<%
On Error Resume Next
If Err.number <> 0 then
Response.Write "Yazılan Kodlama Hatalı: "& Err.description
End If
kullanici=request.Form("kullanici")
sifre=request.Form("sifre")
parola=md(request.Form("parola"))
set kayit=conn.execute("select uyeid,adsoyad,mail from uyeler where kullanici='" & kullanici & "' and parola='" & parola & "'")
if kayit.eof then
response.Redirect("giris.asp?durum=parola_yanlis")
else
session("adsoyad")=kayit("adsoyad")
session("mail")=kayit("mail")
session("uyeid")=kayit("uyeid")
session("kullanici")=kullanici
session("sifre")=sifre
session("parola")=parola
response.Redirect("default.asp")
end if
%>
<%end select%>Şifre bölümü Database de
k.adı: admin
şifre: 3646F4DFC25708C3CAC06EFF24A5D65A867D25D5
olarak gözüküyor şifre kodlanmış ama bir türlü çözemiyorum