Originally Posted by
zachariasgila
I Did Not Copy Anyone... Just That Need A Few Codes ... cause i mess up my codes... ~~
Thanks for approving
Really now.. your code is the exact same as like 90% of the injectors on this site lol..
Code:
Private Function Inject(pID As Integer, dllLocation As String) As Boolean
Dim num As Integer = Form1.OpenProcess(2035711, 1, pID)
If num = 0 Then
Return False
End If
Dim bytes As Byte() = Encoding.ASCII.GetBytes(dllLocation)
Dim num2 As Integer = Form1.VirtualAllocEx(num, 0, bytes.Length, 4096, 4)
If num2 = 0 Then
Return False
End If
Dim text As String = "kernel32.dll"
Dim moduleHandle As Integer = Form1.GetModuleHandle(text)
Dim arg_51_0 As Integer = moduleHandle
text = "LoadLibraryA"
Dim procAddress As Integer = Form1.GetProcAddress(arg_51_0, text)
If moduleHandle = 0 OrElse procAddress = 0 Then
Return False
End If
Form1.WriteProcessMemory(num, num2, bytes, bytes.Length, 0U)
Dim num3 As Integer = Form1.CreateRemoteThread(num, 0, 0, procAddress, num2, 0, 0)
If num3 = 0 Then
Return False
End If
Form1.WaitForSingleObject(num3, 5000)
Form1.CloseHandle(num3)
Form1.CloseHandle(num)
Me.Label3.Text = "DLL Successfully Injected!!"
If Me.CheckBox1.Checked Then
Me.Close()
End If
Return True
End Function
Originally Posted by
Genesis
Why are all these visual basic injectors made with the same code...?
Sigh.
/Approved.
It's the kind of "coders" that VB.NET breeds. Every kid that picks it up and starts using it just copy pastes everything instead of actually learning what they are doing. The VB.NET section of this site kinda shows/proves it entirely lol.