COMENUMBEGIN

Top  Previous  Next

Syntax

COMREF = ComEnumBegin(IDispatch obj, STRING member, ...)

Description

Enumerates a COM collection.

Parameters

obj - The Object returned by the CREATECOMOBJECT command.
member - The name of the collection to enumerate.
... - Optional parameter list.

Return value

An enumerator interface object.

Remarks

The return value is an IDispatch object that is passed to the ComEnumNext command.

Example usage

IDispatch pEnum, pChild
pEnum = ComEnumBegin(xmlDoc, ".documentElement.childNodes")
do
    pChild = ComEnumNext(pEnum)
    if pChild <> NULL
        GetComProperty(pChild, "%s", &_pTemp, ".childNodes.item(%d).text",0)
        #_pData.author = #<string>_pTemp:FreeComString(_pTemp)
        GetComProperty(pChild, "%s", &_pTemp, ".childNodes.item(%d).text",1)
        #_pData.title = #<string>_pTemp:FreeComString(_pTemp)
        GetComProperty(pChild, "%s", &_pTemp, ".childNodes.item(%d).text",2)
        #_pData.publisher = #<string>_pTemp:FreeComString(_pTemp)
        GetComProperty(pChild, "%s", &_pTemp, ".childNodes.item(%d).text",3)
        #_pData.date = #<string>_pTemp:FreeComString(_pTemp)
        pChild->Release()
    endif
until pChild = NULL
pEnum->Release()