webForumDet fria alternativet

Chat censur

ASP

2 svar · 291 visningar · startad av M477145

Medlem sedan sep. 200145 inlägg
Frågan#1

Hej ... har byggt en chat. Tänkte för skojs skull lägga till en censur funktion. Det fungerar jättebra med koden nedan ... nästan.

language = "fuck shit ass"
badwords = split(language, " ")
for i = 0 To uBound(badwords)
tmpMESS = replace(tmpMESS, badwords(i), "-censur-")
next
response.write(tmpMESS & "<br>")

Detta fungerar jättebra ... förutom en sak ... skriver man inte de fula orden exakt som de står i "language" så struntar censuren i dessa ord. Det går ju heller inte använda lcase(tmpMESS) ... för då blir ju allt i gemener när det skrivs ut.

Förslag?

Medlem sedan maj 200010 687 inlägg
#2

Använd TextCompare i Replacen.

replace(tmpMESS, badwords(i), "-censur-", 1, -1, 1)
Medlem sedan sep. 200145 inlägg
#3

TACK!!!

441 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
133 ms — deklarationer (db)
0 ms — hämta statistik (cache)
304 ms — hämta tråd, inlägg och bilagor (db)
131 ms — ändringar (db)