Sadece Kodları Paylaşıyom İnşalah İşinize yarar
Csh
VB.Net:
On Error Resume Next
Dim p As Process = Process.GetProcessesByName("Wolftü.bin")(0)
For Each moz As System.Diagnostics.ProcessModule In p.Modules
If moz.FileName.IndexOf("csh") <> -1 Then
Label1.Text = moz.BaseAddress.ToString
End If
Next
Obj
VB.Net:
On Error Resume Next
Dim p As Process = Process.GetProcessesByName("Wolftü.bin")(0)
For Each moz As System.Diagnostics.ProcessModule In p.Modules
If moz.FileName.IndexOf("obj") <> -1 Then
Label3.Text = moz.BaseAddress.ToString
End If
Next