Sitenizi küfürden koruma kodu - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Sarya · 10 Temmuz 2021, 02:52

Sitenizi küfürden koruma kodu

Kod: Kodu kopyalamak için üzerine çift tıklayın!

<%
badwordFilter = "Acik"
Dim badword
badword = "****|suck|***"

metin = Request.Form("metin" )

strwords = Split(badword, "|" )
For I = 0 to Ubound(strwords)
metin = Replace(metin, strwords(I), String(Len(strwords(I)),"*" ), 1,-1,1)
next
If badwordFilter= "Acik" Then
Response.Write metin
else
Response.Write metin
End If
%>

Akabinde · 01 Aralık 2021, 19:55

Emeginize Saglık

StigmatA · 24 Mart 2022, 00:47

Güzel ve yararlık bir kod, bubu vbulletin seçenekleri>sansürlü kelimeler kısmından da yasaklanmasını istediğiniz kelimeleri yazıp engelleyebilirsiniz.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Kufur koruma ve temizleme kodu lazım	Kimimben	mIRC Scripting Sorunları	12	20 Temmuz 2019 10:11
Allah küfredenleri sevmez ayetindeki küfürden maksat nedir ?	xena	İslamiyet	1	12 Mayıs 2014 11:48
Küfürden Kurtulmak Icin Dua	Flora	Dualar	0	01 Temmuz 2013 16:15
BADnick koruma kodu değişikliği.	Fr33	mIRC Scripting Sorunları	3	15 Şubat 2010 16:42
S.a Proxy Koruma Kodu ıcın yardım	Heavenly	mIRC Scripting Sorunları	2	20 Ekim 2008 19:29

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.