How about
code:
$comps=COMNetView()
for each $comp in $comps
  if $comp<>@WKSTA
    $rc=shutdown($comp,'',0,1,1)
  endif
next
$rc=shutdown(@WKSTA,'',0,1,1)
and run this on a server under administrative rights, e.g. as a scheudled task.
_________________________
There are two types of vessels, submarines and targets.