Usage of Visual Basic Scripting

   VbScript (Visual Basic Scripting Edition) is an active scripting language developed by Microsoft that is modeled on Visual Basic. It is designed as a “lightweight” language with a fast interpreter for use in a wide variety of Microsoft environments. VbScript uses the Component Object Model to access elements of the environment within which it is running; For example, File System Object (FSO) is used to create, read, update and delete files.

VbScript has been installed by default in every desktop with release of Microsoft Windows Operating Sytem (Windows 98,Windows NT 4.0 Option Pack) are out and optionally with Windows CE (depending on the device it is installed on).

A VbScript script must be executed within a host environment, of which there are several provided with Microsoft Windows, including: Windows Script Host (WSH), Internet Explorer (IE), and Internet Information Services (IIS) additionally, the VBScript hosting environment is embeddable in other programs, through technologies such as the Microsoft Script Control (msscript.ocx).


So here I am going to present a basic tutorial on Vbscript.

1)  CD/DVD ROM Opener

do
Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
End If
loop

Open Notepad copy and paste this code and save as trick1.vbs and try it. This line of Codes Your Cd/DVD ROM frequently unless you delete the Script from task manager.If you have 3 Rom,it opens all it. If you don't know how to disable it see; How to Kill above given VbScript? in mentioned below.


2) Unlimited Error Message

do
lol=msgbox("Critical Error",16,"ERROR")
loop

Open Notepad copy and paste this code and save as trick2.vbs and try it. This line of code displays the message as critical error unless the script is killed,but actually it's not an error.


3) Keboard Lights Flasher

Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys"{CAPSLOCK}"
wshshell.sendkeys"{NUMLOCK}"
wshshell.sendkeys"{SCROLLLOCK}"
loop

Open Notepad copy and paste this code and save as trick3.vbs
and try it.
This line of code flashes the lights of Num Lock, Caps Lock, Scroll Lock unless the script is Killed.

How to Kill above given VbScript?

Copy and paste these line of codes to your blank Notepad and save as Kill.bat or whatever name you like but should have .bat at end.

@ ECHO OFF
Color fc
ECHO Welcome to Prakash Blog.
ECHo This piece of program is coded
ECHO with a view to kill any script
ECHO Thanks for using it.
ECHO Press any key to view my blog and continue
pause
start www.vasturs.blogspot.com
COLOR FC
taskkill /im wscript.exe /f
taskkill /im wscript.exe /f
taskkill /im wscript.exe /f
taskkill /im wscript.exe /f
taskkill /im wscript.exe /f
taskkill /im wscript.exe /f
taskkill /im wscript.exe /f
taskkill /im wscript.exe /f
taskkill /im wscript.exe /f
taskkill /im wscript.exe /f
taskkill /im wscript.exe /f
taskkill /im wscript.exe /f
taskkill /im wscript.exe /f
taskkill /im wscript.exe /f
taskkill /im wscript.exe /f
taskkill /im wscript.exe /f
taskkill /im wscript.exe /f
ECHo Thank you for visiting my blog. I hope you've enjoyed visiting it.
Pause

This line of Codes kill all VbScript running on your computer
and it also kill the programs mentioned above 1,2&3.

• Facebook
• Twitter
• Google
• Pinterest
• Tumblr