Aspde saldırı yapan ıp'yi banlamak

**SrKn** · 13.09.2018, 13:40

Aspde saldırı yapan ıp'yi banlamak

<%

---------------------------- Veritabanı bağlantısı
set dbcnn = server.createobject("adodb.connection")
dbcnn.open "provider=microsoft.jet.oledb.4.0;data source="&server.mappath("db.mdb")

----------------------------Veritabanı bağlantısı tamamlandı.
-----------------------------Tablo bağlantısı
set qab = server.createobject("adodb.recordset")
SQL = "Select * from attack"
qab.open SQL,dbcnn,1,3
----------------------------Tablo bağlantısı bitti
-----------------------------Döngü başlangıcı
’Eğer istersek from attack’tan sonra where ile ip sorgulayıp .eof la yine üyelik sistemlerindeki kontrol gibi ip yi bulup engelleyebiliriz fakat ben farklı yaptım (iki yolda olabilir)

do while not qab.eof ’ dongu başlangıcı

ip = Request.ServerVariables("REMOTE_ADDR") ’girmeyi deneyen ip yi "ip" değişkenine bağladık

-------------------------------- ve BLOCKK !!
if ip = qab("ip") then

response.write "Your ip blocked ... "%>

response.end ’ Bu kod sayesinde bunu eklediğiniz sayfanın gerisini okumayacak

end if

------------------------------ BLOCK SONU

gap.movenext
loop
------------------------------- Döngü Sonu
qab.close
set qab = nothing
dbcnn.close
set dbcnn = nothing
---------------------------------Sayfa Sonu
%>

alıntı

13.09.2018, 13:40	#1 (permalink)
SrKn ultrAslan Kullanıcıların profil bilgileri misafirlere kapatılmıştır.	Aspde saldırı yapan ıp'yi banlamak Aspde saldırı yapan ıp'yi banlamak <% ---------------------------- Veritabanı bağlantısı set dbcnn = server.createobject("adodb.connection") dbcnn.open "provider=microsoft.jet.oledb.4.0;data source="&server.mappath("db.mdb") ----------------------------Veritabanı bağlantısı tamamlandı. -----------------------------Tablo bağlantısı set qab = server.createobject("adodb.recordset") SQL = "Select * from attack" qab.open SQL,dbcnn,1,3 ----------------------------Tablo bağlantısı bitti -----------------------------Döngü başlangıcı ’Eğer istersek from attack’tan sonra where ile ip sorgulayıp .eof la yine üyelik sistemlerindeki kontrol gibi ip yi bulup engelleyebiliriz fakat ben farklı yaptım (iki yolda olabilir) do while not qab.eof ’ dongu başlangıcı ip = Request.ServerVariables("REMOTE_ADDR") ’girmeyi deneyen ip yi "ip" değişkenine bağladık -------------------------------- ve BLOCKK !! if ip = qab("ip") then response.write "Your ip blocked ... "%> response.end ’ Bu kod sayesinde bunu eklediğiniz sayfanın gerisini okumayacak end if ------------------------------ BLOCK SONU gap.movenext loop ------------------------------- Döngü Sonu qab.close set qab = nothing dbcnn.close set dbcnn = nothing ---------------------------------Sayfa Sonu %> alıntı Benzer Konular Aspde formdan bilgi çekme... Aspde if-then-else döngülerinin kullanımı... Aspde bir sayının üssünü almak... vBulletin Kısa yoldan üye banlamak Hızlı Üye Banlama Eklentisi... Kanser Yapan Besinler-Kanser Yapan Gıdalar... Paylaş Share this post on Twitter Follow @Forumaski __________________ Fitness Eğitmeni