Benvenuto! Per postare e godere delle funzionalità del forum registrati, occorrono pochi secondi ed è gratis!

[Guida] Creazione Injector
(Questo messaggio è stato modificato l'ultima volta il: 02/06/2012, 17:20 da digger.)

Iscritto
Messaggi: 891
Discussioni: 58
Registrato: 03-2011
Mix: 0
Visto la discussione precedente lo scrivo per tutti!
Cosa serve:
1. Microsoft visual basic 2008/10 express edition
2. 5 minuti
3. un minimo di attenzione


Passo 1.

Installiamo visual basic 2008 express edition e apriamolo (ma va? xD)

Passo 2.

Clicchiamo su file (in alto a destra)----new project---windows form application---diamogli un nome

Passo 3.

Tasto destro sull'form1... (il quadrato/rettangolo)---view code

Passo 4.

Cancellate tutto quello scritto, e inserite questo codice:

    VB Programming
  1. Public Class Form1
  2.  
  3. Private TargetProcessHandle As Integer
  4. Private pfnStartAddr As Integer
  5. Private pszLibFileRemote As String
  6. Private TargetBufferSize As Integer
  7.  
  8. Public Const PROCESS_VM_READ = &H10
  9. Public Const TH32CS_SNAPPROCESS = &H2
  10. Public Const MEM_COMMIT = 4096
  11. Public Const PAGE_READWRITE = 4
  12. Public Const PROCESS_CREATE_THREAD = (&H2)
  13. Public Const PROCESS_VM_OPERATION = (&H<img src="https://hackmix.altervista.org/images/smilies/cool.png" alt="Cool" title="Cool" class="smilie smilie_56" />
  14. Public Const PROCESS_VM_WRITE = (&H20)
  15.  
  16. Public Declare Function ReadProcessMemory Lib "kernel32" ( _
  17. ByVal hProcess As Integer, _
  18. ByVal lpBaseAddress As Integer, _
  19. ByVal lpBuffer As String, _
  20. ByVal nSize As Integer, _
  21. ByRef lpNumberOfBytesWritten As Integer) As Integer
  22.  
  23. Public Declare Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" ( _
  24. ByVal lpLibFileName As String) As Integer
  25.  
  26. Public Declare Function VirtualAllocEx Lib "kernel32" ( _
  27. ByVal hProcess As Integer, _
  28. ByVal lpAddress As Integer, _
  29. ByVal dwSize As Integer, _
  30. ByVal flAllocationType As Integer, _
  31. ByVal flProtect As Integer) As Integer
  32.  
  33. Public Declare Function WriteProcessMemory Lib "kernel32" ( _
  34. ByVal hProcess As Integer, _
  35. ByVal lpBaseAddress As Integer, _
  36. ByVal lpBuffer As String, _
  37. ByVal nSize As Integer, _
  38. ByRef lpNumberOfBytesWritten As Integer) As Integer
  39.  
  40. Public Declare Function GetProcAddress Lib "kernel32" ( _
  41. ByVal hModule As Integer, ByVal lpProcName As String) As Integer
  42.  
  43. Private Declare Function GetModuleHandle Lib "Kernel32" Alias "GetModuleHandleA" ( _
  44. ByVal lpModuleName As String) As Integer
  45.  
  46. Public Declare Function CreateRemoteThread Lib "kernel32" ( _
  47. ByVal hProcess As Integer, _
  48. ByVal lpThreadAttributes As Integer, _
  49. ByVal dwStackSize As Integer, _
  50. ByVal lpStartAddress As Integer, _
  51. ByVal lpParameter As Integer, _
  52. ByVal dwCreationFlags As Integer, _
  53. ByRef lpThreadId As Integer) As Integer
  54.  
  55. Public Declare Function OpenProcess Lib "kernel32" ( _
  56. ByVal dwDesiredAccess As Integer, _
  57. ByVal bInheritHandle As Integer, _
  58. ByVal dwProcessId As Integer) As Integer
  59.  
  60. Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" ( _
  61. ByVal lpClassName As String, _
  62. ByVal lpWindowName As String) As Integer
  63.  
  64. Private Declare Function CloseHandle Lib "kernel32" Alias "CloseHandleA" ( _
  65. ByVal hObject As Integer) As Integer
  66.  
  67.  
  68. Dim ExeName As String = IO.Path.GetFileNameWithoutExtension(Application.ExecutablePath)
  69.  
  70. Private Sub Inject()
  71. On Error GoTo 1 ' If error occurs, app will close without any error messages
  72. Timer1.Stop()
  73. Dim TargetProcess As Process() = Process.GetProcessesByName("WarRock")
  74. TargetProcessHandle = OpenProcess(PROCESS_CREATE_THREAD Or PROCESS_VM_OPERATION Or PROCESS_VM_WRITE, False, TargetProcess(0).Id)
  75. pszLibFileRemote = Application.StartupPath & "/" & ExeName & ".dll"
  76. pfnStartAddr = GetProcAddress(GetModuleHandle("Kernel32"), "LoadLibraryA")
  77. TargetBufferSize = 1 + Len(pszLibFileRemote)
  78. Dim Rtn As Integer
  79. Dim LoadLibParamAdr As Integer
  80. LoadLibParamAdr = VirtualAllocEx(TargetProcessHandle, 0, TargetBufferSize, MEM_COMMIT, PAGE_READWRITE)
  81. Rtn = WriteProcessMemory(TargetProcessHandle, LoadLibParamAdr, pszLibFileRemote, TargetBufferSize, 0)
  82. CreateRemoteThread(TargetProcessHandle, 0, 0, pfnStartAddr, LoadLibParamAdr, 0, 0)
  83. CloseHandle(TargetProcessHandle)
  84. 1: Me.Close()
  85. End Sub
  86.  
  87. Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
  88. If IO.File.Exists(Application.StartupPath & "/" & ExeName & ".dll") Then
  89. Dim TargetProcess As Process() = Process.GetProcessesByName("HSUpdate")
  90. If TargetProcess.Length = 0 Then
  91. Me.Label1.Text = ("Waiting For WarRock.exe")
  92. Else
  93. Timer1.Stop()
  94. Me.Label1.Text = "Inject succes now running"
  95. Call Inject()
  96. End If
  97. Else
  98. Me.Label1.Text = ("" & ExeName + ".dll Not Found")
  99. End If
  100. End Sub
  101.  
  102. Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  103. Timer1.Interval = 50
  104. Timer1.Start()
  105. MsgBox("By Luxor")
  106. Process.Start("http://hackmix.altervista.org")
  107. End Sub
  108. End Class



