Note: I was forced to use the words WEB_ADDRESS after LDAP: instead of the true Web Address. Please note that I am aware that there needs to be two diagonal lines (//) before the WEB_ADDRESS.
**********************************************************************************************************************************************************************************
I am hoping someone on here is both an LDAP and Excel VBA expert as I am at a lost. I had some code that worked when we had an LDAP address with an open Port. However, the company has locked things down and has closed that Port and created a new Port that requires authentication credentials. I have tried and tried to get this to work, but to no avail. Here is the code (with some things marked out for security reasons) that worked with the "open Port" (636):
I was told that I must now access the LDAP using something like this (non-Excel VBA terms): "ldaps:WEB_ADDRESS:8636" -b 'ou=people,o=xxx,c=us' -D 'cn=FULL NAME,ou=people,o=xxx,c=us' -w 'User PWD' "filter criteria"
So, I tried the exact same VBA code above but with the following change:
ADConn.Open "ADs Provider", "cn=MYNAME,ou=people,o=xxx,c=us", MYPASSWORD 'Provide username and password"
strQuery = "<LDAP:WEB_ADDRESS:8636/ou=people,o=xxx,c=us>;(a1=*abc*);cn"
However, this has NOT worked. Does anyone know what I am doing wrong?
Bookmarks