Trainermodul problem auf Prozess 64Bit

[Xiantrius]

Ich habe das Trainermodul eingesetzt um auf ein Prozess der auf 64Bit läuft auszuführen.
Zuerst war mein Programm selbst auf 32 Bit.
Die Fehlermeldung war das er nur teilweilse den Prozessmodul abgeschlossen hat.

Dann habe ich mein Programm auf 64 Bit umgestellt.
Die gleiche Fehlermeldung kam aber wieder.

Zurzeit sieht der Code so aus:

Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

Public Function GetModuleBase_32Bit(ByVal ProcName As String, ByVal ModuleName As String)        Dim BaseAddress As Int32        For Each PM As ProcessModule In Process.GetProcessesByName(ProcName)(0).Modules            If ModuleName.ToLower = PM.ModuleName.ToLower Then                BaseAddress = PM.BaseAddress            End If        Next        Return BaseAddress    End Function    Public Function GetModuleBase_64Bit(ByVal ProcName As String, ByVal ModuleName As String)        Dim BasePointerAdress As Int64        If Process.GetProcessesByName(ProcName).Length <> 0 Then            For Each [Module] As ProcessModule In Process.GetProcessesByName(ProcName)(0).Modules                If [Module].ModuleName = ProcName Then                    BasePointerAdress = [Module].BaseAddress.ToInt64()                End If            Next            Return BasePointerAdress        End If    End Function

---

Die Frage ist jetzt ob der Trainermodul wo ich von diesem Forum habe auch für 64Bit Prozesse funktionieren kann?
Was muss ich noch umstellen?

mfg.
Xiantrius