5

ファイルが使用中かどうかをユーザーに知らせる小さな VBS スクリプトを作成したいと考えています。ファイルが 1 つあり、このファイルが使用中の場合、VBS からファイルが使用中であるというメッセージが表示されます。ファイルがどのプロセスでも使用されていない場合、VBS はファイルが使用されていないというメッセージを表示するはずです。これを試しましたが、何も機能しません。

4

1 に答える 1

8

WMI クエリを試すことができます。

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 に答える