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")
do
wscript.sleep 100
wshshell.sendkeys "lol im doing nothing right now! "
wshshell.sendkeys "~(enter)"
loop

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" 

Share

    Recommendations

    • Make it Glow Contest 2018

      Make it Glow Contest 2018
    • Optics Contest

      Optics Contest
    • Plastics Contest

      Plastics Contest

    14 Discussions

    0
    None
    Mr_Gare_Bear

    2 years ago

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

    Dim index

    index = 0

    do

    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

    0
    None
    ATI4890HD

    6 years ago on Introduction

    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
    0
    None
    DylanP30ATI4890HD

    Reply 2 years ago

    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.

    0
    None
    DylanP30

    2 years ago

    HELP!!!! NOW WHEN I TRY TO REMOVE IT IT WILL SPAM EVERYTHING ON MY COMPUTER!!!!!

    0
    None
    goodhackerpro123

    2 years ago

    201227@learning.gsis.edu.hk spam me lol

    0
    None
    jwalin181

    3 years ago

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

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

    0
    None
    NathanB30

    3 years ago on Introduction

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