This works for me:

$x = getobject( $ADSPath)
if $x
$ar = "homemdb", "sn"
$x.GetInfoEx( $ar, 0 )
? $x.get("homemdb")
endif

As does this:

$x = getobject( $ADSPath)
if $x
dim $ar[0]
$ar[0] = "homemdb"
$x.GetInfoEx( $ar, 0 )
? $x.get("homemdb")
endif

Note that the attribute is called 'homeMDB', without the '-'.

One side-effect of this issue is that I have found an issue with the handling of COM errors, and I've improved this in the final (it will produce the expected 'property not in cache' error if you reference a non-existant attribute).

Let me know if this helps.

Ruud