; homedirectory \\HQRTS-EASTERN\alxnvawz001\username
$server = "\\alxnvawz001"
$user=@userid

use g: "$server\test"
use t: "$server\public"
use f: "$server\images"

; ============== Mappings for Groupmembers ===========================

$ingroup="support"
$newdrive="H"
$share="users"
if ingroup($ingroup)
; connect, also if there was another drivemapping (overwrite)
use $newdrive: "$server\$share"
else
; delete possible mapping for non-members of group
; (if wanted)
if exist ("$newdrive:\null")
use $newdrive: /delete
endif
endif

$ingroup="ccmail"
$newdrive="S"
$share="admin"
if ingroup($ingroup)
; connect, also if there was another drivemapping (overwrite)
use $newdrive: "$server\$share"
else
; delete possible mapping for non-members of group
; (if wanted)
use $newdrive: /delete
if exist ("$newdrive:\nul")
use $newdrive: /d
endif
endif

use list

;*******************************************
; Administrators
;*******************************************

$r = InGroup("Administrators")
If $r > 0
? "-> InGroup Administrators " ?

if exist ( "X:\" )
use X: /del
endif

use x: \\SERVER1\NT /persistent:no

EndIf

;*******************************************
; Managers
;*******************************************

$r = InGroup("Managers")
If $r > 0
? "-> Managers "

if exist ( "i:\" )
use i: /del
endif

if exist ( "J:\" )
use J: /del
endif

if exist ( "S:\" )
use S: /del
endif

use I: \\SERVER2\CXP /persistent:no
use J: \\SERVER2\EFF /persistent:no
use S: \\SERVER2\Managers /persistent:no

EndIf