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/Code)
 Decrease members post count on post deletion
 New Topic  Reply to Topic
 Printer Friendly
Next Page
Author Previous Topic Topic Next Topic
Page: of 4

modifichicci
Average Member

Italy
787 Posts

Posted - 02 June 2007 :  09:57:33  Show Profile  Visit modifichicci's Homepage  Reply with Quote
Using antispam mod checking for a number of posts to allow sending mail or PM, if a memeber post and delete his posts can raise the count and then begin to spam..

But snitz code doesn't update member post count if post is deleted.

So I have modified pop_delete to update count when deleting topics, replies, forum and cat.

This is the pop_delete modified in an original snitz 06 file.
Changing are marked by
' #### post count update modifichicci mod #####

and

' #### post count update modifichicci mod ##### END

pop_delete mod

It works on my sql forum, but I think no problem with access also

save file as pop_delete.asp and if you haven't made changes overwrite the old file, or compare files..

Title changed by ruirib<

Ernia e Laparocele
Forum di Ernia e Laparocele
Acces - MySql Migration Tutorial
Adamantine forum

Edited by - modifichicci on 11 December 2007 13:38:00

AnonJr
Moderator

United States
5768 Posts

Posted - 03 June 2007 :  09:12:50  Show Profile  Visit AnonJr's Homepage  Reply with Quote
Will it not decrease the post count if they delete a post made in a forum that doesn't increase the post count?

For instance, if I make a post in the testing forum here it doesn't increase my post count. Would your MOD subtract one post if I deleted said post?<
Go to Top of Page

modifichicci
Average Member

Italy
787 Posts

Posted - 03 June 2007 :  10:30:38  Show Profile  Visit modifichicci's Homepage  Reply with Quote
Now if forum doesn't increase count, if deleting a post in that forum count doesn't decrease.

File updated. Thanks

(more testing are welcome..)<

Ernia e Laparocele
Forum di Ernia e Laparocele
Acces - MySql Migration Tutorial
Adamantine forum
Go to Top of Page

modifichicci
Average Member

Italy
787 Posts

Posted - 03 June 2007 :  11:42:23  Show Profile  Visit modifichicci's Homepage  Reply with Quote
I have checked also for moderate post, if not approved or suspended their deletion doesn't affect count (as it is not affected if not approved..).

File updated.

<

Ernia e Laparocele
Forum di Ernia e Laparocele
Acces - MySql Migration Tutorial
Adamantine forum
Go to Top of Page

AnonJr
Moderator

United States
5768 Posts

Posted - 03 June 2007 :  13:09:01  Show Profile  Visit AnonJr's Homepage  Reply with Quote
Nice work. <
Go to Top of Page

Etymon
Advanced Member

United States
2385 Posts

Posted - 04 June 2007 :  07:01:02  Show Profile  Visit Etymon's Homepage  Reply with Quote
Thanks! Good idea! <

Edited by - Etymon on 04 June 2007 07:01:42
Go to Top of Page

Hermes
Junior Member

Croatia
113 Posts

Posted - 06 June 2007 :  09:35:37  Show Profile  Reply with Quote
Modifichicci I get this message when tried to delete individual post:

Microsoft VBScript compilation error '800a03ee'
Expected ')'
/forum/pop_delete.asp, line 634
canUpdate = cLng(getForumCount(Forum_Cat_Replica)


also when tried delete topic


<

ASP Snitz Forum Upute za instalaciju
http://www.kairos.com.hr http://www.hermetizam.com Forum

not so newbie any more :)

Edited by - Hermes on 06 June 2007 09:46:14
Go to Top of Page

modifichicci
Average Member

Italy
787 Posts

Posted - 06 June 2007 :  12:44:43  Show Profile  Visit modifichicci's Homepage  Reply with Quote
there is a missing ) at the end of the line..
and in some lines after.. sorry..

and thanks..
File updated now.<

Ernia e Laparocele
Forum di Ernia e Laparocele
Acces - MySql Migration Tutorial
Adamantine forum
Go to Top of Page

Hermes
Junior Member

Croatia
113 Posts

