code:

---

break ON

; Win32Admin.DLL documentation and example KiXtart code

; All methods set return data or true on success or nothing on failure.
; Also @error is set when an error occurs but does not seem to be reset on success.
; Therefore, checking the function result seems to be the best method of
; determining when an error occurs.
; @Error may not reflect the actual error of methods. Be sure to
; check @serror as it will reflect the correct text of the COM error.

$Win32Admin = createobject("Win32Admin")
if vartypename($Win32Admin) <> "Object"
  ? "@serror"
endif

$Version = $Win32Admin.Version
if @error <> 0
  ? "@serror"
endif
? "DLL Version = " + $Version


; Method EnumTrustedDomains(optional $Server)
;   Returns an interleaved array: DomainName, DomainSid.
;   If a server name is specified, the enumeration is based
;   on the domain where the server resides. If no server is supplied,
;   then the computer where the script is executing will be used by
;   default.
$Domains = $Win32Admin.EnumTrustedDomains(@wksta)
if @error <> 0
  ? "@serror"
endif
for $i=0 to ubound($Domains) Step 2
   ? "Domain = " + $Domains[$i] + "    Sid = " + $Domains[$i+1]
next
  

---