Loop

Hello.
 
I got a ASP page where I got this code.
 
Set d = CreateObject("Scripting.Dictionary")
    d.removeall
    d.CompareMode = 0
 
   For Each x In tmpArray
        If d.Exists(x) Then
            Response.Write "<br> " & x & " Exists"
           
            
        else
        Response.Write "<br>Adding" & x
            d.Add x, x
          
        end if       
       
    Next
 
The ForEach checks to se if the emailadress allready exists in the array, if it does do nothing and if it doesnt, add it to the dictonary.
 
tmpArray contains email adresses that are coma seperated, all that works fine. but when I run this the 2 first adresses allways get added to the dictonary.
 
anyone got a clue what Im doing wrong?

debug with response.write statements to see what values are being compared and if they match