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()
|