Как сделать сканер process MD5# в режиме реального времени?
В настоящее время я пытаюсь построить программу, которая сканирует все запущенные процессы, получает MD5# этого процесса и сравнивает его с файлом .txt, содержащим список хэшей MD5. Если на MD5,# игр, то я сделаю действие, с окно MessageBox.
Беда в том, что я не знаю, как это сделать. Вот некоторый код, который я нашел, но нет никакой функции, которая считывает файл .txt, содержащий хэши MD5, а затем сравнивает хэш с запущенным процессом.
Option Strict On Option Explicit On Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim procs() As System.Diagnostics.Process = System.Diagnostics.Process.GetProcesses Dim f As String For Each proc As System.Diagnostics.Process In procs f = GetProcessFileName(proc) If f.Length > 0 Then ListBox1.Items.Add(f) ListBox1.Items.Add("MD5: " & GetMD5String(f)) ListBox1.Items.Add(String.Empty) End If Next End Sub Private Function GetProcessFileName(proc As System.Diagnostics.Process) As String Dim strRet As String = String.Empty Try strRet = proc.MainModule.FileName Catch ex As Exception ' This catch used to ignore "Access is denied" exception. End Try Return strRet End Function Private Function GetMD5String(ByVal strFilename As String) As String Dim cMD5 = System.Security.Cryptography.MD5.Create Dim bytHash As Byte() Dim sb As New System.Text.StringBuilder Using cStream As New IO.FileStream(strFilename, IO.FileMode.Open, IO.FileAccess.Read, IO.FileShare.Read) bytHash = cMD5.ComputeHash(cStream) End Using For Each b In bytHash sb.Append(b.ToString("X2")) Next Return sb.ToString End Function End Class
Итак, как вы выполняете эту задачу?
Спасибо!
Что я уже пробовал:
Посмотрел на различные проекты, чтобы попытаться помочь мне.