ActiveX データ オブジェクトを使用して ADSI プロバイダーにバインドする

ADSI は OLE DB プロバイダーでもあるため、ActiveX データ オブジェクト (ADO) を使用して ADSI プロバイダーに接続できます。 他の ADO プロバイダーと同様に、OLE DB プロバイダーに接続するには、新しい接続オブジェクトを作成し、必要に応じて資格情報を指定する必要があります。 ADSI OLE DB プロバイダーの名前は ADsDSOObject です。

次に例を示します。

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

前の例では、現在のユーザーの代わりに接続されています。 別の資格情報を指定するには、接続プロパティを使用します。

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

ADSI OLE DB では、次の接続プロパティが定義されています。

プロパティ	データの種類	既定値
"User ID"	BSTR	NULL
"Password"	BSTR	NULL
"Encrypt Password"	BOOLEAN	FALSE
"ADSI Flag"	Long	0

 

OLE DB ADO を使用すると、特定のオブジェクトにバインドすることはできません。 ただし、特定のオブジェクトに対してクエリを実行し、結果セットを取得できます。 プログラミング モデルとして ADO を使用すると、IDirectorySearch をサポートする ADSI プロバイダーのみがメリットを得られます。

ADSI Flag プロパティは、バインディング認証オプションを指定するために使用されます。 このプロパティは、ADS_AUTHENTICATION_ENUM リストからフラグの組み合わせにすることができます。