Code:

Function LocalAdmins()
DIM $winntprovider, $objGroup, $obj

$winntprovider = 'WinNT://'+@DOMAIN+'/'+@WKSTA+'/Administrators,group'
$objGroup = GetObject($winntprovider)

If @ERROR = 0
? "obtained binding: "+$winntprovider
For Each $obj In $objGroup.members
? $obj.Name
Next
Else
? "failed to get binding"
EndIf
$objGroup = 0
EndFunction