![My source of multidll auto injector [VB.NET] Empty](https://2img.net/i/empty.gif)
well edited little of it
added 2 more timers to inject 2 more dlls
well just do whatever u want with it
added 2 more timers to inject 2 more dlls
well just do whatever u want with it
- Code:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
OpenFileDialog1.Filter = "DLL (*.dll) |*.dll"
OpenFileDialog1.ShowDialog()
Dim FileName As String
FileName = OpenFileDialog1.FileName.Substring(OpenFileDialog1.FileName.LastIndexOf("\"))
Dim DllFileName As String = FileName.Replace("\", "")
Me.TextBox1.Text = (DllFileName)
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
OpenFileDialog1.Filter = "DLL (*.dll) |*.dll"
OpenFileDialog1.ShowDialog()
Dim FileName As String
FileName = OpenFileDialog1.FileName.Substring(OpenFileDialog1.FileName.LastIndexOf("\"))
Dim DllFileName As String = FileName.Replace("\", "")
Me.TextBox2.Text = (DllFileName)
End Sub
'
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
OpenFileDialog1.Filter = "DLL (*.dll) |*.dll"
OpenFileDialog1.ShowDialog()
Dim FileName As String
FileName = OpenFileDialog1.FileName.Substring(OpenFileDialog1.FileName.LastIndexOf("\"))
Dim DllFileName As String = FileName.Replace("\", "")
Me.TextBox3.Text = (DllFileName)
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If IO.File.Exists(OpenFileDialog1.FileName) Then
Dim TargetProcess As Process() = Process.GetProcessesByName(TextBox4.Text)
If TargetProcess.Length = 0 Then
Me.Label4.Text = ("Waiting for " + TextBox4.Text + ".exe")
Else
Timer1.Stop()
Me.Label4.Text = "Successfully Injected!"
End If
Else
End If
End Sub
Private Sub GroupBox3_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GroupBox3.Enter
End Sub
Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
If IO.File.Exists(OpenFileDialog1.FileName) Then
Dim TargetProcess As Process() = Process.GetProcessesByName(TextBox5.Text)
If TargetProcess.Length = 0 Then
Me.Label5.Text = ("Waiting for " + TextBox5.Text + ".exe")
Else
Timer2.Stop()
Me.Label5.Text = "Successfully Injected!"
End If
Else
End If
End Sub
Private Sub Timer3_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer3.Tick
If IO.File.Exists(OpenFileDialog1.FileName) Then
Dim TargetProcess As Process() = Process.GetProcessesByName(TextBox6.Text)
If TargetProcess.Length = 0 Then
Me.Label6.Text = ("Waiting for " + TextBox6.Text + ".exe")
Else
Timer3.Stop()
Me.Label6.Text = "Successfully Injected!"
End If
Else
End If
End Sub
» WWW.PINOYHIDEOUT.COM
» weapon unlucker
» Soldier Front Wallhack(WIN7 X64)
» USF AG public hack
» Ponzi Weapon Unlocker 2015
» Whats the New Cheat Sir ..
» [besh]Hack USF V 15
» we are back