Snitz Forums 2000
Snitz Forums 2000
Home | Profile | Register | Active Topics | Members | Search | FAQ
Username:
Password:
Save Password
Forgot your Password?

 All Forums
 Snitz Forums 2000 MOD-Group
 MOD Add-On Forum (W/O Code)
 Cursewords show in username and in quoted text
 New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

gglosser
Starting Member

16 Posts

Posted - 23 June 2001 :  15:48:28  Show Profile  Visit gglosser's Homepage
I run an educational web site with 8,000 visitors a day, half of which are teenage students. Unfortunately, teenagers love to post curse words, smut, and wreak havoc on forums whenever possible.

I discovered that a user can register with a name like ****You, and the words will show in the Author. Also, if bad words are posted, the thread will show stars, but when you reply to that message, the actual words show in the quoted text (see the URL below). PLEASE provide a MOD to fix these problems or tell me where I can find one!

TIA,
Gisele

http://www.mathgoodies.com/forum/topic.asp?TOPIC_ID=3&FORUM_ID=1&CAT_ID=1&Topic_Title=This is a subject line%2E&Forum_Title=Testing Forum

RichardKinser
Snitz Forums Admin

USA
16655 Posts

Posted - 23 June 2001 :  16:08:48  Show Profile
If you e-mail me your inc_functions.asp file and your register.asp file, I'll make these modifications for you.
Go to Top of Page

mbdtk
Starting Member

9 Posts

Posted - 27 June 2001 :  08:24:45  Show Profile
quote:

If you e-mail me your inc_functions.asp file and your register.asp file, I'll make these modifications for you.





Hi Richard,

Any chance of posting the required modifications as I'd also like to make the necesaary adjustments, but don't wish to start and avalance of posts asking you to do the work

Best,


Byron



Edited by - mbdtk on 02 July 2001 07:24:05
Go to Top of Page

RichardKinser
Snitz Forums Admin

USA
16655 Posts

Posted - 02 July 2001 :  08:01:46  Show Profile
in inc_functions.asp find this:

	elseif fField_Type = "message" then
if strAllowHTML <> "1" then
fString = HTMLEncode(fString)
end if


change it to look like this:

	elseif fField_Type = "message" then
if strAllowHTML <> "1" then
fString = HTMLEncode(fString)
end if
if strBadWordFilter = 1 then
fString = chkBadWords(fString)
end if


Then do a search for this function:

function chkBadWords(fString)


and add the following code just above it:

function chkNameBadWords(fString)
bwords = split(strBadWords, "|")
for i = 0 to ubound(bwords)
if instr(fString, bwords(i)) <> 0 then
Err_Msg = Err_Msg & "<li>Username may not contain the word <b>" & bwords(i) & "</b></li>"
exit function
end if
next
end function


now, in register.asp

find this code:

	if (Instr(Request.Form("Name"), ">") > 0 ) or (Instr(Request.Form("Name"), "<") > 0) then
Err_Msg = Err_Msg & "<li> > and < are not allowed in the UserName, Please Choose Another</li>"
end if


and add the following code just above it:

	if strBadWordFilter = 1 then
chkNameBadWords(Request.Form("Name"))
end if

Go to Top of Page

mbdtk
Starting Member

9 Posts

Posted - 02 July 2001 :  08:11:36  Show Profile
Thanks Richard,

it's very much appreciated.



Go to Top of Page

RichardKinser
Snitz Forums Admin

USA
16655 Posts

Posted - 02 July 2001 :  08:16:24  Show Profile
you're welcome
Go to Top of Page

bjlt
Senior Member

1144 Posts

Posted - 02 July 2001 :  09:58:24  Show Profile
quote:

in inc_functions.asp find this:


change it to look like this:

	elseif fField_Type = "message" then
if strAllowHTML <> "1" then
fString = HTMLEncode(fString)
if strBadWordFilter = 1 then
fString = chkBadWords(fString)
end if

end if





i think it's better to be

elseif fField_Type = "message" then
if strAllowHTML <> "1" then
fString = HTMLEncode(fString)
end if
if strBadWordFilter = 1 then
fString = chkBadWords(fString)
end if

[/code]

also, bad word can be seen in topic.

Go to Top of Page

RichardKinser
Snitz Forums Admin

USA
16655 Posts

Posted - 02 July 2001 :  16:22:09  Show Profile
you are correct, I changed it in the code above.
Go to Top of Page

mbdtk
Starting Member

9 Posts

Posted - 02 July 2001 :  16:59:47  Show Profile
thanks again to both of you

Go to Top of Page
  Previous Topic Topic Next Topic  
 New Topic  Topic Locked
 Printer Friendly
Jump To:
Snitz Forums 2000 © 2000-2021 Snitz™ Communications Go To Top Of Page
This page was generated in 0.22 seconds. Powered By: Snitz Forums 2000 Version 3.4.07