Create a file with the names of the Computers you want to run it against.
This code does not include code to verify the system is on or reachable.


Code:

$Computers = ReadFile(@ScriptDir+'\'+'computers.txt')
For each $Computer in $Computers
If $Computer
$Computer = Trim($Computer)
Run "Beyondexecv2 \\" + $Computer + " -d LockWorkstation -l 0"
EndIf
Next
 

Function ReadFile($file)
Dim $lf, $f, $_, $t
$lf=CHR(10)
$f=FreeFileHandle
$_=Open($f,$file)
If @ERROR Exit @ERROR EndIf
Do $t=$t+$lf+ReadLine($f) Until @ERROR
$_=Close($f)
$ReadFile=Split(SubStr($t,2),$lf)
EndFunction