| Platform SDK: Active Directory, ADSI, and Directory Services |
The IADsNameTranslate::GetEx method retrieves the names of the objects in the specified format. The names of the objects must have been set by IADsNameTranslate::SetEx.
HRESULT IADsNameTranslate::GetEx( long lnFormatType, VARIANT *pVarStr );
This method supports the standard HRESULT return values, including:
This method lets you retrieve the names of multiple objects. However, all the names are of a single format.
When referral chasing is on, this method will not attempt to chase and resolve the path of a specified object that is not residing on the connected server.
The following C/C++ code snippet illustrates how to translate a distinguished names that is compliant with RFC 1779 to the GUID format. The machine name of the directory server is "myServer".
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,
L"myServer");
if (FAILED(hr)) { exit 1;}
LPWSTR str[1] = { L"CN=jim,CN=Users,DC=myDomain,DC=Microsoft,DC=COM",
L"CN=rob,CN=Users,DC=myDomain,DC=Microsoft,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();
The following code snippet illustrates how to convert multiple names from the RFC 1779 type to the GUID type. The machine name of the directory server is "myServer" .
Dim nto As new NameTranslate Dim result As Variant Dim ns(1) As String nto.Init ADS_NAME_INITTTYPE_SERVER, "myServer" ns(0)="CN=rob,CN=users,DC=myDom,DC=myCom,DC=COM,O=Internet" ns(1)="CN=jim,CN=users,DC=myDom,DC=myCom,DC=COM,O=Internet" nto.SetEx ADS_NAME_TYPE_1779, ns nto.GetEx ADS_NAME_TYPE_GUID, result MsgBox "name(0): " & result(0) & " name(1): " & result(1)
The following VBScript/ASP code snippet translates two distinguished names that are compliant with RFC 1779 to the GUID format. The machine name of the directory server is "myServer".
<%@ Language=VBScript %>
<html>
<body>
<%
Dim nto
const ADS_NAME_INITTYPE_SERVER = 2
const ADS_NAME_TYPE_1779 = 1
const ADS_NAME_TYPE_NT4 = 3
server = "myServer"
user = "jsmith"
dom = "Microsoft"
passwd = "top secret"
Set nto = Server.CreateObject("NameTranslate")
nto.InitEx ADS_NAME_INITTYPE_SERVER, server, user, dom, passwd
ns(0)="CN=rob,CN=users,DC=myDom,DC=myCom,DC=COM,O=Internet"
ns(1)="CN=jim,CN=users,DC=myDom,DC=myCom,DC=COM,O=Internet"
nto.SetEx ADS_NAME_TYPE_1779, ns
result = nto.GetEx(ADS_NAME_TYPE_GUID)
Response.Write "<p>Names in the translated format: " & result(0) & ", " & result(1)
%>
</body>
</html>
Windows NT/2000: Requires Windows 2000 (or Windows NT 4.0 with DSClient).
Windows 95/98: Requires Windows 95 or later (with DSClient).
Header: Declared in Iads.h.
IADsNameTranslate, IADsNameTranslate::SetEx, ADS_NAME_TYPE_ENUM