Introducing MPGH's AIGA. The latest advancement in artificial intelligence. Click here now to learn more!
Results 1 to 12 of 12
  1. #1
    Victoria's Avatar
    Join Date
    Feb 2011
    Gender
    female
    Location
    Everywhere where love is♥
    Posts
    1,154
    Reputation
    -20
    Thanks
    94
    My Mood
    In Love

    How to make an injector with source code!

    hello,

    this is an tutorial to make an simple injector.

    First off you need visual basic 06/08/10 doesn't matter.
    You can download one here: https://www.mpgh.net/forum/242-crossf...ss-2010-a.html
    Its^ approved so it should be clean.
    It can give you a virus detect, but it's just an false positive.
    Steps:
    1.- Create an new project
    2.- press CTRL+Shift+A, to make an fully new project.
    3.- source code:
    Code:
    Public Class Form1
    
        Private TargetProcessHandle As Integer
        Private pfnStartAddr As Integer
        Private pszLibFileRemote As String
        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
    
        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
    
    
        Dim ExeName As String = IO.Path.GetFileNameWithoutExtension(Application.ExecutablePath)
    
        Private Sub Inject()
            On Error GoTo 1 ' If error occurs, app will close without any error messages
            Timer1.Stop()
            Dim TargetProcess As Process() = Process.GetProcessesByName("Special Force")
            TargetProcessHandle = OpenProcess(PROCESS_CREATE_THREAD Or PROCESS_VM_OPERATION Or PROCESS_VM_WRITE, False, TargetProcess(0).Id)
            pszLibFileRemote = Application.StartupPath & "\" + ExeName + ".dll"
            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)
    1:      Me.Close()
        End Sub
    
        Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
            If IO.File.Exists(Application.StartupPath & "\" + ExeName + ".dll") Then
                Dim TargetProcess As Process() = Process.GetProcessesByName("HSUpdate")
                If TargetProcess.Length = 0 Then
                    Me.TextBox1.Text = ("Waiting for specialforce.exe")
                    Me.TextBox2.Text = ("Let´s Hack")
                Else
                    Timer1.Stop()
                    Me.TextBox1.Text = "Done..."
                    Call Inject()
                End If
            Else
                Me.TextBox1.Text = ("" + ExeName + ".dll not found")
                Me.TextBox2.Text = ("Rename the .dll To " + "" + ExeName)
            End If
        End Sub
    
        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Timer1.Interval = 50
            Timer1.Start()
        End Sub
    
        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            MsgBox("Thats the Status Box!", MsgBoxStyle.Information, "Info")
        End Sub
    End Class
    This is the source code what you need to type.
    Than its not done.
    You need to put some buttons/timer/textboxes
    2 TextBoxes
    1 Button
    1 Timer
    Now you'r done!
    You have an injector, but it's very boring.
    So let add some cheer-up stuff.
    You can add to cheer it up:
    Background/music

    This was my tutorial, i hope this will help alot of people that ask source code's and how to make.


  2. The Following User Says Thank You to Victoria For This Useful Post:

    DaRk (03-14-2011)

  3. #2
    [DropDown]'s Avatar
    Join Date
    Oct 2010
    Gender
    female
    Location
    Rotterdam, Netherlands
    Posts
    357
    Reputation
    10
    Thanks
    16
    Nice work, nice girl.
    Keep it up.

  4. #3
    Foxable's Avatar
    Join Date
    Feb 2011
    Gender
    male
    Location
    Egypt
    Posts
    7
    Reputation
    10
    Thanks
    0
    My Mood
    Amused

    Thumbs down Not working!

    1. Not Working for CrossFire

    2. What's "specialforce.exe" ?


  5. #4
    Swiftdude's Avatar
    Join Date
    Apr 2009
    Gender
    male
    Location
    Illinois.
    Posts
    12,572
    Reputation
    1130
    Thanks
    2,995
    My Mood
    Cynical
    ╪moved to hack source╪
    Still love you Giggletron

  6. #5
    jhefrey's Avatar
    Join Date
    Dec 2009
    Gender
    male
    Posts
    292
    Reputation
    11
    Thanks
    84
    My Mood
    Amused
    why the source code have dropper virus
    my antivirus detect it
    and why there is only few required to make a injector
    2 text boxes,1 button, and 1 timer
    it is not only the requirements to make a injector
    Press Thanks If I Helped You




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

    itsmeblack (03-13-2011)

  8. #6
    Gyurin's Avatar
    Join Date
    Nov 2010
    Gender
    male
    Location
    \Wrong Section
    Posts
    588
    Reputation
    -54
    Thanks
    59
    My Mood
    Innocent
    Not Work Man

  9. #7
    Victoria's Avatar
    Join Date
    Feb 2011
    Gender
    female
    Location
    Everywhere where love is♥
    Posts
    1,154
    Reputation
    -20
    Thanks
    94
    My Mood
    In Love
    Quote Originally Posted by Gyurin View Post
    Not Work Man
    Sorry people, this injector is detected!
    I gonna make new injector source and release this week.

  10. #8
    Margherita's Avatar
    Join Date
    Jan 2011
    Gender
    female
    Posts
    11,299
    Reputation
    783
    Thanks
    1,287
    My Mood
    Bashful
    Nice tutorial. I'll make an injector out of this.

    Good job
    PM Me | VM Me | Rules

    MARGHERITA

  11. #9
    **HACKER**'s Avatar
    Join Date
    Apr 2010
    Gender
    male
    Location
    Outside Your House ;-0
    Posts
    645
    Reputation
    22
    Thanks
    228
    My Mood
    Yeehaw
    Lol This Doesnt Work Anymore But Nice Try Anyway

  12. #10
    empso's Avatar
    Join Date
    Mar 2011
    Gender
    male
    Location
    没有
    Posts
    3
    Reputation
    10
    Thanks
    40
    如果有源码就好了。。。。

  13. #11
    “I fear the day technology will surpass our human interaction. The world will have a generation of idiots.” ~Albert Einstein
    MPGH Member
    SteamAss's Avatar
    Join Date
    Nov 2010
    Gender
    male
    Location
    Crossfire
    Posts
    2,278
    Reputation
    28
    Thanks
    770
    My Mood
    Asleep
    lol I can help you create the code! and making the tut for Visual Basic just PM me if you accept



    If you need my Help:
    PM/VM

    Because The People Who Are Crazy Enough To Think They Can Change The World, Are The Ones Who Do. ~Steve Jobs

  14. #12
    CheatCreatorzz's Avatar
    Join Date
    Dec 2010
    Gender
    male
    Posts
    922
    Reputation
    18
    Thanks
    730
    My Mood
    Amused
    Lowl Victoria.. xD just Copy/Past the code from Google? or other sites? cuz this is Detected a long time ago xD





    (_¸.•*´'`°¤¸'¸¤°´'`*•.¸_)

    Video Creator
    GFX Creator
    C++ Coder
    D3D Coder

    (¯`*•.¸,¤°´'`°¤,¸.•*´¯)