ASP ile Veritabanındaki şifre Sorgusu ile Işlem Yapmak?

Merhaba arkadaşlar,
asp tabanlı sitemde veritabanında adminin belirlediği bir sabit şifre var
herhangi bir üyeyi veritabanından silmek için bu şifreyi girmek gerekiyor
o kısıma kadar tamam ama orda bir hata var şifre belli iken herhangi bir rastgele yazı ilede o üye silinebiliyor yardımcı olur musunuz?

sorgu bu şekilde -- bu form kısmı

response.write("

")

response.write " Sistem Koruma Şifresi
"

response.write "
"

response.write("

")

sorgu kısmıda burda __________________


ELSEIF FB="UYESILK" THEN

set targetxx=bag.execute("select supersifre from sitesettings order by siteid desc LIMIT 1")



if targetxx=Trim(temiz(Request.form("bibakalimdogrumu "))) then


burda nasıl bir düzenleme yapmalıyım , yardımınızı rica ediyorum.

ELSEIF FB="UYESILK" THEN
gelensifre=trim(temiz(Request.form("bibakalimdogrumu")))
set targetxx=bag.execute("select supersifre from sitesettings where supersifre="&gelensifre&" order by siteid desc LIMIT 1")
if targetxx.Eof then
Response.write "şifre hatalı"

else

'silecek sql kodlarınız gelir


end if


diye düşünüyorum

Yanıt için teşekkür ederim burda yukarıdaki forma veritabanında kayıtlı olan supersifre sorgusunun yapılması gerekiyor diğer tün kısımlar sorunsuz çalışıyor
Önerinizi deneyeceğim teşekkür ederim

C6903 cihazımdan Tapatalk kullanılarak gönderildi

:confused:

maalesef olmadı :/

hata nedir peki ?

ELSEIF FB="UYESIL" THEN



response.write("

")

response.write "Sistem Koruma Sifresi"

response.write "
"



response.write("

")


'******************************



ELSEIF FB="UYESILK" THEN



targetxx="espoir0655"

if targetxx=Trim(temiz(Request.form("bibakalimdogrumu"))) then


if userad=sistemcoder then

bag.execute("UPDATE uyeler set onay=2, durum=0, ban=3 WHERE uyeid=" & slt("uyeid") & " LIMIT 1")

Set silcem4=bag.Execute("delete from sozlesme where bid=" & slt("uyeid") & "")


response.write " üye veritabanından silindi...
"

else

response.write "bu bölüme girmeye yetkiniz yok...
"


____________________________________________________________________
normalde burda targetxx="espoir0655" belirlenmiş olan şifre veritabanından çekmiyor ben bunu veritabanına ekledim ve

____________________________________________________________________

ELSEIF FB="UYESIL" THEN



response.write "Üye silme menü
"




response.write("

")




response.write "
"



response.write("

")



'******************************



ELSEIF FB="UYESILK" THEN


set targetxx=bag.execute("select supersifre from sitesettings order by siteid desc LIMIT 1")



if targetxx=Trim(temiz(Request.form("bibakalimdogrumu"))) then







if userad=sistemcoder then

bag.execute("UPDATE uyeler set onay=2, durum=0, ban=3 WHERE uyeid=" & slt("uyeid") & " LIMIT 1")

Set silcem4=bag.Execute("delete from sozlesme where bid=" & slt("uyeid") & "")


response.write " üye veritabanından silindi...
"

else

response.write "bu bölüme girmeye yetkiniz yok..."


____________________________________________________________________

şeklinde değiştirdim, yaptığım şekilde şifre görülüyor değiştirebiliyor sıkıntı yok ama veritabanındaki şifre veya başka bişey yazılsada üye siliniyor yani şifre yanlış yada doğru deyip ona göre işlem yapmıyor, sizin verdiğiniz komutta ise direk hata verdi herhangi bir işlem yapamadım

hocam sizin sorguda
ELSEIF FB="UYESILK" THEN

set kontrol=bag.execute("select supersifre from sitesettings order by siteid desc LIMIT 1")
kontrolsifre=kontrol("supersifre")
formdangelensifre=trim(temiz(Request.form("bibakalimdogru mu")))

if kontrolsifre=fomdangelensifre then

if userad=sistemcoder then
bag.execute("UPDATE uyeler set onay=2, durum=0, ban=3 WHERE uyeid=" & slt("uyeid") & " LIMIT 1")
Set silcem4=bag.Execute("delete from sozlesme where bid=" & slt("uyeid") & "")
response.write " üye veritabanından silindi...
"
else
response.write "bu bölüme girmeye yetkiniz yok..."

else
response.write("sifre hatalı")
end if



update sorgusu oncesi sadece userad=sistemcoder kontrolü yapılıyor sizin şifrenin geçerliliği olmuyor. yapmanız gereken formdan gelen şifreyi db deki şifre ile eşit mi olarak kontrol etmek.

ilgi ve alakana çok teşekkür ederim, sorgu sorunsuz çalıştı :)