COM Subroutine: Passes a programmatic identifier and returns a pointer to the IDispatch interface of a currently active object.
Module: USE IFCOM
Syntax
CALL COMGetActiveObjectByProgID (prog_id, idispatch, status)
prog_id
The programmatic identifier of type CHARACTER*(*).
idispatch
An output argument that returns the object's IDispatch interface pointer. Must be of type INTEGER(4).
status
The status of the operation. It can be any status returned by CLSIDFromProgID or GetActiveObject. Must be of type INTEGER(4).
See Also
CLSIDFromProgID and GetActiveObject in the Microsoft* Platform SDK
Example
See the example in COMInitialize.