Verwenden eines ActiveX-Datenobjekts zum Binden an ADSI-Anbieter
Da ADSI auch ein OLE DB-Anbieter ist, können Sie ein ActiveX-Datenobjekt (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 unterschiedliche 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 |
Mithilfe von OLE DB ADO können Sie keine Bindung an ein bestimmtes Objekt herstellen. Sie können jedoch ein bestimmtes Objekt abfragen und ein Resultset zurückholen. Nur ADSI-Anbieter, die IDirectorySearch unterstützen, profitieren von ADO als Programmiermodell.
Die ADSI-Flag-Eigenschaft wird verwendet, um die Bindungsauthentifizierungsoption anzugeben. Diese Eigenschaft kann eine Kombination von Flags aus der ADS_AUTHENTICATION_ENUM-Enumeration sein.