Microsoft.AspNetCore.Mvc.Localization.LocalizedHtmlStringMinimum number of posts for signatures

Minimum number of posts for signatures

Printed from: Snitz™ Forums 2000
URL: https://forum.snitz.com/forumTopic/Posts/68023?pagenum=1
Printed on: 05 November 2025, 12:58

Topic

Author : bobby131313
Subject : Minimum number of posts for signatures
Posted : 29 December 2008, 11:48
Message :

I've searched and can't find this addressed anywhere.
I'm starting to get a lot of signature spam. Members are signing up, putting thier link in their signature and making BS posts just so it shows. It's really starting to tick me off.

I would like to not have signatures available till a user reaches say, 100 posts. Then these numbnuts would probably just go away.

Has this been done before and I just can't find it?<

Replies ...

Reply Author: SiSL
Replied on: 29 December 2008, 13:36
Message:

I don't think it has been done, however, easy to do with a few steps :)<

Reply Author: Carefree
Replied on: 29 December 2008, 22:09
Message:

This should do what you want:

In "inc_profile.asp", look for the following (appx lines 512-515):

Code:



			Response.Write	"                      </select></font></td>" & vbNewLine & _
					"                    </tr>" & vbNewLine
		end if
	end if

Change them to say:

Code:



			Response.Write	"                      </select></font></td>" & vbNewLine & _
				"                    </tr>" & vbNewLine
		end if
	'	######## Signature On Post Count ########
	else
		Response.Write "Signature disabled until you have posted at least "& intPosts & "."
	end if
	'	######## Signature On Post Count ########
	end if

Next, look for the following (appx line 457):

Code:



	if strSignatures = "1" then

After it, insert the following:

Code:



		'	######## Signature On Post Count ########
		intTotalPosts = 0
		strSql="SELECT M_POSTS FROM  " & strMemberTablePrefix & "MEMBERS WHERE MEMBER_ID=" & MEMBERID
		Set rsPosts = Server.CreateObject("ADODB.Recordset")
		rsPosts.open strSql, my_Conn
		if rsPosts.EOF or rsPosts.BOF then
			'do nothing
		else
			intTotalPosts = rsPosts("M_POSTS")
		end if
		rsPosts.close
		set rsPosts = Nothing
		if intTotalPosts > intPosts then
		'	######## Signature On Post Count ########

Finally, look for the following (appx line 38):

Code:



Sub DisplayProfileForm

Above it, insert the following:

Code:



'	######## Signature On Post Count ########
intPosts=100
'	######## Signature On Post Count ########

Simply change the 100 to whatever quantity of posts are going to be required.<

Reply Author: bobby131313
Replied on: 29 December 2008, 22:46
Message:

Awesome! Seems to be working great. I've been playing with it with no luck so this is greatly appreciated!
Thanks!<

Reply Author: Carefree
Replied on: 29 December 2008, 23:02
Message:

You're welcome.<