These tricks work on Windows 8.1, Windows 8, Windows 7, Windows Vista, Windows XP and all previous versions of Windows.
About Compuer Tips And Hacking Tricks
Dim speaks, speech3. Replace Username with your own name.
speaks="Welcome to your PC, Username"
Set speech=CreateObject("sapi.spvoice")
speech.Speak speaks
@echo off
color 02
:tricks
echo %random%%random%%random%%random%%random%%random%%random%%random%
goto tricks
Matrix Falling Code Effect - Notepad Trick |
Set wshShell = wscript.CreateObject("WScript.Shell")Send this file to your friends as an email attachment to see the fun.
do
wscript.sleep 100
wshshell.sendkeys "This is a Virus. You have been infected."
loop
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
Notepad Diary |