Approved Tutorials: Stop Spamming

Print Page | Close Window

Stop Spamming

Printed From: Mirage Source
Category: Tutorials
Forum Name: Approved Tutorials
Forum Discription: All tutorials shown to actually work with MSE are moved here.
URL: http://ms.shannaracorp.com/backup-forums/forum_posts.asp?TID=43
Printed Date: 20 December 2006 at 6:01pm
Software Version: Web Wiz Forums 8.01 - http://www.webwizforums.com

Topic: Stop Spamming

Posted By: Sync
Subject: Stop Spamming
Date Posted: 07 February 2006 at 6:09pm

Originally posted by Renegade

Well i was playing around with vanilla lol and i came out with a way of making you have a certain amount of chartors in your message before it displays it, i rate this

0/5 its sooo easy but it my third tutorial so a few lines is good

ok change


        ' Broadcast message
        If Mid(MyText, 1, 1) = "'" Then
              ChatText = Mid(MyText, 2, Len(MyText) - 1)
              If Len(Trim(ChatText)) > 0 Then
                  Call BroadcastMsg(ChatText)
              End If
              MyText = ""
              Exit Sub
        End If


        ' Broadcast message
        If Mid(MyText, 1, 1) = "'" Then
              ChatText = Mid(MyText, 2, Len(MyText) - 1)
              If Len(Trim(ChatText)) > 10 Then
                  Call BroadcastMsg(ChatText)
              End If
              MyText = ""
              Exit Sub
        End If

And


              ' Global Message
              If Mid(MyText, 1, 1) = """" Then
                  ChatText = Mid(MyText, 2, Len(MyText) - 1)
                  If Len(Trim(ChatText)) > 0 Then
                      Call GlobalMsg(ChatText)
                  End If
                  MyText = ""
                  Exit Sub
              End If


              ' Global Message
              If Mid(MyText, 1, 1) = """" Then
                  ChatText = Mid(MyText, 2, Len(MyText) - 1)
                  If Len(Trim(ChatText)) > 10 Then
                      Call GlobalMsg(ChatText)
                  End If
                  MyText = ""
                  Exit Sub
              End If

I think that should be it, change the > 10 to how many charictors you want, as i said it my thrid tut and im still learning....

Replies:

Posted By: Sync
Date Posted: 07 February 2006 at 6:10pm

Approved. This is a simple start to help stop spamming. There are other ways, and feel free to make tutorials and such ways. However, this does work in some cases.

Posted By: William
Date Posted: 09 February 2006 at 8:50am

This works if you dont want people to be able to write things like: ok, bye, hi. You need more than 10 characters. I might make a update.

Posted By: Renegade
Date Posted: 09 February 2006 at 1:18pm

Im working on one now aswell

Posted By: funkynut
Date Posted: 09 February 2006 at 1:25pm

Maybe you should modify this so you can place a small spam ban on a player