| Author |
 Topic  |
|
borge
Junior Member
Norway
185 Posts |
 Posted - 09 September 2006 : 03:43:04
|
quote:
Originally posted by HuwR
borge,
to accomplish this bit
quote:
Alternatively an option which will enable the forum admin to approve "send mail" for members before reaching the required number of posts to send
The admin can just increase the members post count manually to allow them to send mail
Thanks Huwr, I realized I could do it that way, but I don't like it, as it will look as if the member posted a number of posts which he did not. Anyway, I have included some text in the error message, telling those without posting permission that they may forward their email to the webmaster and ask for it to be forwarded on to the other member. It calms people down a bit  < |
borge |
 |
|
|
nickw
Junior Member
Ireland
193 Posts |
Posted - 11 September 2006 : 05:40:02
|
Ruirib,
I wanted to thank you for this "quick" mod. Works well, and stops the muppets. Appreciate it.< |
Nick |
|
|
|
ruirib
Snitz Forums Admin
Portugal
26364 Posts |
|
|
Desmomax
New Member
55 Posts |
Posted - 18 September 2006 : 08:23:46
|
great mod! works fine!!!
is it possible to do same with private messages?
10x
< |
Il forum |
|
|
|
ruirib
Snitz Forums Admin
Portugal
26364 Posts |
|
|
Desmomax
New Member
55 Posts |
Posted - 18 September 2006 : 09:28:01
|
done.. many thanx
i think could be usefull.. expecially to stimulate users partecipating the forum< |
Il forum |
|
|
|
Podge
Support Moderator
Ireland
3776 Posts |
|
|
Classicmotorcycling
Development Team Leader
Australia
2085 Posts |
Posted - 08 October 2006 : 05:15:13
|
I have altered the code to work with PM's as well:quote:
Originally posted by Desmomax
great mod! works fine!!!
is it possible to do same with private messages?
10x
Here is the code to put in to privatesend_info.asp:
strPMNID = rsName("MEMBER_ID")
strPMRecv = rsName("M_PMRECEIVE")
strPMNEmail = rsName("M_PMEMAIL")
'######## Private Message Spam Mod ############
strSql = "SELECT M_NAME, M_POSTS FROM " & strMemberTablePrefix & "MEMBERS M"
strSql = strSql & " WHERE M.MEMBER_ID = " & MemberID
set rs = my_Conn.Execute (strSql)
If Not rs.EOF then
intMPosts = rs("M_POSTS")
Dim strSpamMin
strSpamMin = "10"
if intMPosts < 10 then
strErrMessage = "<li>You have not posted at least " & strSpamMin & " messages to be able to Private Message other members.</li>"
strSpammerName = RS("M_NAME")
'Send email to forum admin
strRecipients = strSender
strFrom = strForumTitle & " <" & strSender & ">"
strSubject = "Possible Private Message Spam Poster"
strMessage = "There is a possible spam poster at " & strForumTitle & vbNewLine & vbNewLine
strMessage = strMessage & "Member " & strSpammerName & ", with MemberID " & MemberID & ", has been trying to send Private Messages to " & Request.Form("sendto") & ", without having the required " & strSpamMin & " posts to be allowed to Private Message other users." & vbNewLine & vbNewLine
strMessage = strMessage & "Here are the message contents: " & VbNewLine & Request.Form("Msg") & vbNewLine & vbNewLine & vbNewLine & vbNewLine
strMessage = strMessage & "This is a message sent automatically by " & strForumTitle & "."
%>
<!--#INCLUDE FILE="inc_mail.asp" -->
<%
boolSend = false
end If
end if
rs.Close
'############# End of Private Message Spam Mod #############
if strPMRecv = "0" then
strErrMessage = strErrMessage & "Sorry, " & arrNames(i) & " does not wish to receive private messages"
boolSend = false
end if
end ifJust add the code in blue and put it in between the red code.
I hope that helps.  < |
Cheers,
David Greening |
|
|
|
ruirib
Snitz Forums Admin
Portugal
26364 Posts |
Posted - 08 October 2006 : 05:26:50
|
| David, just a thought... Maybe the spammer should not know how many messages he needs to post before being able to PM other members. Otherwise he may post bogus messages just to hit the minimum...< |
Snitz 3.4 Readme | Like the support? Support Snitz too |
|
|
|
Classicmotorcycling
Development Team Leader
Australia
2085 Posts |
Posted - 08 October 2006 : 06:23:33
|
| I thought of that as well, but it is good that they know as I monitor the first few posts of a new user to make sure that they are not spammers and will delete their account straight away.< |
Cheers,
David Greening |
|
|
|
borge
Junior Member
Norway
185 Posts |
Posted - 17 October 2006 : 02:34:11
|
| I have just experienced that a "Nigeria" spammer managed to get 3 messages through to another member without having the aquired number of posts (he did not have any forum posts). 4 other messages were stopped, and I locked his account as soon as I received the first warnings of a possible spam poster.< |
borge |
|
|
|
sergiomura
Starting Member
1 Posts |
Posted - 25 October 2006 : 15:40:06
|
Hi!
I'm Sergio from Italy.
This mod is really beautiful, but we must consider that many of us use a pop-up box to send and receive the mp. So the code must change for use in pm_send_info.asp
Is it possible?
Sergio< |
|
|
|
Classicmotorcycling
Development Team Leader
Australia
2085 Posts |
Posted - 25 October 2006 : 16:48:13
|
Sergio,
It is possible, but as pm_send_info.asp is not a part of the PM system I have, then I have no idea on what version of PM you areusing.quote:
Originally posted by sergiomura
Hi!
I'm Sergio from Italy.
This mod is really beautiful, but we must consider that many of us use a pop-up box to send and receive the mp. So the code must change for use in pm_send_info.asp
Is it possible?
Sergio
Post a link to a text version of your pm_send_info.asp and I will see what I can do for you.
< |
Cheers,
David Greening |
|
|
|
AnonJr
Moderator
United States
5768 Posts |
Posted - 17 November 2006 : 08:59:26
|
Just a thought I was discussing with the owner of one of the sites I maintain, why not just limit the number of e-mails a non-admin can send to something like 10? I mean, who the hell needs to send an e-mail to more than 10 people in a day on a forum? Maybe have some sort of an alert sent to the admin if they exceed this...
Just a thought.
JohnC, it doesn't take long for someone to click the "Email Poster" link and Ctrl+V the text and click "send"... Having said that, the idea of adding a time limit does sound promising. Maybe there's a way to tie it into the existing function for posting.< |
|
|
|
JohnC
Junior Member
215 Posts |
Posted - 28 February 2007 : 10:22:04
|
Thought I would share this mod to a mod. I wanted to keep track of spammer's IP addresses so I just added the following line (in red) to write the IP address in the email that goes to forum admin:
strMessage = strMessage & "Here are the message contents: " & VbNewLine & Request.Form("Msg") & vbNewLine & vbNewLine & vbNewLine & vbNewLine
strMessage = strMessage & Request.ServerVariables("remote_addr") & " " & Now() & "Server Time" & vbNewline
strMessage = strMessage & "This is a message sent automatically by the Spam Control Mod ;)."Hope you find it useful!  < |
|
|
|
Topic |
|
Small mod: Blocking forum email spam
