5

I want to make a small VBS script which tells user if file is in use or not. I have one file and if this file is in use VBS should give me a message that file is in use. If file is not in use by any process, VBS should give me message that file not in use. I tried this but nothing works.

4

1 回答 1

8

You could try with a WMI query:

filename = "..."

Set wmi = GetObject("winmgmts://./root/cimv2")

qry = "SELECT * FROM Win32_Process WHERE CommandLine LIKE '%" & filename & "%'"
For Each p In wmi.ExecQuery(qry)
  WScript.Echo "Media file in use."
  WScript.Quit 0
Next

WScript.Echo "Media file not in use."
于 2013-03-11T09:57:06.997 回答