Page 1 of 3 123 LastLast
Results 1 to 15 of 38
  1. #1
    flameswor10's Avatar
    Join Date
    Jul 2009
    Gender
    male
    Posts
    12,528
    Reputation
    981
    Thanks
    10,404
    My Mood
    In Love

    Smile [RELEASE] FULL WORKING INJECTOR SOURCE CODE

    First, Download Visual Basic 2008.
    Then Add These items
    1 Timer
    6 buttons
    3 labels
    1 checkbox
    1 Listbox
    And 1 Textbox << Name this item ProcessName or it will give errors

    DO NOT TOUCH ANY OF THE CODING ABOVE FORM1_LOAD OR ELSE YOU'LL FAIL INJECTION

    Copy and paste the source code below. (Yes, Copy and paste this awesome release) << This is the source coding for my own

    [php]
    Public Class Form1

    Private TargetProcessHandle As Integer
    Private pfnStartAddr As Integer
    Private TargetBufferSize As Integer

    Public Const PROCESS_VM_READ = &H10
    Public Const TH32CS_SNAPPROCESS = &H2
    Public Const MEM_COMMIT = 4096
    Public Const PAGE_READWRITE = 4
    Public Const PROCESS_CREATE_THREAD = (&H2)
    Public Const PROCESS_VM_OPERATION = (&H8)
    Public Const PROCESS_VM_WRITE = (&H20)

    Public Declare Function ReadProcessMemory Lib "kernel32" ( _
    ByVal hProcess As Integer, _
    ByVal lpBaseAddress As Integer, _
    ByVal lpBuffer As String, _
    ByVal nSize As Integer, _
    ByRef lpNumberOfBytesWritten As Integer) As Integer

    Public Declare Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" ( _
    ByVal lpLibFileName As String) As Integer

    Public Declare Function VirtualAllocEx Lib "kernel32" ( _
    ByVal hProcess As Integer, _
    ByVal lpAddress As Integer, _
    ByVal dwSize As Integer, _
    ByVal flAllocationType As Integer, _
    ByVal flProtect As Integer) As Integer

    Public Declare Function WriteProcessMemory Lib "kernel32" ( _
    ByVal hProcess As Integer, _
    ByVal lpBaseAddress As Integer, _
    ByVal lpBuffer As String, _
    ByVal nSize As Integer, _
    ByRef lpNumberOfBytesWritten As Integer) As Integer

    Dim injector1 As String = "flameswor10 made this injector. If you see this, then the Coder is a noob C+Per. Flame him as hard as you can."

    Public Declare Function GetProcAddress Lib "kernel32" ( _
    ByVal hModule As Integer, ByVal lpProcName As String) As Integer

    Private Declare Function GetModuleHandle Lib "Kernel32" Alias "GetModuleHandleA" ( _
    ByVal lpModuleName As String) As Integer

    Public Declare Function CreateRemoteThread Lib "kernel32" ( _
    ByVal hProcess As Integer, _
    ByVal lpThreadAttributes As Integer, _
    ByVal dwStackSize As Integer, _
    ByVal lpStartAddress As Integer, _
    ByVal lpParameter As Integer, _
    ByVal dwCreationFlags As Integer, _
    ByRef lpThreadId As Integer) As Integer

    Public Declare Function OpenProcess Lib "kernel32" ( _
    ByVal dwDesiredAccess As Integer, _
    ByVal bInheritHandle As Integer, _
    ByVal dwProcessId As Integer) As Integer

    Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" ( _
    ByVal lpClassName As String, _
    ByVal lpWindowName As String) As Integer

    Private Declare Function CloseHandle Lib "kernel32" Alias "CloseHandleA" ( _
    ByVal hObject As Integer) As Integer

    Private Sub Inject(ByVal pszLibFileRemote As String)
    Timer1.Stop()
    Dim TargetProcess As Process() = Process.GetProcessesByName(ProcessName.Text)
    TargetProcessHandle = OpenProcess(PROCESS_CREATE_THREAD Or PROCESS_VM_OPERATION Or PROCESS_VM_WRITE, False, TargetProcess(0).Id)
    Dim I As Integer
    pszLibFileRemote = ListBox1.Items.Item(I)
    pfnStartAddr = GetProcAddress(GetModuleHandle("Kernel32"), "LoadLibraryA")
    Dim Rtn As Integer
    Dim LoadLibParamAdr As Integer
    LoadLibParamAdr = VirtualAllocEx(TargetProcessHandle, 0, TargetBufferSize, MEM_COMMIT, PAGE_READWRITE)
    Rtn = WriteProcessMemory(TargetProcessHandle, LoadLibParamAdr, pszLibFileRemote, TargetBufferSize, 0)
    CreateRemoteThread(TargetProcessHandle, 0, 0, pfnStartAddr, LoadLibParamAdr, 0, 0)
    CloseHandle(TargetProcessHandle)
    If CheckBox1.Checked = True Then
    MsgBox(injector1)
    Me.Close()
    Else
    MsgBox(injector1)
    Button1.Enabled = True
    Button4.Enabled = True
    Button3.Enabled = True
    Button2.Enabled = True
    End If
    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    Dim TargetProcess As Process() = Process.GetProcessesByName("ProcessName.text")
    If TargetProcess.Length = 0 Then
    Me.Label3.Text = ("Waiting for " & ProcessName.Text & ".exe")
    Me.Label2.Text = ("Ready to Inject")
    Else
    Timer1.Stop()
    Me.Label3.Text = ("Injected to" & ProcessName.Text & ".exe")
    Me.Label2.Text = ("Injection Succesfull")
    For Each hack In ListBox1.Items
    Call Inject(hack.ToString)
    Next
    End If
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Button1.Enabled = False
    Button4.Enabled = False
    Button3.Enabled = False
    Button2.Enabled = False
    Timer1****terval = 50
    Timer1.Start()
    MsgBox("Ready to Inject")
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    Button1.Text = "Auto Inject"
    Button5.Text = "Manual Inject"
    Button6.Text = "Save Settings"
    Button4.Text = "Clear Listbox"
    Button3.Text = "Remove dll"
    Button2.Text = "Add DLL"
    Me.Label1.Text = ("Please Enter Process Name without .exe")
    Me.Label3.Text = ("Welcome to my injector")
    Me.Label2.Text = ("Please Choose a dll file")
    Dim fileReader As System****.StreamReader
    If IO.File.Exists(Application.StartupPath & "\settings****i") Then
    fileReader = _
    My.Computer.FileSystem.OpenTextFileReader(Applicat ion.StartupPath & "\settings****i")
    Dim stringReader As String
    stringReader = fileReader.ReadLine()
    If stringReader = "Checkbox1.Checked = 1" Then
    CheckBox1.Checked = True
    Else
    End If
    Else
    Dim file As New System****.StreamWriter(Application.StartupPath & "\settings****i")
    file.WriteLine("Checkbox1.checked = 0")
    file.Close()
    End If
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    Dim OpenFileDialog1 As New OpenFileDialog

    OpenFileDialog1****itialDirectory = "Desktop"
    OpenFileDialog1.Filter = "DLL files (*.dll)|*.dll|All files (*.*)|*.*"
    OpenFileDialog1.FilterIndex = 1
    OpenFileDialog1.RestoreDirectory = True
    OpenFileDialog1.Multiselect = True

    If OpenFileDialog1.ShowDialog() = System.Windows.Forms.DialogResult.OK Then
    Try
    For Each i As Object In OpenFileDialog1.FileNames
    ListBox1.Items.Add(i)
    Next
    Catch Ex As Exception
    MessageBox.Show("Cannot read file from disk. Original error: " & Ex.Message)
    End Try
    End If
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
    ListBox1.Items.Remove(ListBox1.SelectedItem.ToStri ng)
    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
    ListBox1.Items.Clear()
    End Sub

    Private Sub Button5_Click(ByVal pszLibFileRemote As String)
    Timer1.Stop()
    Dim TargetProcess As Process() = Process.GetProcessesByName(ProcessName.Text)
    TargetProcessHandle = OpenProcess(PROCESS_CREATE_THREAD Or PROCESS_VM_OPERATION Or PROCESS_VM_WRITE, False, TargetProcess(0).Id)
    pfnStartAddr = GetProcAddress(GetModuleHandle("Kernel32"), "LoadLibraryA")
    TargetBufferSize = 1 + Len(pszLibFileRemote)
    Dim Rtn As Integer
    Dim LoadLibParamAdr As Integer
    LoadLibParamAdr = VirtualAllocEx(TargetProcessHandle, 0, TargetBufferSize, MEM_COMMIT, PAGE_READWRITE)
    Rtn = WriteProcessMemory(TargetProcessHandle, LoadLibParamAdr, pszLibFileRemote, TargetBufferSize, 0)
    CreateRemoteThread(TargetProcessHandle, 0, 0, pfnStartAddr, LoadLibParamAdr, 0, 0)
    CloseHandle(TargetProcessHandle)
    If CheckBox1.Checked = True Then
    Me.Close()
    MsgBox(injector1)
    Else
    MsgBox(injector1)
    End If
    End Sub

    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
    Dim file As New System****.StreamWriter(Application.StartupPath & "\settings****i")
    file.WriteLine("Checkbox1.Checked = " & CheckBox1.CheckState)
    file.Close()
    MsgBox("Settings are Saved")
    End Sub
    End Class
    [/php]

    Do not name any of these buttons as my epic coding will do it all for you..
    Now place the items in an awesome place in your form and then release it. Please remember to give credits to

    Just incase you need the button names for placing purposes
    Code:
            Button1.Text = "Auto Inject"
            Button5.Text = "Manual Inject"
            Button6.Text = "Save Settings"
            Button4.Text = "Clear Listbox"
            Button3.Text = "Remove dll"
            Button2.Text = "Add DLL"
    And Coders, please don't say anything bad about this source code. It works perfectly fine and all the newbies have to do is C+P to make their first injector they can be proud of.

    Now remember, REMEMBER TO PRESS THANKS AND + REP ME AND GIVE CREDITS

    THERE WILL BE SOME ERRORS.

    RENAME Timer1****terval to timer1. interval Without spaces
    and RENAME OpenFileDialog1****itialDirectory to OpenFileDialog1. initialDirectory without spaces
    RENAME \settings****i" TO \settings. ini Without spaces

    Credits:
    Miwin for injecting base... (It's been fully customized after that though)
    Me for editing to make it better
    Last edited by flameswor10; 08-10-2010 at 07:43 PM.
    No I do not make game hacks anymore, please stop asking.


    Been MPGH Minion: 6 July 2011 - 1 August 2012

  2. The Following 20 Users Say Thank You to flameswor10 For This Useful Post:

    -L0rDoFGaMeZ_ (08-24-2011),Awcomenoutjr (08-10-2012),BeGodOfWar (08-08-2012),bluesky23614 (11-05-2010),deathninjak0 (08-11-2010),felipe4334 (07-27-2013),hack2learn (06-27-2011),joered (08-09-2010),kidprob2 (08-11-2010),markoj (09-19-2010),mojo786 (08-28-2010),mullerrice (08-16-2010),noleash (08-21-2010),NOOBJr (08-15-2010),ogkush317 (10-31-2011),Rssc25 (08-21-2010),Shartob1 (06-12-2012),Sky_____ (12-15-2012),wafinasir (05-20-2016),Yepikiyay (08-14-2010)

  3. #2
    Mc565's Avatar
    Join Date
    Mar 2009
    Gender
    male
    Location
    127.0.0.1
    Posts
    5,492
    Reputation
    390
    Thanks
    1,471
    Good source code. Good Job XD

    mc565mpgh@hotmail.com

    -Thanks to De La Ghetto
    <3


  4. The Following User Says Thank You to Mc565 For This Useful Post:

    SirDanielot (08-09-2010)

  5. #3
    SirDanielot's Avatar
    Join Date
    Sep 2009
    Gender
    male
    Posts
    5
    Reputation
    10
    Thanks
    1
    Good job Steven, or 'Flames' as the noobs call you.

  6. #4
    FORCE™'s Avatar
    Join Date
    Apr 2009
    Gender
    male
    Location
    Omg ure a pedaphile
    Posts
    4,226
    Reputation
    69
    Thanks
    665
    My Mood
    Goofy
    Say good job and say "This works perfectly. Thanks"
    *oor something


    LIVERPOOL FC


  7. The Following User Says Thank You to FORCE™ For This Useful Post:

    SirDanielot (08-09-2010)

  8. #5
    freedompeace's Avatar
    Join Date
    Jul 2010
    Gender
    female
    Posts
    3,035
    Reputation
    340
    Thanks
    2,784
    My Mood
    Sad
    Quote Originally Posted by Mc565 View Post
    Good source code. Good Job XD
    Great way for everyone to start off with!

    However, don't use this as your release method (or at least try to build on it) - there is currently only one method of injection and there is no error encapsulation and handling.

    Perhaps add error handling, even a simple try - catch statement, and you can start off !

    Good luck to everyone out there!
    Last edited by freedompeace; 08-09-2010 at 10:13 PM.

  9. The Following User Says Thank You to freedompeace For This Useful Post:

    SirDanielot (08-09-2010)

  10. #6
    SirDanielot's Avatar
    Join Date
    Sep 2009
    Gender
    male
    Posts
    5
    Reputation
    10
    Thanks
    1
    Quote Originally Posted by FORCE™ View Post
    Say good job and say "This works perfectly. Thanks"
    *oor something
    It does work I've tested..

  11. #7
    flameswor10's Avatar
    Join Date
    Jul 2009
    Gender
    male
    Posts
    12,528
    Reputation
    981
    Thanks
    10,404
    My Mood
    In Love
    Quote Originally Posted by freedompeace View Post
    Great way for everyone to start off with!

    However, don't use this as your release method (or at least try to build on it) - there is currently only one method of injection and there is no error encapsulation and handling.

    Perhaps add error handling, even a simple try - catch statement, and you can start off !

    Good luck to everyone out there!
    pshh, you don't need those for a "first" Injector.. They have to learn off the coding I give them
    No I do not make game hacks anymore, please stop asking.


    Been MPGH Minion: 6 July 2011 - 1 August 2012

  12. The Following User Says Thank You to flameswor10 For This Useful Post:

    SirDanielot (08-09-2010)

  13. #8
    SirDanielot's Avatar
    Join Date
    Sep 2009
    Gender
    male
    Posts
    5
    Reputation
    10
    Thanks
    1


    Ban me pl0x~

  14. #9
    freedompeace's Avatar
    Join Date
    Jul 2010
    Gender
    female
    Posts
    3,035
    Reputation
    340
    Thanks
    2,784
    My Mood
    Sad
    Quote Originally Posted by flameswor10 View Post
    pshh, you don't need those for a "first" Injector.. They have to learn off the coding I give them
    Funny thing is, this perfectly matches (as in, 100%) with other code on 100 other forums, all posted before you, with different usernames.

    I don't think you're these 100 other users at once, are you? Or did they steal the source code from your head before you took it out yourself? /:

  15. #10
    flameswor10's Avatar
    Join Date
    Jul 2009
    Gender
    male
    Posts
    12,528
    Reputation
    981
    Thanks
    10,404
    My Mood
    In Love
    Quote Originally Posted by freedompeace View Post
    Funny thing is, this perfectly matches (as in, 100%) with other code on 100 other forums, all posted before you, with different usernames.

    I don't think you're these 100 other users at once, are you? Or did they steal the source code from your head before you took it out yourself? /:
    lolwut? I gave credits to Miwin...
    He made the injector that "You c+p and you have to rename the .dll file to the .exe name" and I based my injector on that. I edited it to make it no errors and guess what. It worked.. I GAVE CREDITS

    My injector has a manual inject function and an auto inject function. And a Close on inject function also.

    Most of the sources out there don't have those (and I have a listbox function)
    Also, most injector sources are based on the one gave by MSDN so obviously they will be similar.
    No I do not make game hacks anymore, please stop asking.


    Been MPGH Minion: 6 July 2011 - 1 August 2012

  16. #11
    joered's Avatar
    Join Date
    Dec 2009
    Gender
    male
    Location
    Netherlands
    Posts
    345
    Reputation
    17
    Thanks
    329
    Nice release
    Last edited by joered; 08-10-2010 at 12:47 AM.

  17. #12
    Shimmy-'s Avatar
    Join Date
    Aug 2010
    Gender
    female
    Posts
    62
    Reputation
    10
    Thanks
    0
    Anyone can make this. And you should definitely give credits. You did not code this at all.
    You only added a few buttons here and there to make it look fancy. Also the coding for manual inject is pretty easy. Just call Inject() when the person pushes the button..

  18. #13
    flameswor10's Avatar
    Join Date
    Jul 2009
    Gender
    male
    Posts
    12,528
    Reputation
    981
    Thanks
    10,404
    My Mood
    In Love
    Quote Originally Posted by Shimmy- View Post
    Anyone can make this. And you should definitely give credits. You did not code this at all.
    You only added a few buttons here and there to make it look fancy. Also the coding for manual inject is pretty easy. Just call Inject() when the person pushes the button..
    Oh my gawd.. I added credits to miwin you fag. If you just wanna flame me, GTFO. And yes, I edited the code to make it work for CA.. and also, you can't talk yourself. Pshh, heck for I didn't code this at all.. I added save to ini file and load from ini file.. I also made add dll and everything.. Doesn't even require openfiledialogue.

    Now if anyone els wanna flame me. Go ahead.. You'll just ruin it for the people who wants to learn off this injector source..

    I was planning to contribute more to you guys.. But shimmy boy over there mightve spoilt it for you guys. You want more sources, then keep pressing thanks. If not. FLAME ME AS HARD AS YOU CAN

    please don't flame from here on. You'll jst get this closed and ruin peoples chances of making an injector
    No I do not make game hacks anymore, please stop asking.


    Been MPGH Minion: 6 July 2011 - 1 August 2012

  19. #14
    Zoom's Avatar
    Join Date
    May 2009
    Gender
    male
    Location
    Your going on my 24/7 DDoS hit list.
    Posts
    8,561
    Reputation
    127
    Thanks
    5,912
    My Mood
    Happy
    Fucking awesome, just C&P it
    -Rest in peace leechers-

    Your PM box is 100% full.

  20. The Following User Says Thank You to Zoom For This Useful Post:

    [MPGH]flameswor10 (08-10-2010)

  21. #15
    flameswor10's Avatar
    Join Date
    Jul 2009
    Gender
    male
    Posts
    12,528
    Reputation
    981
    Thanks
    10,404
    My Mood
    In Love
    Lol ty zoom. Remember, don't flame me and just copy and paste the code
    No I do not make game hacks anymore, please stop asking.


    Been MPGH Minion: 6 July 2011 - 1 August 2012

Page 1 of 3 123 LastLast

Similar Threads

  1. Injector Source Code not working?
    By SuperMan9871 in forum Combat Arms Coding Help & Discussion
    Replies: 13
    Last Post: 04-07-2011, 09:00 PM
  2. [RELEASE] FULL WORKING INJECTOR SOURCE CODE
    By flameswor10 in forum Visual Basic Programming
    Replies: 34
    Last Post: 08-14-2010, 10:58 AM
  3. ~ DLL Injector Source Code ~
    By Silk[H4x] in forum Visual Basic Programming
    Replies: 32
    Last Post: 12-17-2009, 12:18 AM
  4. Combat Arms Injector Source Code
    By Melikepie in forum Combat Arms Discussions
    Replies: 6
    Last Post: 10-21-2009, 04:24 PM
  5. Open Source Release. Semi-Useless Timer Source Code!
    By User1 in forum Visual Basic Programming
    Replies: 6
    Last Post: 09-20-2009, 03:55 AM

Tags for this Thread