CONTOH-CONTOH PROGRAM NOTEPAD

CARA MEMBUAT VIRUS

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

Cara penggunaannya lumayan mudah, sobat buka Notpad (Start > All Programs > Assesories > Notpad), lalu Copy-Paste kode Script di atas pada Notpad tadi. Setelah selesai Simpan dengan Ekstensi .vbs. Contohnya ; blogadexme.vbs.

INGAT…!!!Hati-hati saat melakukan hal ini karena Antivirus apapun tidak akan ada yang dapat menghentikan hal ini selain loe menekan Ctrl + Alt + Del pada papan Keyboard setelah itu matikan proses wscripts.exe nya.

1.      

Membuka dan menutup CD/DVD Komputer

Copy script dibawah ini dan paste di notepad anda.

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

Simpan dengan format *.vbs.
Lalu Buka File Tersebut

2.     Menulis otomatis di notepad
Copy script dibawah ini dan paste di notepad anda.

Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “Tulisan ini akan menulis sendiri di notepad anda”
loop

Simpan dengan format *.vbs.
Lalu Buka File Tersebut

3.     Membuat Pesan muncul berulang – ulang
Copy script dibawah ini dan paste di notepad anda.

@ECHO off
:Begin
msg * hahahhaa
msg * santai boss
msg * ini hanya main-main
msg * jangan marah ya
msg * hanya bercanda
GOTO BEGIN

Simpan dengan format *.bat.
Lalu Buka File Tersebut

4.     Membuat Komputer Shutdown dengan muncul pesan.
Copy script dibawah ini dan paste di notepad anda.

@echo off
msg * Hahahahhaha
shutdown -s -c “Komputer anda mati”

Simpan dengan format *.bat.
Lalu Buka File Tersebut