Langsung aja saya akan menambahkan supaya injektor buatan agan agan semua menjadi bagus
Go to TKP
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 download yang 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:
ByVal FileName As String)
Dim DataArray() As Byte
Dim Handle As Integer
DataArray = LoadResData(ID, "CUSTOM")
Handle = FreeFile
Open FileName For Binary As #Handle
Put #Handle, , DataArray
Close #Handle
Erase DataArray
End Sub
Nanti saat loading injector, tepatnya pada form_load, extract dll nya.
misalnya kode hasil simpan dll nya diresource adalah 101. maka
Code:
.............kode lainnya/kode injector .............
'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
nah berdasarkan contoh diatas, itu dll ditempatkan di c:\temp\namadll1.dll, ntar kode injectnya menjadi
