DIM $container
 DIM $containername
 DIM $computer
 $containername = "Domain"
 $container = GetObject("WinNT://" + $containername)
 $container.filter = "Computer", ""
 $logfile='H:\compstatus.csv'
 FOR EACH $computer IN $container
    IF LEFT($computer.name,4)='ABC0'
       IF RIGHT($computer.name,4)>=1300
          IF EXIST('\\'+$computer.name+'\Admin$$') ;Check to insure the machine is up
             $logdata=$computer.name+','+WMIQuery('SerialNumber','Win32_BIOS',$computer.name)[0]+@crlf
             LOGGER($logfile,$logdata)
          ELSE
             $logdata=$computer.name+','+'NotAvailable'+@crlf
             LOGGER($logfile,$logdata)
          ENDIF
       ENDIF
    ENDIF
 NEXT
 ?'Process is complete.. Press a key to continue'
 GET $k