ERROR : Error in expression: this type of array not supported in expressions.!

break on
;setconsole('hide')

$fh = FreeFileHandle()
$file = "list.txt"
$result=""

if not open ($fh, $file)
   $line = ReadLine($fh)
   while not @error
	$line=split($line,";")	

	if open(3, "result.log", 5)=0
	   $user = $line[0]
	   $oldGroup = $line[1]

	   if MemberOf($oldgroup,$user)=1
		$result="isMember"
	   else
		$result = "NotMember"
	   endif

	  $x = WriteLine(3, $user+";"+$oldGroup+";"+$result+@CRLF)
	else
	? "Error result.log"
   endif

   close(3)
loop

else
   "Error list.txt"+@CRLF
endif
  


;@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
;FONCTIONS (DO NOT MODIFY)	
;@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@


Function MemberOf($Groupe, OPTIONAL $User)

If ($User = "")
   $User = @USERID
EndIf

$LDAPGroupe = ""
$oLDAPGroupe = CreateObject("NameTranslate")
If Not(@ERROR)
    $oLDAPGroupe.Init(3, "")
    If Not(@ERROR)
        $oLDAPGroupe.Set(3,"@DOMAIN\"+$Groupe)
        If Not(@ERROR)
           $LDAPGroupe = $oLDAPGroupe.Get(1)
        EndIf
    EndIf
EndIf

$oGroupe = GetObject("LDAP://" + $LDAPGroupe)

If Not(@ERROR)
    For Each $Objet In $oGroupe.Members
	Select
	Case $Objet.Class = "group"
	   $Result = MemberOf($Objet.cn, $User)
	   If ($Result = 1)
		$MemberOf= 1
		Return
	   EndIf

    	Case $Objet.Class = "user"
	   If ($Objet.samAccountName == @USERID)
		$MemberOf= 1
		Return
	   EndIf
	EndSelect
    Next
EndIf

$MemberOf = 0
EndFunction 

Break on

$rc = Open (1, "c:\usernames.txt", 2)

$line = ReadLine(1)

While Not @ERROR And Trim($line) <> ""
	$line = Split($line, ";")
	$usergroups = UserGroups(@DOMAIN, $line[0])
	If UBound($usergroups) <> -1
		For Each $usergroup in $usergroups
			If $usergroup = $line[1] Or  $usergroup = $line[2]
				?$line[0] " is a meber of " $line[1] " or " $line[2]
			Else
				?$line[0] " is not a meber of " $line[1] " or " $line[2]
		Next
	Else
		? $line " does not have any groupmemberships. "
	EndIf
	Sleep 2
	$line = ReadLine(1)
Loop

$rc = Close (1)