23 svar · 339 visningar · startad av qwerty · sida 2 av 2
har du använt dig av Server.HTMLEncode("Min text med å, ä och ö") när du sparar ned texten.
Visa lite kod hur det ser ut när du har sparat ned till filen
cya,
PatrikB
------------------
Ingenting är omöjligt.
Det omöjliga tar bara något längre tid att genomföra.
Här är hela koden:
<body bgcolor="#FFFFFF">
<%
'------RENSA-UT-FULA-ORD-FUNKTION--------------------------------------------------KK-
Set A = CreateObject("Scripting.FileSystemObject")
Set B = A.OpenTextFile ("c:\inetpub\wwwroot\txt\badwords.txt")
fulaord = B.ReadAll
B.close
Application("BadWords") = fulaord
Function checkBadWord(StringToCheck)
Dim objRegExp, match, matches, arrPattern, I
Set objRegExp = New RegExp
objRegExp.Global = True
objRegExp.IgnoreCase = true
arrPattern = Split(Application("BadWords"))
For I = LBound(arrPattern) TO UBound(arrPattern)
objRegExp.Pattern = arrPattern(I)
Set matches = objRegExp.Execute(StringToCheck)
For Each match In matches
StringToCheck = Replace(StringToCheck,match,"<img src=""litenfan.gif"">")
Next
Set matches = Nothing
Next
Set objRegExp = Nothing
checkBadWord = StringToCheck
End Function
strString = Request.Form("textfield")
'Response.Write checkBadWord(strString)
'--------------------------------------------------------------------------------------
%>
<%=checkBadWord(strString)%>
</body>
...och så här ser badwords.txt ut:
jävla fan skit
------------------
Qwerty
Den som provar han testar...
... he, he ... den funkar.
Det jag ville ha kod på är HUR du sparar det som står i badwords.txt
En rolig sak hände när jag testkörde scriptet.
Du kan inte ha med fan i bildnamnet litenfan.gif för fan är ett förbjudet ord och sorteras såleds bort =O
cya,
PatrikB
------------------
Ingenting är omöjligt.
Det omöjliga tar bara något längre tid att genomföra.
Jag sparar inte den textfilen med hjälp av asp. Jag har skrivit den i 'wordpad'.
Allt funkar perfa utom att om man sätter in åäö i sina svordomar så glider de igenom "filtret"
------------------
Qwerty
Den som provar han testar...