IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)

- Forum Scriptleri (https://www.ircforumlari.net/forum-scriptleri/)

- - Sitenizi küfürden koruma kodu (https://www.ircforumlari.net/forum-scriptleri/924635-sitenizi-kufurden-koruma-kodu.html)

Sarya

10 Temmuz 2021 02:52

Sitenizi küfürden koruma kodu

Sitenizi küfürden koruma kodu

Kod:

<%

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

Cevap: Sitenizi küfürden koruma kodu

Emeginize Saglık

StigmatA

24 Mart 2022 00:47

Cevap: Sitenizi küfürden koruma kodu

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.

Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 11:07.