code:

---

; uses the COMNetView() and ScheduleTask() v1.3 UDFs

break on
dim $iRC

; set restrictive script settings
$iRC=SETOPTION('Explicit','on')
$iRC=SETOPTION('NoVarsInStrings','on')
$iRC=SETOPTION('WrapAtEOL','on')

dim $asComputers, $sComp, $sExcluded
dim $sTSName,$sTSDate,$sTSTime,$sTSType,$sTSCmd,$sTSPrms

; do not run the scheduled command on these computers
$sExcluded='server1','server2','server3','server4'

$asComputers=COMNetView()
if ubound($asComputers)+1
  ? 'Computers in domain '+@DOMAIN+' = '+(ubound($asComputers)+1)
else
  ? 'Error '+@ERROR+' - '+@SERROR
  ? 'Unable to retrieve list of computers in domain '+@DOMAIN
endif

$sTSName='example.job'
$sTSDate='TODAY'
$sTSTime='NOW'
$sTSType='ONCE'
$sTSCmd='notepad'
$sTSPrms='%TEMP%\test.txt'

for each $sComp in $asComputers
  if ascan($sExcluded,$scomp)=-1
    ? 'Scheduling task for '+$sComp
    $iRC=scheduletask($sTSName,$sComp,$sTSDate,$sTSTime,$sTSType,$sTSCmd,$sTSprms)
    ? 'Error '+@ERROR+' - '+@SERROR
  else
    ? $sComp+' excluded from update'
  endif
next

exit 0

---

code:

---

If $Time = 'Now'
  	$shellcmd = $shellcmd+ ' /RJ'
  EndIf

---