I have tried the code supplied by Ruud and it is not working for me. Here is the slightly modified code that I used:
code:
'Kix Version: @KIX' ?
$ADSPath='LDAP://WTSADMIN1/O=Michael French/OU=TEST CELL/CN=Recipients/CN=Administrator'
$x = getobject( $ADSPath)
if $x
dim $ar[0]
$ar[0] = "home-mdb"
$x.GetInfoEx( $ar, 0 ) @ERROR ? @SERROR ?
? $x.get("home-mdb")
else
'@ERROR - could not get object!' ?
endif

Here are the results that I get:
code:
Kix Version: 4.02
1
COM exception error "GetInfoEx" ((null) - (null)) [1/1]

code:
Kix Version: 4.10
-2147352567
COM exception error "GetInfoEx" ((null) - (null)) [-2147352567/80020009]

Any ideas? Did the code work for you Howard?

I am running Exchange 5.5 SP4 on Win2k SP2 (no post SP2 update yet as it breaks our cluster).