here's a function i use to add our admins to the local machine during our baseline checks.
Code:
function AddGroups($groupsToAdd)
dim $localAdmins, $group, $addName
$AddGroups = 0
$localAdmins = getobject("WinNT://" + @wksta + "/Administrators")
for each $group in $groupsToAdd
$addName = "WinNT://" + join(split($group, "\"), "/")
if not $localAdmins.IsMember($addName)
$AddGroups = 1
$localAdmins.Add($addName)
endif
next
endfunction
$groupsToAdd is an array of groups in the format domain\group1. But you would probably be interested in the line
Code:
$localAdmins.IsMember($addName)
_________________________
Eric
