svordomsfilter

7 svar · 434 visningar · startad av Arne 24 feb. 2003

ArneMedlem sedan maj 2000267 inlägg

Frågan24 feb. 2003 07:01#1

Jag vill ta bort svordommar ur vissa textsträngar och denna kod fungerar bra (nästan)

Och jag skriver en textsträng med Namnet Stefan så skrivs bara Ste ut. Hur gör jag för att functionen inte raderar ord som innehåller fan t.ex.?

Function cencur(mess) 
	Set objRegExp = New regexp 
	objRegExp.Global = true 
	objRegExp.IgnoreCase = true 
	mess = Server.HTMLEncode(mess) 

	objRegExp.Pattern = "(fan|helvete)"

	mess = objRegExp.Replace(mess," ") 
	cencur = mess 
End Function

voigtann1Medlem sedan juni 20019 519 inlägg

24 feb. 2003 07:07#2

Function cencur(mess) 
	Set objRegExp = New regexp 
	objRegExp.Global = true 
	objRegExp.IgnoreCase = true 
	mess = Server.HTMLEncode(mess) 

	objRegExp.Pattern = " (fan|helvete)"

	mess = objRegExp.Replace(mess," ") 
	cencur = mess 
End Function

nu måste man ha ett "mellanslag" innan fan... dvs stefan kommer vara ok.. men om någon börja skriva i början av meningen "fan vad jag är bra" så kommer den inte att reagerar. Jag vet inte hur man löser detta förutom när man lägger in ny text kanske

str = " " & str

men annars ...

pirroMedlem sedan aug. 2001226 inlägg

24 feb. 2003 12:35#3

objRegExp.Pattern = " [^\s](fan|helvete)"
kanske?

voigtann1Medlem sedan juni 20019 519 inlägg

24 feb. 2003 14:12#4

nope... har försökt med [^a-zA-z0-9] med.. men vägrar typ..

MMMedlem sedan maj 2000138 inlägg

13 okt. 2005 12:17#5

hur gör du om någon heter Fanny då?

Engine^Medlem sedan dec. 20003 887 inlägg

13 okt. 2005 12:24#6

Ändra pattern till

(fan|helvete)\b

red.
Hmm... det fungerar ju inte. Jag återkommer...

Engine^Medlem sedan dec. 20003 887 inlägg

13 okt. 2005 12:30#7

v2.0

(^(fan|helvete)\b)|(\W(fan|helvete)\b)

Det ska väl kunna fungera lite bättre.

mozillaMedlem sedan juli 20011 084 inlägg

13 okt. 2005 12:34#8

[b]\b[/b](fan|helvete)[b]\b[/b]

"word boundary" både före och efter borde väl fungera.