????? ??????? ADO ??? ?????? Access ??? ???? LDAP ADSI

?????? ????????? ?????? ?????????
???? ???????: 187529 - ??? ???????? ???? ????? ????? ??? ???????.
????? ???? | ?? ????

?? ??? ??????

??????

???? ?????? ???? ???? Active Directory (ADSI) ?????? ?????? ?????? ?????? ???????? (LDAP) ?????? ?????? OLE DB ???? ???? ?? ???????? ?????? ?????? ActiveX (ADO) ?????? ??? ???????? ?? ????? ?????? ?? LDAP. ??? ????? ???? ????? ADO ?????? ??????? ???? ?????? ?? ??? "ADsDSOObject". ????? ????? ?? ????? ??? ?? ??? "" ? ?????? ????? (??????? ??????) ????? ??? ???? ????? ADO.

????? ?????? ????? ??????? ????? CommandText (???? ?????) ??????? LDAP ????? ?? ????? ????? ?????? ?????? ?????? ?? ??????? ??????:
   <LDAP://server/adsidn>;ldapfilter;attributescsv;scope
				
???:
  • ?? ???? ????? (?? ????? IP) ?? ?????? ???? ?????? ??????.
  • adsidn ?? ????? ?????? (DN) ???? ??? ????? ????? ADsPath ?? ??????? ?? ????????? ????? ?? "/" ????? ????? "?" ??? ????? ????? ??? ??????. ????? ????? ??????? ??? ????? ??? attributed ??? X.500 ??? ????? ????? ?????? ?????? ?????? ? ???? ????? ??? ??? ??????.
  • ???? ??????? 1dap ?? ????? ???? ??????? LDAP (???? rfc2254).
  • attributescsv ????? ?????? ?????? ?? ????? ?????? ???? ??? ??????? ??? ?? ?? ?????? ???????.
  • ??????: ????? onelevel ?? ???? ?????.
??????: ???? rfc2253 ???? ??? LDAP ???? ????? ???? ???? ?????? ADSI LDAP.

?????? ADsPath ? ????? ? cn ???? ???? ???????? ?? ???? ???????? ????????? ?? ???? Exchange ????? ??????? CommandText ??????? (?? ????? URL):
      LDAP:<//server/o=organization/ou=site/cn=recipients>;
         (objectClass=*);ADsPath,objectClass,cn;subtree"
				
?? (?????? ??? attributed):
     <LDAP://server/cn=recipients,ou=site,o=organization>, _
         (objectClass=*);ADsPath,objectClass;subtree
				

??????? ????

???? Visual Basic ????? ????????? ???????? ?????? ??? ?????????:

??? ?????

  Dim conn As ADODB.Connection
      Dim rs As ADODB.Recordset

      Set conn = New ADODB.Connection
      conn.Provider = "ADSDSOObject"
      conn.Open "ADs Provider"

      Set rs = conn.Execute( _ 
            "<LDAP://server/o=organization/ou=site/cn=recipients>;" _
            & "(objectClass=*);ADsPath,objectClass,cn;subtree")

      While Not rs.EOF
         Debug.Print rs.Fields(0).Value, rs.Fields(1).Value, _
               rs.Fields(2).Value
         rs.MoveNext
      Wend

      conn.Close


				

?????

?????? ??? ????? ???? ?? ??????? RFCs LDAP ??? ?? ??? 2253 RFC 2254 RFC ?????? ?????? ??????? ??????? ?? "????? ??????? ?? Microsoft:
221606RFCs LDAP ???????
?????? ??? ??????? ??????? ???? ??? ??? ??????? ????? ?????? ?? "????? ??????? ?? Microsoft:
275917PRB: ADSI 2.5 ? MDAC 2.6 ????? ?????

???????

???? ???????: 187529 - ????? ??? ??????: 25/????? ??????/1425 - ??????: 1.2
????? ???
  • Microsoft Visual Basic 5.0 Professional Edition
  • Microsoft Visual Basic 6.0 Professional Edition
  • Microsoft Visual Basic 5.0 Enterprise Edition
  • Microsoft Visual Basic Enterprise Edition for Windows 6.0
  • Microsoft Active Directory Service Interfaces 2.0
  • Microsoft ActiveX Data Objects 1.5
  • Microsoft ActiveX Data Objects 2.0
  • Microsoft ActiveX Data Objects 2.1 Service Pack 2
  • Microsoft ActiveX Data Objects 2.5
????? ??????: 
kbmt kbhowto kbmdacnosweep kbtophit KB187529 KbMtar
????? ????
???: ??? ????? ??? ?????? ???????? ?????? ????? ???? ????? ?????????? ????? ?? ????????? ?????? ????. ???? ???? ?????????? ???? ?? ???????? ???????? ?????? ????????? ????? ????????? ???????? ????? ???????? ?????? ?? ?????? ??? ?? ???????? ???????? ?? ????? ??????? ?????? ??? ??????? ?????? ??. ?????? ?? ???? ??? ??????? ???????? ????? ?? ???? ????? ?????? ??? ????? ??? ????? ??????? ?? ????? ?? ?????? ??? ??? ??????? ??????? ?? ????? ????? ????? ????? ?????. ?? ????? ???? ?????????? ??????? ??? ????? ?? ??????? ?? ????? ?????? ?? ??? ????? ?? ????? ??????? ?? ???????? ?? ??? ???????. ???? ???? ?????????? ???????? ??? ????? ?????? ??????? ??????
???? ??? ????? ??????? ?????? ??????????187529

????? ???????

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com