P.S potete benissimo cambiare i nomi dopo "...." come By riku, hackmix ecc...

Passo 5.

torniamo su form1 [design] (scritto in alto al centro)

Passo 6.

Clicchiamo sul martello e la chiave sugli strumenti... quello in alto a destra che farà apparire un menu a sinistra (è probabile che gia ci sia)

Passo 7.

Cerchiamo "Label" click sinistro e facciamo una riga (come la volete voi) sul quadrato/rettangolo(form1) (questo sarà dove verrà scritto "waiting for warrock.exe ecc....)

Passo 8.

Cerchiamo "Timer" click sinistro e clicchiamo sul quadrato/rettangolo(form1)

QUI L'INJECTOR è FINITO COMPILATE CON F5

Passo 9.

Abbellire il proprio injector ... in basso a destra potrete cambiare colore,immagine di sfondo ecc....

Finito =)

Spero di esservi stato d'aiuto...

IL CODE NON è MIO (anche se l'ho un po cambiato perche prima non funzionava)

LA GUIDA SI!

26/03/2011, 0:28
#1
Cerca

Il criceto mannaro
Messaggi: 3,536
Discussioni: 201
Registrato: 03-2011
Mix: 3,737
grazie Smile


digger
26/03/2011, 1:00
#2
Cerca

Amministratore
Messaggi: 2,334
Discussioni: 231
Registrato: 03-2011
Mix: 2,570.8
Un programma al volo copincolla Happywide


[Per vedere i link devi REGISTRARTI.]

Prima di aprire ogni contenuto scaricato su siti esterni ad HackMix, scansionatelo su VirusTotal.
26/03/2011, 12:25
#3
Cerca

Iscritto
Messaggi: 891
Discussioni: 58
Registrato: 03-2011
Mix: 0
(26/03/2011, 12:25)Admin Ha scritto:

[Per vedere i link devi REGISTRARTI.]

Un programma al volo copincolla Happywide

meglio di niente xD anche se poi puoi modificare l'immagine dell'injector come vuoi Tounge

26/03/2011, 14:35
#4
Cerca

ZioPaperino VIP
Messaggi: 2,350
Discussioni: 667
Registrato: 03-2011
Mix: 0
Ho già il my injector, ty cmq =D

26/03/2011, 14:51
#5
Cerca

Iscritto
Messaggi: 891
Discussioni: 58
Registrato: 03-2011
Mix: 0
prego...

29/03/2011, 16:26
#6
Cerca

Iscritto
Messaggi: 230
Discussioni: 14
Registrato: 03-2011
Mix: 0
Utile


29/03/2011, 20:05
#7
Cerca
(Questo messaggio è stato modificato l'ultima volta il: 29/05/2012, 14:39 da NosOne1.)

йσѕσиє1 νι ѕσνяαѕтα
Messaggi: 1,085
Discussioni: 108
Registrato: 03-2011
Mix: 0
qualcuno mi puo aiutare ho seguito tutta la guida ma alla prima riga Public Class Form1 mi sottolinia public e mi dice uno spazio dei nomi non può contenere direttamente membri come campi o metodi digger mi rivolgo a te che sei il piu bravo e poi mi fa Avviso 2 Impossibile visualizzare la finestra di progettazione per il file, perché nessuna delle classi contenute può essere progettata. L'utilità di progettazione ha esaminato le seguenti classi del file:

Form1 --- Impossibile progettare la classe base 'System.Object'. 0 0

29/05/2012, 14:31
#8
Cerca

Il criceto mannaro
Messaggi: 3,536
Discussioni: 201
Registrato: 03-2011
Mix: 3,737
a meno che tu non abbia problemi con l'installazione di visual basic direi che stai sbagliando qualcosa, se segui bene le istruzioni deve funzionare, ricontrolla bene tutti i passaggi, stai usando visual basic 2008? hai creato un progetto windows form application? hai fatto doppio click sul form e cancellato TUTTO quello che ci stava scritto?

consiglio, lascia perdere quello che hai fatto e ricomincia tutto da capo stando attento a fare tutto giusto


digger
29/05/2012, 14:53
#9
Cerca

йσѕσиє1 νι ѕσνяαѕтα
Messaggi: 1,085
Discussioni: 108
Registrato: 03-2011
Mix: 0
ehh no sto usando questo Microsoft Visual C# 2010 Express

29/05/2012, 14:58
#10
Cerca

Il criceto mannaro
Messaggi: 3,536
Discussioni: 201
Registrato: 03-2011
Mix: 3,737
beh questo spiega perchè non funziona


digger
29/05/2012, 15:30
#11
Cerca

Iscritto
Messaggi: 2
Discussioni: 0
Registrato: 06-2012
Mix: 0
come si fa ad usare ancora un injector in vb?? XD

cmq scusate l'off topic ma:
admin ti ho mandado un pm settimane fa per i problemi col mio account e adesso manco dal cell posso accedere...
pm non ne posso inviare perchè sono appena registrato, insomma...è possibile che mi resetti la password del mio account 'skyline@69'??
grazie Smile

02/06/2012, 16:06
#12
Cerca
(Questo messaggio è stato modificato l'ultima volta il: 02/06/2012, 17:20 da digger.)

Il criceto mannaro
Messaggi: 3,536
Discussioni: 201
Registrato: 03-2011
Mix: 3,737
Ciao Sky Happywide

(02/06/2012, 16:06)Skyline@6_92nd Ha scritto:

[Per vedere i link devi REGISTRARTI.]

come si fa ad usare ancora un injector in vb?? XD

perchè? alla fine fa le stesse cose di uno fatto in C

@Luxor, mi sono permesso di modificare il tuo post per attivare il syntax higlighting del vb


digger
02/06/2012, 16:13
#13
Cerca
(Questo messaggio è stato modificato l'ultima volta il: 26/08/2012, 22:57 da Pocciox.)

1 Life, 1 Avatar &lt;3
Messaggi: 9,074
Discussioni: 271
Registrato: 08-2011
Mix: 0
Mo scarico vb e prova a farmene uno Smile
Grazie luxor, devo un +1 anche a te

Ragazzi ho 4 giorni di +1 in coda.Asd.

Non funziona mi da degli errori di sintax nonostante io abbia copiato e incollato il codice da qui ._.!

26/08/2012, 21:37
#14
Cerca

Iscritto
Messaggi: 30
Discussioni: 0
Registrato: 12-2012
Mix: 0
ma non esiste il file vb?

16/12/2012, 20:27
#15
Cerca


Discussioni simili
Discussione Autore Risposte Letto Ultimo messaggio
  UNITY3D : Creazione videogiochi multipiattaforma digger 13 2,061 29/10/2014, 22:55
Ultimo messaggio: digger
  Clasar's Injector Warrock claudio2255 4 787 24/11/2012, 16:31
Ultimo messaggio: claudio2255
  [Agg. 1.1] Advanced Injector by Cato97 Cato97 64 6,361 11/09/2012, 11:47
Ultimo messaggio: Skyline@69



Utenti che stanno guardando questa discussione: 1 Ospite(i)