S4 Hack mit VB?

Quote:

Originally Posted by -SilentHill* wäre schon nichtwar? *-* ich geb servercrash ein und alle server sind down :D such dir ein VB tutorial und ein tutorial zu memory edit mit VB und such dir dann halt die adresse mit cheat engine die du geändert haben willtst. (wie das geht solltest du dann wissen :D)

Quote:

Originally Posted by Honeysweet Gott ey hört auf mit euren Tutorials :facepalm:

Quote:

Originally Posted by Sasukeking- Oder einfach mal jemanden fragen... :D Wäre einer so nett und mir die VB Codes für die S4 Hacks zugeben? Wäre ziemlich Dankbar!

Public Class MemoryLib
    Private Declare Function WriteProcessMemory Lib "kernel32" (ByVal hProcess As Integer, ByVal lpBaseAddress As Integer, ByRef lpBuffer As Long, ByVal nSize As Integer, ByRef lpNumberOfBytesWritten As Integer) As Long
    Private Declare Auto Function ReadProcessMemory Lib "kernel32" (ByVal hProcess As Integer, ByVal lpBaseAddress As Integer, ByRef lpBuffer As Long, ByVal nSize As Integer, ByRef lpNumberOfBytesWritten As Integer) As Long
    Private Declare Function VirtualProtectEx Lib "kernel32" (ByVal hProcess As Long, ByRef lpAddress As Object, ByVal dwSize As Long, ByVal flNewProtect As Long, ByRef lpflOldProtect As Long) As Long

    Public Function Read(ByVal ProcessHandle As IntPtr, ByVal Address As Integer, ByVal Size As Integer)
        Dim Buffer As Long

        Try
            ReadProcessMemory(ProcessHandle, Address, Buffer, Size, 0)
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error!")
            Return False
        End Try

        Return Buffer
    End Function

    Public Function WriteValue(ByVal ProcessHandle As IntPtr, ByVal Address As Integer, ByVal Value As Long, ByVal Size As Integer)
        Try
            VirtualProtectEx(ProcessHandle, Address, Size, &H4&, 0)
            WriteProcessMemory(ProcessHandle, Address, Value, 4, 0)
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error!")
            Return False
        End Try

        Return True
    End Function
End Class

Quote:

Originally Posted by Honeysweet Wird dir nichts bringen aber nunja ok hier mal der Code wie man WriteProcessMemory nutzen kann: (64bit Version) Code: Public Class MemoryLib Private Declare Function WriteProcessMemory Lib "kernel32" (ByVal hProcess As Integer, ByVal lpBaseAddress As Integer, ByRef lpBuffer As Long, ByVal nSize As Integer, ByRef lpNumberOfBytesWritten As Integer) As Long Private Declare Auto Function ReadProcessMemory Lib "kernel32" (ByVal hProcess As Integer, ByVal lpBaseAddress As Integer, ByRef lpBuffer As Long, ByVal nSize As Integer, ByRef lpNumberOfBytesWritten As Integer) As Long Private Declare Function VirtualProtectEx Lib "kernel32" (ByVal hProcess As Long, ByRef lpAddress As Object, ByVal dwSize As Long, ByVal flNewProtect As Long, ByRef lpflOldProtect As Long) As Long Public Function Read(ByVal ProcessHandle As IntPtr, ByVal Address As Integer, ByVal Size As Integer) Dim Buffer As Long Try ReadProcessMemory(ProcessHandle, Address, Buffer, Size, 0) Catch ex As Exception MsgBox(ex.Message, MsgBoxStyle.Critical, "Error!") Return False End Try Return Buffer End Function Public Function WriteValue(ByVal ProcessHandle As IntPtr, ByVal Address As Integer, ByVal Value As Long, ByVal Size As Integer) Try VirtualProtectEx(ProcessHandle, Address, Size, &H4&, 0) WriteProcessMemory(ProcessHandle, Address, Value, 4, 0) Catch ex As Exception MsgBox(ex.Message, MsgBoxStyle.Critical, "Error!") Return False End Try Return True End Function End Class So viel Spaß beim rätseln. Allein Code zu leechen ohne das du Grundlagen kannst bringt dir nichts. Edit: @Vorposter Weil man verdammtnochmal die verdammte Sprache richtig lernen soll damit man das ganze auch passiert?! Allein nur Tutorial für WriteProcessMemory/OpenProcess/ReadProcessMemory ist so extrem dumm das es mir schon um die Person leid tut die sowas macht statt die Sprache von Anfang an richtig zu lernen :facepalm:

Quote:

Originally Posted by Sasukeking- Danke und was muss ich eingeben wenn ich eine 32-Bit version möchte?