次の方法で共有


IADsNameTranslate::SetEx メソッド (iads.h)

IADsNameTranslate::SetEx メソッドは、名前変換用のオブジェクトの配列を確立します。 指定したオブジェクトは、接続されているディレクトリ サーバーに存在する必要があります。 1 つのディレクトリ オブジェクトの名前と形式を設定するには、 IADsNameTranslate::Set メソッドを使用します。

構文

HRESULT SetEx(
  long    lnFormatType,
  VARIANT pvar
);

パラメーター

lnFormatType

入力名の書式の種類。 詳細については、「 ADS_NAME_TYPE_ENUM」を参照してください。

pvar

オブジェクト名を保持する文字列のバリアント配列。

戻り値

このメソッドは、次を含む標準 の HRESULT 戻り値をサポートします。

注釈

紹介追跡オプションが有効になっている場合でも、 IADsNameTranslate::SetEx メソッドを使用して、他のサーバーに存在するオブジェクトの名前変換を設定することはできません。 紹介の追跡の詳細については、「 IADsNameTranslate プロパティ メソッド」を参照してください。

IADsNameTranslate::SetEx を使用して、複数のオブジェクトの名前を設定できます。 ただし、すべての名前は同じ形式である必要があります。

次の C/C++ コード例では 、IADsNameTranslate::SetEx メソッドを使用して、名前が RFC 1779 形式から Windows ユーザー名形式に変換されるオブジェクトの配列を設定します。

IADsNameTranslate *pNto;
HRESULT hr;
hr = CoCreateInstance(CLSID_NameTranslate,
                      NULL,
                      CLSCTX_INPROC_SERVER,
                      IID_IADsNameTranslate,
                      (void**)&pNto);
if(FAILED(hr)) { exit 1;}
 
hr = pNto->Init(ADS_NAME_INITTYPE_SERVER,
                  CComBSTR("myServer"));
if (FAILED(hr)) { exit 1;}
 
LPWSTR str[1] = { L"CN=jim,CN=Users,DC=myDomain,DC=Fabrikam,DC=COM",
                  L"CN=rob,CN=Users,DC=myDomain,DC=Fabrikam,DC=COM"};
DWORD dwNum = sizeof(str)/sizeof(LPWSTR);
 
VARIANT varStr;
VariantInit(&varStr);
 
hr = ADsBuildVarArrayStr(str,dwNum,&varStr);
 
hr =pNto->SetEx(ADS_NAME_TYPE_1779, varStr);
if(FAILED(hr)) {exit 1;}
VariantClear(&varStr);
 
hr = pNto->GetEx(ADS_NAME_TYPE_GUID, &varStr);
if(FAILED(hr)) {exit 1;}
 
LONG lstart, lend;
SAFEARRAY *sa = V_ARRAY(&varStr);
VARIANT varItem;
VariantInit(&varItem);
printf("Names in the translated format:\n");
for (long idx = lstart; idx <= lend; idx++) 
{
    hr = SafeArrayGetElement(sa, &idx, &varItem);
    printf("   %S\n", V_BSTR(&varItem));
    VariantClear(&varItem);
}
VariantClear(&varStr);
pNto->Release();

次の Visual Basic コード例では 、IADsNameTranslate::SetEx メソッドを使用して、名前を RFC 1779 形式から s ユーザー名形式に変換するオブジェクトの配列を設定します。

Dim nto As New NameTranslate
dso(0)="CN=jeffSmith, CN=users, DC=Fabrikam dc=COM"
dso(1)="CN=brendaDiaz, CN=users, DC=Fabrikam dc=COM"
nto.Init  ADS_NAME_INITTYPE_SERVER, "myServer"
nto.SetEx ADS_NAME_TYPE_1779, dso
trans = nto.GetEx(ADS_NAME_TYPE_NT4)   
Msgbox "Translations: " & trans(0) & "," & trans(1)

次の VBScript/ASP コード例では 、IADsNameTranslate::SetEx メソッドを使用して、名前を RFC 1779 形式から s ユーザー名形式に変換するオブジェクトの配列を設定します。

<%@ Language=VBScript %>
<html>
<body>
<%
  Dim nto
  const ADS_NAME_INITTYPE_SERVER = 2  ' VBScript cannot read 
  const ADS_NAME_TYPE_1779 = 1        ' enumeration definition
  const ADS_NAME_TYPE_NT4 = 3
 
  dn(0) = "CN=jeffSmith,CN=Users,DC=Fabrikam,DC=COM" 
  dn(1) = "CN=brendaDiaz,CN=Users,DC=Fabrikam,DC=COM" 
 
  Set nto = Server.CreateObject("NameTranslate")
  nto.Init ADS_NAME_INITTYPE_SERVER, "myServer"
  nto.SetEx ADS_NAME_TYPE_1779, dn
  result = nto.GetEx(ADS_NAME_TYPE_NT4)
 
  Response.Write "<p>Name in the translated format: " & result(0) & _
       ", & result(1)
 
%>
</body>
</html>

要件

要件
サポートされている最小のクライアント Windows Vista
サポートされている最小のサーバー Windows Server 2008
対象プラットフォーム Windows
ヘッダー iads.h
[DLL] Activeds.dll

こちらもご覧ください

ADS_NAME_TYPE_ENUM

IADsNameTranslate

IADsNameTranslate プロパティ メソッド

IADsNameTranslate::Set