Example of script

; GLOBAL GROUP MAPS

$INDEX = 0
DO
$GROUP = ENUMGROUP ($INDEX)
$INDEX = $INDEX + 1
GOSUB DO_MAPS
UNTIL LEN ($GROUP) = 0

;__________________________________________________________________________________________

; LOCAL GROUP MAPS

$INDEX = 0
DO
$GROUP = ENUMLOCALGROUP ($INDEX)
$INDEX = $INDEX + 1
GOSUB DO_MAPS
UNTIL LEN ($GROUP) = 0

; MAP GROUP DRIVE

$DRIVE = READPROFILESTRING (@LDRIVE + "\$INI.INI" , "Group Shares" , "Drive") + ":"
$GROUPSHARE = ""
$R=0
$X="Group"
$COMMENT = ""
$Z = INSTR (@COMMENT,"(")
IF $Z > 0
$COMMENT = LTRIM (SUBSTR (@COMMENT,$Z+1,LEN(@COMMENT)-$Z))
$Z = INSTR ($COMMENT,")")
IF $Z > 0
$COMMENT = RTRIM (SUBSTR ($COMMENT,1,$Z-1))
ELSE
$COMMENT = ""
ENDIF
ENDIF
$Z=1
DO
$SERVER = READPROFILESTRING (@LDRIVE + "\$INI.INI" , "Group Shares" , "Server$Z")
IF LEN ($SERVER) > 0
SELECT
CASE EXIST ("$SERVER\@PRIMARYGROUP")
$SHARE = "$SERVER\@PRIMARYGROUP"
CASE EXIST ("$SERVER\@COMMENT")
$SHARE = "$SERVER\@COMMENT"
CASE EXIST ("$SERVER\$COMMENT")
$SHARE = "$SERVER\$COMMENT"
CASE 1
$SHARE = "NO GROUP SHARE FOUND!"
ENDSELECT
GOSUB MAP_DRIVE
IF @ERROR=85
GOTO TAG1
ENDIF
IF $R=1
$GROUPSHARE = $SHARE
GOTO TAG1
ENDIF
ENDIF
$Z = $Z + 1
UNTIL $Z > 4
:TAG1
GOSUB RESULTS

Also noticed 2 windows opening for KIX now, changed to use kixtartc.exe and solved the 2 windows difference but not the group issue

?????

[This message has been edited by SpriteMike (edited 02 April 2001).]