Posted by VBScript, or Visual Basic Scripting, is a scripting language developed by Microsoft primarily for automating tasks and configuring system settings on Windows. However, its simplicity and ease of use have also made it a popular choice for harmless pranks and jokes among friends. In this blog post, we’ll explore ten entertaining VBScript pranks that you can use to surprise and amuse your friends. But remember, with great power comes great responsibility – always use these pranks with caution and ensure that they don’t cause any harm or inconvenience to anyone.
To execute these Virus, follow these steps:
- Open Notepad on your computer.
- Copy and paste the above code into Notepad.
- Save the file with a “.vbs” extension (e.g., “fakevirus.vbs”).
- Double-click the saved file to run the script.
- Fake Virus Prank:
MsgBox "Your computer has been infected with a virus. Please contact technical support immediately.", vbCritical, "Virus Alert"
This simple script displays a fake virus alert message box on the victim’s computer, causing panic and confusion. Of course, assure them afterward that it was just a harmless prank!
- Endless Error Messages:
Do
MsgBox "Error: Unable to locate file.", vbCritical, "Error"
Loop
This script creates an infinite loop of error message boxes, making it seem like the computer is experiencing a catastrophic failure. Your friend will likely be baffled until they realize it’s just a prank.
- Desktop Flip:
Set objShell = CreateObject("Shell.Application")
objShell.ToggleDesktop
This script flips the victim’s desktop upside down, leaving them scratching their heads as they try to figure out what just happened. It’s a harmless yet hilarious prank that’s sure to get a good laugh.
- Ghost Typing:
Set WshShell = WScript.CreateObject("WScript.Shell")
WScript.Sleep 5000
WshShell.SendKeys "Boo!"
This script waits for a few seconds before typing out “Boo!” on the victim’s computer, making it seem like a ghost is haunting their keyboard. Perfect for spooky pranks or Halloween.
- Fake Blue Screen of Death (BSOD):
MsgBox "A problem has been detected and Windows has been shut down to prevent damage to your computer.", vbCritical, "Blue Screen of Death"
Simulate the infamous Blue Screen of Death with this prank script. Your friend will freak out momentarily before realizing it’s just a harmless joke.
- Endless CD Drive Eject:
Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
do
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
loop
This script continuously ejects the CD drive tray on the victim’s computer, leading to frustration and confusion as they try to figure out what’s causing it.
- Random Mouse Movements:
Set WshShell = CreateObject("WScript.Shell")
Do
WshShell.SendKeys "{UP}"
WshShell.SendKeys "{DOWN}"
WshShell.SendKeys "{LEFT}"
WshShell.SendKeys "{RIGHT}"
Loop
Keep your friend on their toes with this script that generates random mouse movements, causing their cursor to dart around the screen unpredictably.
- Caps Lock Madness:
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop
Toggle the Caps Lock on and off repeatedly, driving your friend crazy as they try to type normally but find that everything is in capital letters.
- Infinite Looping Sound:
Set oVoice = CreateObject("SAPI.SpVoice")
do
oVoice.Speak "I'm stuck in an infinite loop!"
loop
This script endlessly repeats a spoken message through the computer’s speakers, creating a maddening audio loop that’s sure to annoy your friend.
- Desktop Chaos:
Set objShell = WScript.CreateObject("WScript.Shell")
do
objShell.SendKeys "{UP}"
objShell.SendKeys "{DOWN}"
objShell.SendKeys "{LEFT}"
objShell.SendKeys "{RIGHT}"
objShell.SendKeys "{F11}"
loop
Combine random mouse movements with toggling the fullscreen mode, creating utter chaos on your friend’s desktop as windows resize and shuffle around unpredictably.
Conclusion:
VBScript may be a powerful tool for system administrators and developers, but it can also be a source of harmless fun and amusement among friends. The ten pranks listed above are just a sampling of the countless possibilities for mischief that VBScript enables. However, it’s essential to use these pranks responsibly and ensure that they don’t cause any harm or inconvenience to others. After all, the best pranks are the ones that leave everyone laughing in the end. So go ahead, unleash your inner prankster, and enjoy some harmless fun with VBScript!
Spyboy blog 