If you look at the code update you will see that I am filtering for "Computer" only. The problem that I am having is that when I leave the For-Next loop the array is returning a value of -1

Code:
 For Each $objComputername In $objDomain 
    If $objComputername.Class = "Computer"
    $count=$count + 1 
    redim preserve $list[$count]    
    $list[$count] = $objComputername.Name 
    EndIf
    Next
_________________________
Today is the tomorrow you worried about yesterday.