IADsNameTranslate：：InitEx 方法 (iads.h)

發行項
03/05/2024

IADsNameTranslate：：InitEx 方法會使用指定的使用者認證系結至指定的目錄伺服器、網域或全域編錄，初始化名稱轉譯物件。若要在沒有明確使用者認證的情況下初始化物件，請使用 IADsNameTranslate：：Init。

IADsNameTranslate：：InitEx 方法會藉由設定物件將指向的伺服器或網域，並提供使用者認證來初始化物件。

語法

HRESULT InitEx(
  long lnSetType,
  BSTR bstrADsPath,
  BSTR bstrUserID,
  BSTR bstrDomain,
  BSTR bstrPassword
);

參數

lnSetType

要執行的初始化類型。可能的值為定義在 ADS_NAME_INITTYPE_ENUM中。

bstrADsPath

伺服器或網域的名稱，視 lnInitType 的值而定。發出 ADS_NAME_INITTYPE_GC 時，會忽略此參數。目前計算機網域的全域編錄伺服器將用來執行名稱轉譯作業。如果計算機不是網域的一部分，這個方法將會失敗，因為在此案例中找不到全域編錄。如需詳細資訊，請參閱 ADS_NAME_INITTYPE_ENUM。

bstrUserID

使用者名稱。

bstrDomain

用戶功能變數名稱。

bstrPassword

用戶密碼。

傳回值

傳回標準 HRESULT 或 RPC 錯誤碼，包括：

備註

成功初始化之後，請使用name translate物件來提交目錄對象的名稱轉譯要求。如需詳細資訊，請參閱 IADsNameTranslate：：Set、 IADsNameTranslate：：Get、 IADsNameTranslate：：SetEx 或 IADsNameTranslate：：GetEx。

範例

下列 C/C++ 程式代碼範例會使用 IADsNameTranslate：：InitEx 方法來初始化 IADsNameTranslate 物件，然後再以 s 格式轉譯使用者對象的辨別名稱。

IADsNameTranslate *pNto;
HRESULT hr;
hr = CoCreateInstance(CLSID_NameTranslate,
                      NULL,
                      CLSCTX_INPROC_SERVER,
                      IID_IADsNameTranslate,
                      (void**)&pNto);
if(FAILED(hr)) { exit 1;}
 
hr = pNto->InitEx(ADS_NAME_INITTYPE_SERVER,
                  CComBSTR("myServer"),
                  CComBSTR("jeffsmith"),
                  CComBSTR("Fabrikam"),
                  CComBSTR("top secret"));
if (FAILED(hr)) { exit 1;}
 
hr =pNto->Set(ADS_NAME_TYPE_1779,
             CComBSTR("cn=jeffsmith,cn=users,dc=Fabrikam,dc=com"));
if(FAILED(hr)) {exit 1;}
 
BSTR bstr;
hr = pNto->Get(ADS_NAME_TYPE_NT4, &bstr);
printf("Name in the translated format: %S\n", bstr);
 
SysFreeString(bstr);
pNto->Release();

下列 Visual Basic 程式代碼範例會使用 IADsNameTranslate：：InitEx 方法初始化 IADsNameTranslate 物件，以便以使用者名稱格式呈現的使用者物件辨別名稱。

Dim nto As New NameTranslate
dso="CN=jeffsmith, CN=users, DC=Fabrikam dc=COM"
server = "myServer"
domain = "Fabrikam"
user = "jeffsmith"
passwd = "myPass"
 
nto.InitEx  ADS_NAME_INITTYPE_SERVER, server,user,domain,passwd
nto.Set ADS_NAME_TYPE_1779, dso
trans = nto.Get(ADS_NAME_TYPE_NT4) 
MsgBox "Name in the translated format: " & trans

下列 VBScript/ASP 程式代碼範例會使用 IADsNameTranslate：：InitEx 方法來初始化 IADsNameTranslate 物件，以便以使用者名稱格式呈現的使用者物件辨別名稱。

<%@ 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
 
  server = "myServer"
  domain = "Fabrikam"
  user = "jeffsmith"
  passwd = "myPass"
 
  dn = "CN=jeffsmith,CN=Users,DC=Fabrikam,DC=COM" 
 
  Set nto = Server.CreateObject("NameTranslate")
  nto.InitEx ADS_NAME_INITTYPE_SERVER, server,user,domain,passwd
  nto.Set ADS_NAME_TYPE_1779, dn
  result = nto.Get(ADS_NAME_TYPE_NT4)
 
  Response.Write "<p>Name in the translated format: " & result
 
%>
</body>
</html>