Accessing Exchange Server Property

Question

Hi:
I have a VB Script program that access Exchange server. I need to migrate it to Java. The LDAP connection is working. But I can not retrieve the msExchMessageJournalRecipient property. Could you help?
Thank in advance.
VB Script
Set oConnection = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")
wscript.echo "Journaling Flag Sample Start -- " & Date & " -- " & Time
oConnection.Provider = "ADsDSOObject"  'The ADSI OLE-DB provider
oConnection.Open "ADs Provider", _
     "USERNAME", "PASSWORD"
set objCommand =createObject("ADODB.Command")
objCommand.ActiveConnection = oConnection
objCommand.Properties("Page Size") = 900
strQuery = "<LDAP://SERVERNAME/" & _
     "CN=Administrative Groups,CN=COMPANY_NAME,CN=Microsoft Exchange,CN=Services,CN=Configuration,DC=WINROOT,DC=COMAPANY_NAME,DC=com>;" & _
     "(objectClass=msExchPrivateMDB);" & _
     "ADsPath,msExchMessageJournalRecipient" & _
     ";subtree"
objCommand.CommandText = strQuery
Set rs=objCommand.Execute
adp = rs("ADsPath").value
jrnl = rs("msExchMessageJournalRecipient").valueJava code
     public static void main(String[] args) {
          NamingEnumeration results = null;
          DirContext ctx = null;
          try {
               Hashtable env = new Hashtable();
               env
                         .put(Context.SECURITY_PRINCIPAL, "USERNAME");
               env.put(Context.SECURITY_CREDENTIALS, "PASSWORD");
               DirContext init = new InitialDirContext(env);
               ctx = (DirContext) init
                         .lookup("ldap://SERVER");
               SearchControls controls = new SearchControls();
               controls.setSearchScope(SearchControls.SUBTREE_SCOPE);
               results = ctx
                         .search(
                                   "CN=Administrative Groups,CN=Company,CN=Microsoft Exchange,CN=Services,CN=Configuration,DC=WINROOT,DC=Company,DC=com",
                                   "(objectClass=msExchPrivateMDB)", controls);
               if (results.hasMore()) {
                    SearchResult sres = (SearchResult) results.next();
                    Attributes attributes = sres.getAttributes();
                    NamingEnumeration attrEnum = attributes.getAll();
                    while (attrEnum.hasMore()) {
                         System.out.println("Attribute: "attrEnum.next().toString());
          } catch (Exception e) {
               e.printStackTrace();
          } finally {
               if (results != null) {
                    try {
                         results.close();
                    } catch (Exception e) {
                         e.printStackTrace();
               if (ctx != null) {
                    try {
                         ctx.close();
                    } catch (Exception e) {
                         e.printStackTrace();
     }

Answer 1

Did you prepare Windows 7 for cooperating with Exchange 2013?
On Exchange 2013 prereq site is procedurę:
Install the following software in the order shown:
Microsoft .NET Framework 4.5
The version of Windows Management Framework that corresponds to the version of Exchange 2013 you're installing.
Exchange 2013 CU3   Windows Management Framework 3.0
Exchange 2013 SP1 or later   Windows Management Framework 4.0
Knowledge Base article KB974405 (Windows Identity Foundation)
Regards, Konrad Sagala, MCT, MCSE+M, MCITP: Exchange 2007/2010, Lync 2010, Office365, Windows 2008, Virtualization