🔔 Çevrimdışı bildirim almak ister misiniz?
Bir konuya etiketlendiğinizde, özel mesaj aldığınızda, bir mesajınız alıntılandığında forumda olmasanız bile anlık bildirim almak için lütfen izni verin.
<%
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
%>
Konu Che tarafından (17 Aralık 2021 Saat 19:13 ) değiştirilmiştir.
Sebep: code tag içine alındı.
10 Temmuz 2021, 02:52
Benzer Konular 
Ağaç şeklinde
