Windows Notepad Magic Tricks

 Hello friends, in this post i am going to post some cool tricks using Notepad. Notepad is considered as a simple text editor, but its wrong. I found this trick on web and I thought it will be great idea to share it with you all. I have tested it on my PC. Now lets the trick begins….

---

      Note: To disable .VBS tricks, just go to Task Manager{ Ctrl+Alt+Delete} and you will see ‘wscript.exe’, select that and click on ‘End Process’.

---

  

   1. Play Disco light on keyboard’s LED lights.

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

                     Copy the above code, paste it in notepad and save as trick.vbs     Double click on the saved file and see…

---

2. Makes an error box, saying “Virus Found”.

do
x=msgbox("Virus Found",20,"Warning")
loop

                    Copy the above code, paste it in notepad and save as trick.vbs  Double click on the saved file and see… 

---

3.  Talking virus says ‘sysem going to crash’.

StrText="Caution Virus Infection Detected, System Going To Crash"
set Objvoice=CreateObject("SAPI.SpVoice")
Objvoice.Speak StrText

                   Copy the above code, paste it in notepad and save as trick.vbs   freak out your friends 

---

4. This one is my favorate one. try this and say how was it? Note that this is to be saved as trick.bat

@echo off
C:
cls
echo Hello
pause
echo How are you?
pause
echo im a virus
pause
echo hurray !! you have became a hacker
pause
echo bye bye..
pause

       copy the above code, save it as trick.bat open that saved file.

---

5.  Use Notepad as a digital diary!!!

• Open Notepad.
• Type .LOGO [in capital letters].
• Save it with any name and close notepad.
• Open that saved file. your digital diary is now ready.

  ---

6.  This VBS trick will make your CD drives continuously eject. I f you put them back in, it will pop them out again.

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

      Copy above code and  save as as trick.vbs  open that file..

---

7. I am sure, this trick can scare your friends. try this.WScript.Sleep 1800
WScript.Sleep 1000
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "notepad"
WScript.Sleep 100
WshShell.AppActivate "Notepad"
WScript.Sleep 500
WshShell.SendKeys "Hel"
WScript.Sleep 500
WshShell.SendKeys "lo "
WScript.Sleep 500
WshShell.SendKeys ", wel"
WScript.Sleep 500
WshShell.SendKeys "co"
WScript.Sleep 500
WshShell.SendKeys "me to "
WScript.Sleep 500
WshShell.SendKeys "hell"
WScript.Sleep 500
WshShell.SendKeys "!!"
WScript.Sleep 500
WshShell.SendKeys "Nic"
WScript.Sleep 500
WshShell.SendKeys "e to "
WScript.Sleep 500
WshShell.SendKeys "me"
WScript.Sleep 500
WshShell.SendKeys "et y"
WScript.Sleep 500
WshShell.SendKeys "ou"
          Copy the above code, paste it in notepad and save as trick.vbs     open that file and see the trick.

---

                       Feel free, drop a comment please...

Do you Like this story..?

Get Free Email Updates Daily!	Follow us!