Spam Any Instant Message With a Simple Program


Introduction: Spam Any Instant Message With a Simple Program

About: A mechanical engineering graduate from JBU, I enjoy putting motors on things that don't already have them, tinkering with small gas engines, airsoft, paintball, and pyrotechnics. I am no longer active on thi...

Recently I have been getting into lots of "spam wars" with friends and family over facebook. This is all great and fun, but my fingers would often get tired of copy and pasting all of that text as fast as i could, so I decided to make a simple program that would do it for me! This is incredibly simple, can run on any computer with a windows operating system, and is basically copy-paste.

Step 1: Create the File

we will be creating a .VBS file for this operation, also called a visual basic script. These can be written in notepad, and saved with a .vbs file extension. first, open notepad, and copy and paste this text:

Set wshShell = wscript.CreateObject("WScript.Shell")
wscript.sleep 100
wshshell.sendkeys "lol im doing nothing right now! "
wshshell.sendkeys "~(enter)"

so that it looks the exact same as shown in the image. the next step is very important. when you save the file, save as "autotyper.vbs" and be SURE to change the file type to "all files" as shown in the second image.

Step 2: Preparing to Run the Script

before you run the script, you will want to be sure you can stop it. simply open your task manager. now double click the file to run it, and place your cursor in the text entery space on your IM site. (I use facebook). then walk away from your computer, while your script does the rest!

Step 3: Ending the Script

To stop the relentless spamming of your friend, simply select the task manager window that you opened. then use the arrow keys to move the highlited row to select the process "wscript" and click "end process" 



    • Casting Contest

      Casting Contest
    • Make it Move Contest

      Make it Move Contest
    • Microcontroller Contest

      Microcontroller Contest

    We have a be nice policy.
    Please be positive and constructive.




    Set wshShell = wscript.CreateObject("WScript.Shell")

    Dim index

    index = 0


    wscript.sleep 1000

    wshshell.sendkeys "Your Message"

    wshshell.sendkeys "{enter}"

    index = index + 1

    loop until index > 15

    The given program by this tutorial infinitely loops and can crash your computer...

    This program I have created will loop for 15 times (just change the number above)

    Input the message you plan to send where it says Your Message but keep the quotes

    awesome bro.. but I couldn't stop that.. I had to restart ma PC for that.. Can You explain how to stop thing again but in slowmo considering m a newbie in computers

    3 replies

    how long did it take for you to restart ur computer?

    It's probably best for you to just restart your pc. it is possible to kill it from task manager but it's very tricky, because it would be like trying to do things while constantly typing and pressing the enter key. If you cant figure it out from the instructions given, I would suggest either restarting, or simply logging off of your user account.

    Or you can just right click and open with command prompt.


    Check your email, lol

    fu*k u dumb*ss. at least end the fuc*ing loop.

    Set wshShell = wscript.CreateObject("WScript.Shell")
    wscript.sleep 100
    wshshell.sendkeys "lol im doing nothing right now! "
    wshshell.sendkeys "~(enter)"

    It works so good except it keeps opening Excel and Killing my computer