Snitz Forums 2000
Snitz Forums 2000
Home | Profile | Register | Active Topics | Members | Search | FAQ
 All Forums
 Snitz Forums 2000 MOD-Group
 MOD Add-On Forum (W/Code)
 Topic Anti-Spam Questions Mod

Note: You must be registered in order to post a reply.
To register, click here. Registration is FREE!
Before posting, make sure you have read this topic!

Screensize:
UserName:
Password:
Format Mode:
Format: BoldItalicizedUnderlineStrikethrough Align LeftCenteredAlign Right Horizontal Rule Insert HyperlinkInsert EmailInsert Image Insert CodeInsert QuoteInsert List
   
Message:

* HTML is OFF
* Forum Code is ON
Smilies
Smile [:)] Big Smile [:D] Cool [8D] Blush [:I]
Tongue [:P] Evil [):] Wink [;)] Clown [:o)]
Black Eye [B)] Eight Ball [8] Frown [:(] Shy [8)]
Shocked [:0] Angry [:(!] Dead [xx(] Sleepy [|)]
Kisses [:X] Approve [^] Disapprove [V] Question [?]

 
Check here to subscribe to this topic.
   

T O P I C    R E V I E W
Carefree Posted - 10 March 2011 : 03:38:48
I wanted something different from the Gatekeeper 2 question system, so I made this. The Topic Anti-Spam Questions MOD is designed for administrators who want more variety in CAPTCHA-type questions for posting. 20 sample sentences are provided, change any/all. The mod uses random numbers to select the sentence to use and another random number to determine which word the poster must match. Images are used for the word number to help forestall bots.

There's a simple admin form where you change the sentences. SnitzBitz
2   L A T E S T    R E P L I E S    (Newest First)
Carefree Posted - 14 March 2011 : 11:58:07
That's simple, Kyodai. In "post_info.asp", change the Gatekeeper routine to say this (change the number in red to minimum posts needed to disable the Gatekeeper requirement):

		'	##	Gatekeeper Mod
		strSql="SELECT M_POSTS FROM " & strMemberTablePrefix & "MEMBERS WHERE MEMBER_ID=" & MemberID
		set rsPosts=my_Conn.Execute(strSql)
		if not rsPosts.EOF then
			intPosts=rsPosts("M_POSTS")
			rsPosts.Close
		end if
		set rsPosts = Nothing
		if strLinkSpamGatekeeper = "1" and intPosts < 10 and mLev < 2 then
			select case len(Request.Form("GateKeeperAnswer"))
			case "0"
				Go_Result "You have not entered an answer for the Antispam question. Please use your back button and try again.", 0
			case else
				if lcase(Request.Form("GateKeeperAnswer")) <> lcase(Request.Form("GKA")) then
					Go_Result "You have entered a wrong answer for the Antispam question. Please use your back button and try again.", 0
				end if
			end select
		end if
		'	##	Gatekeeper Mod
kyodai Posted - 14 March 2011 : 11:01:36
Very tough. Although i have had problems with spambots in my forums before i introduced the "anti bot question" in my registration i would not encourage this mod. It will for sure keep out spammers but as that occurs for EVERY post it is extremely annoying for "legit" users as well and discourages everyone from posting. I would be very careful with things that affect EVERY post, it usually leads to very high annoyment. I would not recommend doing that unelss it is "your last line of defence". It will drastically lower user satisfaction, at least those that are very active.

Snitz Forums 2000 © 2000-2021 Snitz™ Communications Go To Top Of Page
This page was generated in 0.05 seconds. Powered By: Snitz Forums 2000 Version 3.4.07