:duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :
Printable View
:duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :duck: :
I used to love my duck colon :(
The many faces of mendhak...
:afrog:
http://www.vbforums.com/images/ieimages/2006/02/1.gif
http://www.vbforums.com/images/ieimages/2006/02/1.gif
http://www.vbforums.com/images/ieimages/2006/02/1.gif
http://www.vbforums.com/images/ieimages/2006/02/1.gif
http://www.vbforums.com/images/ieimages/2006/02/1.gif
http://www.vbforums.com/images/ieimages/2006/01/1.gif
http://www.vbforums.com/images/ieimages/2006/02/1.gif
Your avatar is creepy in a positive way :lol:Quote:
Originally Posted by Bonker Gudd
Wouldn't it be funny if Cyber came back and changed the name of this thread?
VB Code:
if spam.mode then Kill spammer end if
VB Code:
If Detected.Spammer Then Spammer.BeatHeadIn("wooden cooking spoon") Spammer.Kick("groin") End If
Please people! Learn to declare objects!
VB Code:
Dim spamguy as System.VBForums.Members.Spammers Private Sub PunishSpammer(spammer as spamguy) With spammer If .Detected = True Then .Beat("Aluminium baseball bat") .Kick("Teeth") .Kick("Groin") .Headbutt("Nostrills") End With End Sub
Jesus... Where on earth is that sub being called?
VB Code:
Dim spamguy as System.VBForums.Members.Spammers Private Sub PunishSpammer(spammer as spamguy) With spammer If .Detected = True Then .Beat("Aluminium baseball bat") .Kick("Teeth") .Kick("Groin") .Headbutt("Nostrills") End With End Sub Private Sub Forum_Spam(spammer As String) PunishSpammer spammer End Sub
Where did you learn to code? My god..
I learnt everything off you timeshifter... :D
And forgot one more thing...
VB Code:
Dim spamguy as System.VBForums.Members.Spammers Private Sub PunishSpammer(spammer as spamguy) With spammer If .Detected = True Then .Beat("Aluminium baseball bat") .Kick("Teeth") .Kick("Groin") .Headbutt("Nostrills") End With End Sub Private Sub Forum_Spam(spammer As String) PunishSpammer spammer End Sub Private Sub Form_Load() PunishSpammer spammer 'or Forum_Spam spammer End Sub
No, no.. you're making it too complicated. Here at VBF, we wait for the spamming to start, then we go about punishing them.. no need to call it when the form loads...
VB Code:
Private Declare Sub Spammer Lib "spam32" (ByVal numberOfPost As Long) Private Sub Form_Load() On Error GoTo errmsg Do Until spam.EOF Spammer 10000000 Loop Exit Sub errmsg: MsgBox "Overflow, avoid spamming!!!" End Sub
spam +1
You have no End If; you declare a static variable; and you use a variable as if it were a type.Quote:
Originally Posted by kregg
/slap * 3
Baaaz da doon!
:wave:
Obey your globe.
Bump.
Spoonguard.
Wossy was exposed to spoons for a mere seven seconds... now look at him!
I dont think he is visiting the forum these days :bigyello:Quote:
Originally Posted by timeshifter
He actually wanted to hit 1000, we have hit more than 46000.... :thumb: :DQuote:
Originally Posted by CyberSurfer