Posted - 06 June 2007 :  15:16:28  Show Profile  Reply with Quote

Yes, working now.
excellent

<

ASP Snitz Forum Upute za instalaciju
http://www.kairos.com.hr http://www.hermetizam.com Forum

not so newbie any more :)
Go to Top of Page

Shaggy
Support Moderator

Ireland
6780 Posts

Posted - 11 December 2007 :  05:14:19  Show Profile  Reply with Quote
Nice work, Mod'

Worked on this meself a couple of times over the years but never got around to finishing it off.

<

Search is your friend
“I was having a mildly paranoid day, mostly due to the
fact that the mad priest lady from over the river had
taken to nailing weasels to my front door again.”
Go to Top of Page

modifichicci
Average Member

Italy
787 Posts

Posted - 11 December 2007 :  12:31:18  Show Profile  Visit modifichicci's Homepage  Reply with Quote
Yes Image, that is true, I have been confused as in pop delete is used strActivePrefix because it works both on A_TABLE and TABLE, but FORUM doesn't need of archived function.

CHange the function to this

function getForumCount(fPostCount)
Dim strSql
Dim rsgetForumCount
'## Forum_SQL
if isNull(fPostCount) then exit function
strSql = "SELECT F_COUNT_M_POSTS "
strSql = strSql & "FROM " & strTablePrefix & "FORUM "
strSql = strSql & "WHERE FORUM_ID = " & cLng(fPostCount)

Set rsgetForumCount = Server.CreateObject("ADODB.Recordset")
rsgetForumCount.Open strSql, my_Conn

if rsgetForumCount.EOF or rsgetForumCount.BOF then
getForumCount = ""
else
getForumCount = rsgetForumCount("F_COUNT_M_POSTS")
end if
rsgetForumCount.Close
Set rsgetForumCount = nothing
end function

Thanks Shaggy!!

I will update the zip on snitzbitz (mod is in approve mod till now..)<

Ernia e Laparocele
Forum di Ernia e Laparocele
Acces - MySql Migration Tutorial
Adamantine forum
Go to Top of Page

modifichicci
Average Member

Italy
787 Posts

Posted - 11 December 2007 :  13:33:05  Show Profile  Visit modifichicci's Homepage  Reply with Quote
the errors happens when you try to delete an archive topic, i think, so it was difficult to find

Thanks Image for advice.
<

Ernia e Laparocele
Forum di Ernia e Laparocele
Acces - MySql Migration Tutorial
Adamantine forum

Edited by - modifichicci on 11 December 2007 14:54:49
Go to Top of Page

philsbbs
Junior Member

United Kingdom
397 Posts

Posted - 15 December 2007 :  07:08:48  Show Profile  Reply with Quote
thanks for this, ive installed it and it works a treat.<

Phil
Go to Top of Page

modifichicci
Average Member

Italy
787 Posts

Posted - 15 December 2007 :  07:25:27  Show Profile  Visit modifichicci's Homepage  Reply with Quote
you are welcome<

Ernia e Laparocele
Forum di Ernia e Laparocele
Acces - MySql Migration Tutorial
Adamantine forum
Go to Top of Page

natty
Starting Member

United States
31 Posts

Posted - 19 April 2008 :  20:19:26  Show Profile  Reply with Quote
...was thinking about this myself, but I'm not good with code.
Very nice; thank you ;)<

-------------------
http://www.sumwebdesign.com
http://www.tppsych.net
Go to Top of Page

modifichicci
Average Member

Italy
787 Posts

Posted - 20 April 2008 :  02:47:22  Show Profile  Visit modifichicci's Homepage  Reply with Quote
thanks <

Ernia e Laparocele
Forum di Ernia e Laparocele
Acces - MySql Migration Tutorial
Adamantine forum
Go to Top of Page
Page: of 4 Previous Topic Topic Next Topic  
Next Page
 New Topic  Reply to Topic
 Printer Friendly
Jump To:
Snitz Forums 2000 © 2000-2021 Snitz™ Communications Go To Top Of Page
This page was generated in 0.18 seconds. Powered By: Snitz Forums 2000 Version 3.4.07