Recent Posts

Jumat, 28 Oktober 2011

Script Jahil VBS


Hello teman... selamat pagi, pada artikel kali ini saya akan menjelaskan tentang VBS Script, khususnya dalam pembuatan script jahil.

Sebelumnya apa itu VBS Script. VBScript atau lengkapnya Visual Basic Scripting Edition adalah sebuah bahasa skrip yang diinterpretasikan saat dieksekusi yang dikembangkan oleh Microsoft Corporation pada tahun 1996 yang seringnya digunakan dalam penjelajah web Internet Explorer (dapat digunakan mulai versi Internet Explorer 3.0). VBScript merupakan sebuah bahasa skrip turunan dari bahasa pemrograman Visual Basic for Applications (VBA) yang digunakan di dalam Microsoft Office dan beberapa platform pengembangan buatan Microsoft lainnya. VBScript menghilangkan beberapa fungsi dari VBA, seperti halnya fungsi I/O berkas dan akses langsung terhadap sistem operasi untuk menyediakan sebuah platform yang aman untuk mengembangkan aplikasi berbasis web dengan menggunakan platform Active Server Pages (ASP). Internet Explorer merupakan penjelajah web pertama yang menyediakan dukungan terhadap kode skrip yang ditulis dalam bahasa VBScript. VBScript dapat dijalankan di atas Windows 9x/ME, Windows 2000, Windows XP, Windows Server 2003, Windows Vista, Windows Server 2008 serta beberapa platform UNIX.

VBScript tidak dapat digunakan untuk membuat program yang berdiri sendiri. Akan tetapi, VBScript harus dimasukkan ke dalam sebuah berkas HTML. Ketika Internet Explorer membuka dokumen berkas HTML tersebut, VBScript dapat melakukan fungsi yang sama seperti JavaScript--skrip tersebut akan dieksekusi. VBScript juga dapat digunakan untuk membuat sebuah alikasi HTML (yang memiliki ekstensi .HTA) yang membutuhakan paling tidak Internet Explorer 5 atau yang lebih baru agar dapat berjalan. HTA tidak seara langsung menggunakan Internet Explorer, tetapi menggunakan sebuah program, yakni MSHTA.EXE, yang menginterpretasikan dan menjalankan kode.

Nah udah pada tau kan apa itu VBS Script sekarang mari kita membuat programnya.

Kali ini kita buat beberapa script yang berfungsi pada OS windows, scriptnya akan berfungsi sesuai dengan fungsinya

Tidak perlu susah ? karna script hanya di muat di notepad, type save nya cukup dengan format .VBS atau .bat

Langsung aja deh ?

1). Memberi pesan dan shutdown komputer :
Code:

@echo off
msg * Aku tidak suka kamu
shutdown -c ?Error! Kamu jelek sekali? -s

Note : save dengan .bat

2). Menyalakan tombol Caps lock secara simultan :
Code:

Set wshShell =wscript.CreateObject(?WScript.Shell?)
do
wscript.sleep 100
wshshell.sendkeys ?{CAPSLOCK}?
loop

Note : save dengan extension .vbs

3). Buka/tutup CD drive secara terus menerus :
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

Note : save dengan Extexsion .vbs

4). Tekan Enter secara simultan :
Code:

et wshShell = wscript.CreateObject(?WScript.Shell?)
do
wscript.sleep 100
wshshell.sendkeys ?~(enter)?
loop

Note : save dengan ex.vbs

5). Mengetik pesan kita secara otomatis di notepad :
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! ?

Note : save dengan Ex.vbs

6). Menjalankan BACKSPACE secara simultan :
Code:

MsgBox ?Let?s go back a few steps?
Set wshShell =wscript.CreateObject(?WScript.Shell?)
do
wscript.sleep 100
wshshell.sendkeys ?{bs}?
loop

Note : save dengan ex.vbs

7). Buka Notepad secara terus menerus :
Code:

@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top

Note : save dengan type .bat

8). Munculin 5 pilihan yang harus korban pilih :
Code:

@echo off
title The end of the world
cd C:\
:menu
cls
echo oops gw gak tanggung jawab lho apa yang barusan lu lakuin hehhe,,semuanya dh jadi tanggung jawab lu sendiri?
pause
echo pilih nama cwe yang lu suka =P :
echo 1. datanya bakal ilang lho.
echo 2. komputer nya corrupt lho
echo 3. heheh no comment deh klo yang ini
echo 4. mau mati pake jalan ini?
echo 5. bye bye?
set input=nothing
set /p input=Choice:
if %input%==1 goto one
if %input%==2 goto two

Note : save dengan .bat

9). Hack keyboard sehingga korban dipaksa mengetik ? You are a gay? secara simultan :
Code:

Set wshShell = wscript.CreateObject(?WScript.Shell?)
do
wscript.sleep 100
wshshell.sendkeys ?You are a gay?
loop

Note : save dengan ex.vbs

Catatan:
Utk mematikan proses script,cukup buka task manager dan kill proses bat atau vbs
 by : andystonecold

Selamat mencoba teman..

0 komentar:

Posting Komentar