IADsPropertyList::Item-Methode (iads.h)
Die IADsPropertyList::Item-Methode ruft das angegebene Eigenschaftselement aus der Liste ab.
Syntax
HRESULT Item(
[in] VARIANT varIndex,
[in, out] VARIANT *pVariant
);
Parameter
[in] varIndex
Der VARIANT-Wert , der den Index oder Namen der abzurufenden Eigenschaft enthält.
[in, out] pVariant
Adresse einer vom Aufrufer zugeordneten VARIANT-Variablen . Bei der Rückgabe enthält VARIANT den IDispatch-Zeiger auf das -Objekt, das die IADsPropertyEntry-Schnittstelle für das abgerufene Attribut implementiert.
Rückgabewert
Diese Methode unterstützt die HRESULT-Standardrückgabewerte, einschließlich S_OK. Weitere Informationen und andere Rückgabewerte finden Sie unter ADSI-Fehlercodes.
Hinweise
Sie müssen pVariant mithilfe von VariantClear löschen, wenn der von der Item-Methode zurückgegebene Wert nicht mehr erforderlich ist.
Beispiele
Im folgenden Codebeispiel wird gezeigt, wie sie alle Einträge mit der Item-Methode auflisten.
Dim propList As IADsPropertyList
Dim propEntry As IADsPropertyEntry
Dim count As Long
On Error GoTo Cleanup
Set propList = GetObject("LDAP://dc02/DC=Fabrikam,DC=com")
propList.GetInfo
count = propList.PropertyCount
Debug.Print "No of Property Found: " & count
'==== Getting the property list item with Name ==================
Set propEntry = propList.Item("uSNCreated")
Debug.Print propEntry.Name
Debug.Print propEntry.ADsType
' to examine property entries by name and type
For i = 0 To count - 1
'==== Getting the property list item with Number =============
Set propEntry = propList.Item(i)
Debug.Print propEntry.Name
Debug.Print propEntry.ADsType
Next
Cleanup:
If (Err.Number<>0) Then
MsgBox("An error has occurred. " & Err.Number)
End If
Set propList = Nothing
Set propEntry = Nothing
Im folgenden Codebeispiel wird gezeigt, wie die Owner-Eigenschaft eines Computers mithilfe der IADsPropertyList::Item-Methode abgerufen wird. Weitere Informationen zur GetPropertyCache-Funktion und ein Codebeispiel finden Sie unter IADsPropertyList.
////////////////////////////////////////
// function: PropertyItem
// input: PropertyList,
// name of the item
// output: Property entry
// uses: IADsPropertyList::Item
////////////////////////////////////////
IADsPropertyEntry *PropertyItem(
IADsPropertyList *pList,
LPWSTR item)
{
IADsPropertyEntry *pEntry;
VARIANT varEntry, varItem;
if(!pList || !item)
{
_tprintf(TEXT("Invalid parameter..."));
return NULL;
}
VariantInit(&varItem);
VariantInit(&varEntry);
// get a property entry
V_BSTR(&varItem)= SysAllocString(item);
V_VT(&varItem)=VT_BSTR;
HRESULT hr = pList->Item(varItem ,&varEntry);
hr = V_DISPATCH(&var)->QueryInterface(
IID_IADsPropertyEntry,
(void**)&pEntry);
VariantClear(&varItem);
VariantClear(&varEntry);
return pEntry;
}
///////////////////////////////////////
// examine a property entry
///////////////////////////////////////
IADsPropertyList *pList; pList=GetPropertyCache(L"WinNT://myComputer,computer");
IADsPropertyEntry *pEntry;
pEntry = PropertyItem(pList, L"Owner");
if(pEntry)
{
HRESULT hr;
BSTR bstr;
long ln;
hr = pEntry->get_Name(&bstr);
if(SUCCEEDED(hr))
{
SysFreeString(bstr);
}
printf(" Name : %S\n", bstr);
pEntry->get_ADsType(&ln);
if(SUCCEEDED(hr))
{
printf(" Type : %d\n", ln);
}
pEntry->get_ControlCode(&ln);
if(SUCCEEDED(hr))
{
printf(" Code %d\n",ln);
}
}
Anforderungen
| Unterstützte Mindestversion (Client) | Windows Vista |
| Unterstützte Mindestversion (Server) | Windows Server 2008 |
| Zielplattform | Windows |
| Kopfzeile | iads.h |
| DLL | Activeds.dll |