Asp De Şifreyi Bulamadım
-
hocam elimde bir scrpt var kullanıcı panelinde şifre istiyor db de yok başka sayfalarda da yok şöyle bir şey yapmışlar
<!--#include file="connect.asp"-->
<%
sifrehatali= 0
SIFRE = Request.Form("SIFRE")
KULADI = Request.Form("KULADI")
SIFRE = Replace (SIFRE ,"`","",1,-1,1)
SIFRE = Replace (SIFRE ,"=","",1,-1,1)
SIFRE = Replace (SIFRE ,"&","",1,-1,1)
SIFRE = Replace (SIFRE ,"%","",1,-1,1)
SIFRE = Replace (SIFRE ,"!","",1,-1,1)
SIFRE = Replace (SIFRE ,"#","",1,-1,1)
SIFRE = Replace (SIFRE ,"<","",1,-1,1)
SIFRE = Replace (SIFRE ,">","",1,-1,1)
SIFRE = Replace (SIFRE ,"*","",1,-1,1)
SIFRE = Replace (SIFRE ,"/","",1,-1,1)
SIFRE = Replace (SIFRE ,"\","",1,-1,1)
SIFRE = Replace (SIFRE ,"And","",1,-1,1)
SIFRE = Replace (SIFRE ,"'","",1,-1,1)
SIFRE = Replace (SIFRE ,"Chr(34)","",1,-1,1)
SIFRE = Replace (SIFRE ,"Chr(39)","",1,-1,1)KULADI = Replace (KULADI ,"`","",1,-1,1)
KULADI = Replace (KULADI ,"=","",1,-1,1)
KULADI = Replace (KULADI ,"&","",1,-1,1)
KULADI = Replace (KULADI ,"%","",1,-1,1)
KULADI = Replace (KULADI ,"!","",1,-1,1)
KULADI = Replace (KULADI ,"#","",1,-1,1)
KULADI = Replace (KULADI ,"<","",1,-1,1)
KULADI = Replace (KULADI ,">","",1,-1,1)
KULADI = Replace (KULADI ,"*","",1,-1,1)
KULADI = Replace (KULADI ,"/","",1,-1,1)
KULADI = Replace (KULADI ,"\","",1,-1,1)
KULADI = Replace (KULADI ,"And","",1,-1,1)
KULADI = Replace (KULADI ,"'","",1,-1,1)
KULADI = Replace (KULADI ,"Chr(34)","",1,-1,1)
KULADI = Replace (KULADI ,"Chr(39)","",1,-1,1)
if len(KULADI) > 0 then
strSql = " Select * from users where kuladi='" & KULADI & "' and sifre= '" & SIFRE & "'"
Set sonuc = baglanti.Execute(strSql)
if sonuc.eof then
'ŞİFRE HATALI
sifrehatali=1
else
Session(Request.ServerVariables("REMOTE_ADDR") & Request.ServerVariables("REMOTE_HOST") )="TRUE" & KULADI & "!" & SIFRE & "!" & sonuc("grupid")
'LOGOUT DEDIGINDE YUKARIDAKI =FALSE YAPILACAK
sifrehatali=3
end if
end if%>
<html>
<head>
<title>giriş</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-9">
</head>
<link href="css.css" rel="stylesheet" type="text/css">
<body>
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td align="center"><table width="350" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center"><%
if sifrehatali=1 then
response.Write "<font color=red><b>kullanıcı adı veya şifre hatalı</b></font>"
SIFRE=""
end if
if sifrehatali=3 then
sonuc.close
set sonuc = nothing
response.Redirect("aracgiris.asp")
end if
%> </td>
</tr>
</table>Şifresi nedir buraya gömmüşler diye düşündüm.
-
users tablosuna bakarmısın bir daha
-
Veritabanını bulacaksın bunun. Ya da uygun şekilde kendin oluşturacaksın.
-
veri tabanında yok
-
tamam buldum
-
x-files bunu yazdı:
-----------------------------
veri tabanında yok
-----------------------------orda select yapmış user tabolsuna zaten veritabanında user tablosuna bak.
