var keeps coming out as 0 no matter what I try.
Am I doing this right?
Code:Declare Function ReadProcessMemory Lib "kernel32" Alias "ReadProcessMemory" (ByVal hProcess As Integer, ByVal lpBaseAddress As Integer, ByRef lpBuffer As Integer, ByVal nSize As Integer, ByRef lpNumberOfBytesWritten As Integer) As IntPtr Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As IntPtr Private Sub btnCurrentXP_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCurrentXP.Click Dim var As Integer Dim windowhandle As IntPtr Dim buffer(7) As Byte Dim bytesWritten As Integer windowhandle = FindWindow(vbNullString, "My window") var = ReadProcessMemory(windowhandle, &H80B910, buffer(0), 8, bytesWritten) MsgBox(var) End Sub




Reply With Quote