Try this mailbox() function. Right now you are assigning the return value of the mailbox function to that object. I just changed it to be a local var. I think this what you meant to do.

Code:

FUNCTION mailbox($getou)
   dim $objMailbox
   $objMailbox=GETOBJECT("LDAP://$getou")
   ? "Mailbox Information for $username:" 
   ? "User Information:"
   ? "Display Name: " $objMailbox.get("cn")
   ? "Given Name: " $objMailbox.get("givenname")
   ? "Last Name: " $objMailbox.get("sn")
   ? "Alias: " $objMailbox.get("uid")
   ? "Mailbox Information:"
   ? "Primary SMTP: " $objMailbox.get("mail")
   ? "X.400 Address: " $objMailbox.get("textencodedoraddress")
   ? "Home MTA: " $objMailbox.get("home-mta")
   ? "Home MDA: " $objMailbox.get("home-mda")

ENDFUNCTION
_________________________
Eric