-Nhindy™V-Soul
Jumlah posting : 2 Points : 6 Join date : 11.04.11 Age : 28 Lokasi : Jakarta , Indonesia
| Subyek: [Tutorial] Memasukan DLL ke Dalam Injector. Thu Apr 14, 2011 6:51 pm | |
| ♫ Step 1 Klik Menu Add-Ins - Klik pada Add-Ins Manager, cari VB6 Resouce Editor. centang pada loaded pada behaviornya. ini contoh pictnya Add Ins Manager. kalau tidak ada berarti vb6 nya tidak komplit, coba downlot yg versi full. ♫ Step 2 Ntar kalau dah aktif (terloaded), coba klik menu tool - klik pada resource editor. pada resource editor klik pada icon add custom resource (icon kotak, disebelah icon help yang tanda ?), dan pilih file dll nya. kalau udah klik save. ntar liat kode resource nya misalnya 101. dan pembuatan library dalam resource selesai. ♫ Step 3 Buat modul dengan nama CreateFileFromResource ====== Code Modul Nya Masukan Ke Injector Nya ====== Public Sub CreateFileFromRessource (ByVal ID As Integer, _ ByVal FileName As String)Dim DataArray() As ByteDim Handle As Integer DataArray = LoadResData(ID, "CUSTOM") Handle = FreeFile Open FileName For Binary As #Handle Put #Handle, , DataArray Close #Handle Erase DataArrayEnd Sub ====== Selesai / Finished ======nanti saat loading injector, tepatnya pada form_load, extract dll nya. misalnya kode hasil simpan dll nya diresource adalah 101. maka ====== Code Lainnya/ Code Injector ====== Private Sub Form_Load
'auto create folder temp Dim dPath As String on error resume next dPath = "c:\temp" If Dir$(dPath) = "" Then MkDir dPath
End If
'Sisipkan kode extract file dari resource CreateFileFromRessource (101, "c:\temp\namadll1.dll") 'terserah maunya nyimpan/extract dimana. ini cuman contoh.
End sub ====== Selesai / Finished ======tidak harus nama.dll itu dll, bisa juga direname, misalnya nama.ini, nama.crc, nama.bin. or whatever, tetap bisa jalan asalkan betul2 library. nah berdasarkan contoh diatas, itu dll ditempatkan di c:\temp\namadll1.dll, ntar kode injectnya menjadi | |
|