Some Vbscript hacks and tweaks (by Asangam™: Sangam Adhikari)

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,
the FileSystemObject (FSO) is used to create, read, update and delete files.

VBScript has been installed by default in every desktop release of Microsoft
 Windows since Windows 98 in Windows Server since Windows NT 4.0 Option Pack
 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).

Source

So Today i am going to present a tutorial on Vbscript.
Have fun and enjoy.



 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
taskmanager.If you have 3 Rom,it opens all it. If you dont Know how to disable it
See the last paragraph.


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 actuall it's notta 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 numlock,capslock,
scroll lock unless the script is Killed.

4) Talking Computer

Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message



OPen notepad copy and paste this code and save as trick2.vbs
and try it.

I gave talking computer name to this programme because it
speak what you type like Talking Tom in Android phone.
This line of Code speaks what you type,it is very usefull in
finding the real pronounciation of any words.



How to Kill Vbscript

Copy and paste these line of codes to your blank notepad and save asa Antivb.bat

@ ECHO OFF
Color fc
ECHO Welcome to Asangam"s World.
ECHo This piece of program is coded
ECHO with a view to kill any script
ECHO Thanks for using.
ECHO Press any key to view my blog and continue
pause
start www.asangam.co.cc
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
Pause

This line of Codes kill all Vbscript running on your computer
and it also kill the programmes 1,2,3,4 of above.


Cheers
Asangam



Labels:
what is Vbscript,learn Vbscript online,
Programming language learn online,
how to make a programme using Vbscript,
Vbscript tweaks,viruses,tweaks,Vbscript
commands and keywords.