one way to skin this cat :

Code:

break on

$user = "Mark"
$Group = "Developers"
$ingroup = 0

$objGroup = getobject("WinNT://" + @domain + "/" + $Group + ",group")
if not @error
for each $member in $objGroup.Members
if $member.Name = $user
$ingroup = 1
endif
next
endif

iif($ingroup,$user + " is member of " + $Group, $user + " is not member of " + $Group)

get $

exit 0

_________________________