c#设计的通过程序名称获取基址和循环读取内存

1.效果图

在这里插入图片描述
在这里插入图片描述

2.源码


```csharp
public abstract class HelpUtil
    {
   
        [DllImportAttribute("kernel32.dll", EntryPoint = "ReadProcessMemory")]
        public static extern bool ReadProcessMemory(
            IntPtr hProcess,
            IntPtr lpBaseAddress,
            IntPtr lpBuffer,
            int nSize,
            IntPtr lpNumberOfBytesRead
            );
        [DllImportAttribute("kernel32.dll", EntryPoint = "OpenProcess")]
        public static extern IntPtr OpenProcess(
            int dwDesiredAccess,
            bool bInheritHandle,
            int dwProcessId
            );
        [DllImport("kernel32.dll")]
        private static extern void CloseHandle(
            IntPtr hObject
            );
        //写内存
        [DllImportAttribute("kernel32.dll", EntryPoint = "WriteProcessMemory")]
        public static extern bool WriteProcessMemory(
            IntPtr hProcess,
            IntPtr lpBaseAddress,
            int[] lpBuffer,
            int nSize,
            IntPtr lpNumberOfBytesWritten
            );
        //获取窗体的进程标识ID
        public static int GetPid(string windowTitle)
        {
   
            int rs = 0;
            Process[] arrayProcess = Process.GetProcesses();
            foreach (Process p in arrayProcess)
            {
   
                if (p.MainWindowTitle.IndexOf(windowTitle) != -1)
                {
   
                    rs = p.Id;
                    break;
                }
            }
            return rs;
        }

        //根据进程名称获取PID
        public static int GetPidByProcessName(string processName)
        
  • 2
    点赞
  • 9
    收藏
    觉得还不错? 一键收藏
  • 2
    评论
在VB.NET中,可以通过使用Process类的帮助方法和属性来获取进程句柄,并进而获取模块基址。 首先,我们需要引入System.Diagnostics命名空间,以便能够使用Process类。然后,可以使用Process.GetProcessesByName方法通过进程名或进程ID获取进程对象。接下来,我们可以通过Process.MainModule属性获取主模块,并使用Module.BaseAddress属性获取模块的基址。 以下是一个简单的示例代码: ``` Imports System.Diagnostics Public Class MainForm Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim processName As String = "YourProcessName" ' 替换为你要获取基址的进程名 Dim processes() As Process = Process.GetProcessesByName(processName) If processes.Length > 0 Then Dim process As Process = processes(0) ' 假设只有一个该进程的实例 Dim moduleBaseAddress As IntPtr = process.MainModule.BaseAddress MessageBox.Show("进程的模块基址为: " & moduleBaseAddress.ToString()) Else MessageBox.Show("未找到指定的进程") End If End Sub End Class ``` 在上述代码中,我们先通过Process.GetProcessesByName方法获取进程对象的数组,然后再获取第一个进程的主模块的基址,并将其显示在一个消息框中。请注意,如果指定的进程名不存在,代码会显示一个相应的消息。 需要注意的是,为了能够执行这个操作,程序需要有足够的特权或权限,以便获取目标进程的句柄和模块基址

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 2
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值