Verwenden eines ActiveX Datenobjekts zum Binden an ADSI-Anbieter

Da ADSI auch ein OLE DB-Anbieter ist, können Sie ein ActiveX Data Object (ADO) verwenden, um eine Verbindung mit ADSI-Anbietern herzustellen. Wie bei anderen ADO-Anbietern müssen Sie zum Herstellen einer Verbindung mit einem OLE DB-Anbieter ein neues Verbindungsobjekt erstellen und optional die Anmeldeinformationen angeben. Der Name des ADSI-OLE DB-Anbieters lautet ADsDSOObject.

Beispiel:

Dim con As New Connection 
'VBScript use: con = CreateObject("ADODB.Connection")
con.Provider = "ADsDSOObject"
con.Open "YourDescriptionHere"

Im vorherigen Beispiel sind Sie im Namen des aktuellen Benutzers verbunden. Verwenden Sie verbindungseigenschaften, um verschiedene Anmeldeinformationen anzugeben:

con.Provider = "ADsDSOObject"
con.Properties("User ID") = "jeffsmith"
con.Properties("Password") = "guesswhat?"
con.Properties("Encrypt Password") = True
con.Open "YourDescriptionHere"

ADSI OLE DB definiert die folgenden Verbindungseigenschaften.

Eigenschaft Datentyp Standard
"Benutzer-ID" Bstr NULL
Password Bstr NULL
"Kennwort verschlüsseln" Boolean FALSE
"ADSI-Flag" Long 0

Mit OLE DB ADO können Sie keine Bindung an ein bestimmtes Objekt herstellen. Sie können jedoch ein bestimmtes Objekt abfragen und ein Resultset abrufen. Nur ADSI-Anbieter, die IDirectorySearch unterstützen, profitieren von ADO als Programmiermodell.

Die ADSI-Flag-Eigenschaft wird verwendet, um die Bindungsauthentifizierungsoption anzugeben. Bei dieser Eigenschaft kann es sich um eine Kombination von Flags aus der ADS _ _ AUTHENTICATION-ENUM-Enumeration handeln.