I'm not having any luck with this piece of code. Please help me fix it or point me in the proper direction? TIA!

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
? $obj.Name
Next
Else
? "failed to get binding"
EndIf
$objGroup = 0
EndFunction

_________________________
silence is golden, but duct tape is silver