i try following Code (where "Number5" is my Computername)

code:

---

  
Dim $Test
Dim $Computer
$AD=GetObject("WinNT://Number5,computer")
$AD.Filter=Array("Service")
for each $s in $AD
? $S.name
next

---

Normaly this code should only shows the NT-Services of my Computer, but this shows all ADSI information like Users,Groups and Services.

When i try to run this code in WSH i works fine.

I think there is a problem with the "$ad.Filter ".

Has anyone any ideas?

$AD.Filter = "Service",""

-Shawn

this hint works...can you explain me in short words, how this works?

The filter property needs to see an array, and in kixtart, one way to specify arrays is by saying this:

$array = 1,2,3,4,5

So, you say this:

$domain.filter = "service","user"

or to just specify one class, say this

$domain.filter = "computer",""

we just provide an extra null "" element in the array to get kixtart to pass the property as an array. ADSI sees the second, null elementbut just ignores it.

Did that answer your question ?

-Shawn