Example

IF INGROUP("Domain Users")

    DISPLAY "z:\users.txt"

ENDIF

 

IF INGROUP("Developers", "Testers") = 1

    ? "Member of Developers OR Testers group"

ENDIF

 

IF INGROUP("Developers", "Testers", 1) = 1

    ? "Member of Developers AND Testers group"

ENDIF

 

$Array = "Developers", "Testers"

IF INGROUP($Array, 1) = 1

    ? "Member of Developers AND Testers group"

ENDIF

 

IF INGROUP("\\" + @WKSTA + "\Developers") = 1

    ? "Member of Developers on local system"

ENDIF

INGROUP ("group name" [<,> "group name 2"], Mode)

 

Parameter

Group name1, group name 2, group name …

Identifies the group(s) in which to check the user's membership. 
Multiple group names may be passed as arguments. Alternatively, 
you may specify a single, one-dimensional, array of which the element(s) are the names of one or more groups to test.

Mode

Optional integer parameter indicating whether or not Ingroup checks for 
groupmembership of one or all groups in the list (default = 0). 
Possible values:

 

0
	

Ingroup checks for membership of ONE of the groups in the list (default).

1
	

Ingroup checks for membership of ALL of the groups in the list.

 

Remarks

INGROUP can be used to check for group membership of groups that exist on
the domain or server where the user is logged on, or to check for group
membership of groups on a specific domain or server.
 
When checking for a local group, INGROUP identifies that the user is indirectly a member of the group by virtue of being a member of a global
group which, in turn, is a member of the local group.

$Array = "Developers", "Testers"

IF INGROUP($Array, 1) = 1

    ? "Member of Developers AND Testers group"

ENDIF

$array = "group1","group2","group3"
For each $group in $array
if ingrop($group) = 1
? 'member of group ' + $group
endif
Next

; map the T: drive
If InGroup('group1','group2',1)
  ; is member of both groups
  Use T: \\server\share1
Else
  If InGroup('group1','group2')
    ; is member of at least 1 group
    Use T: \\server\share2
  EndIf
EndIf

If INGROUP("Group_Dir1","Group_Dir3",1) 
 use X: "\\server\root"
Else
 Select 
  case INGROUP("Group_Dir1") 
   use x: "\\server\dir1"
  case INGROUP("Group_Dir2") 
   use x: "\\server\dir2"
  case 1
   ;something default..
 EndSelect
EndIf

$OK = 0
; User should be a member of at least one group in the following list
; Define array of group names and share subfolders
$Groups = 'group1','group2','group3'
$Shares = 'dir1', 'dir2', 'dir3'
For Each Group in $Groups
  $OK = $OK + InGroup($Group)
Next

; map a drive if $OK is true
If $OK
  ; but map to the root if $OK is >1 (member of multiple groups
  If $OK > 1
    Use T: '\\server\root'
  Else
    For $I = 0 to UBound($Groups)
      If Ingroup($Groups[$I])
        Use T: '\\server\root\' + $Shares[$I]
      EndIf
    Next
  EndIf
EndIf