Usar un objeto de datos ActiveX para enlazar a proveedores ADSI
Dado que ADSI también es un proveedor OLE DB, puede usar un objeto de datos ActiveX (ADO) para conectarse a proveedores ADSI. Al igual que con otros proveedores de ADO, para conectarse a un proveedor OLE DB, debe crear un nuevo objeto de conexión y, opcionalmente, especificar las credenciales. El nombre del proveedor OLE DB ADSI es ADsDSOObject.
Por ejemplo:
Dim con As New Connection
'VBScript use: con = CreateObject("ADODB.Connection")
con.Provider = "ADsDSOObject"
con.Open "YourDescriptionHere"
En el ejemplo anterior, está conectado en nombre del usuario actual. Para especificar credenciales diferentes, use las propiedades de conexión:
con.Provider = "ADsDSOObject"
con.Properties("User ID") = "jeffsmith"
con.Properties("Password") = "guesswhat?"
con.Properties("Encrypt Password") = True
con.Open "YourDescriptionHere"
ADSI OLE DB define las siguientes propiedades de conexión.
| Propiedad | Tipo de datos | Default |
|---|---|---|
| "Id. de usuario" | BSTR | NULL |
| "Password" | BSTR | NULL |
| "Cifrar contraseña" | BOOLEAN | FALSE |
| "Marca ADSI" | Long | 0 |
Con OLE DB ADO, no se puede enlazar a un objeto específico. Sin embargo, puede consultar un objeto específico y obtener un conjunto de resultados. Solo los proveedores ADSI que admiten IDirectorySearch se benefician de tener ADO como modelo de programación.
La propiedad ADSI Flag se usa para especificar la opción de autenticación de enlace. Esta propiedad puede ser una combinación de marcas de la enumeración ADS_AUTHENTICATION_ENUM .