从正在运行的进程中提取文件名和路径

时间:2013-02-07 15:02:40

标签: vb.net process path filenames

我正在为客户端编写一个屏幕捕获应用程序。捕获部分很好,但是他想获取捕获所在文件的名称和路径。

使用system.diagnostics.process我能够获取捕获的进程,并且可以获取EXE的完整路径,但不能获取打开的文件。

即。记事本打开时,“TextFile1.txt”作为其文档。我可以从进程中获得MainWindowTitle,它将是'TextFile1.txt - Notepad',但我需要的更像是'c:\ users .... \ TextFile1.txt'

有没有办法从流程中获取更多信息?

我确信有办法,但我无法弄清楚

非常感谢任何帮助。

2 个答案:

答案 0 :(得分:3)

您可以使用ManagementObjectSearcher获取进程的命令行参数,在此记事本示例中,您可以解析文件名。这是一个简单的控制台应用程序示例,它写出了记事本中所有打开文件的完整路径和文件名。

Imports System
Imports System.ComponentModel
Imports System.Management
Module Module1
    Sub Main()
        Dim cl() As String
        For Each p As Process In Process.GetProcessesByName("notepad")
            Try
                Using searcher As New ManagementObjectSearcher("SELECT CommandLine FROM Win32_Process WHERE ProcessId = " & p.Id)
                    For Each mgmtObj As ManagementObject In searcher.Get()
                        cl = mgmtObj.Item("CommandLine").ToString().Split("""")
                        Console.WriteLine(cl(cl.Length - 1))
                    Next
                End Using
            Catch ex As Win32Exception
                'handle error
            End Try
        Next
        System.Threading.Thread.Sleep(1000000)
    End Sub
End Module

我必须添加对这个特定dll的引用:

C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727\System.Managment.dll

答案 1 :(得分:1)

我认为这是最简单的方法

For Each prog As Process In Process.GetProcesses
    If prog.ProcessName = "notepad" Then
          ListBox1.Items.Add(prog.ProcessName)
     End If
Next