[Anonymоus]

$Userlist - список пользователей, по 1 на строку. Например, так:

Код:

\\192.168.1.217
\\MORFEY
\\BIBLIOTEKA
\\MICROSOF-D58208

$Sharename - Название общей шары на всех компах в сети
$LocalShare - Путь к общей шаре на этом компе
$Program - Нужная программа
Если компьютер не в сети, то опрашивать его может до 20 секунд, чтобы не казалось, что скрипт завис, я добавил индикацию текущего адреса

Код:

@Echo Off
Set $Userlist=userlist.txt
Set $Sharename=Temp
Set $LocalShare=D:\Temp
Set $Program=C:\Windows\notepad.exe

Set /A $isRunning=0
For /F "tokens=*" %%l In (%$Userlist%) Do (
Echo Checking... %%l\%$Sharename%\
If Exist %%l\%$Sharename%\isRunning.flag Set /A $isRunning=$isRunning+1
)
If Not %$isRunning%==0 (Exit) Else (Echo.>"%$LocalShare%\isRunning.flag")
Echo Do not close this window
Call "%$Program%"
Del "%$LocalShare%\isRunning.flag"