elitepvpers - CE Adresse in VB08 einfügen

hey Friseur...
ja dabei kann ich dir helfen :D
habe selbst Vb08..
kann aber nur sagen, wie man die value der adress verändert...
frezzen versuch ich selbst grand hinzubekommen...
das ist der gesammte code
also folgendes:

Quote:

Public Class 'SplashScreen1 Form1 Etc...
Private Declare Function WriteMemorySingle Lib "kernel32" Alias "WriteProcessMemory" (ByVal Handle As Integer, ByVal Address As Integer, _

'dann button klick einfügen:
Dim M As ProcessModule

If Process.GetProcessesByName("S4Client").Length = 0 Then
Exit Sub
End If
Dim Handle As Integer = Process.GetProcessesByName("S4Client")(0).Handle

For Each M In Process.GetProcessesByName("S4Client")(0).Modules ' Hier sreht: für jedes Process unter dem namen S4Client (OHNE .exe)!!! folgendes ausführen:
Dim Adresse As Integer = &H 'jetzt nurnoch hier die Adresse einfügen
Dim Value As String = 'Die Value einfügen, auf was die geändert werden soll
WriteMemorySingle(Handle, Adresse, Value, 4, 0)

Next

ja das wars :D