Intel® Fortran Compiler XE 13.1 User and Reference Guides
COM Subroutine: Passes a programmatic identifier and returns a pointer to the IDispatch interface of a currently active object.
USE IFCOM
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(INT_PTR_KIND()). |
status |
The status of the operation. It can be any status returned by CLSIDFromProgID or GetActiveObject. Must be of type INTEGER(4). |
See the example in COMInitialize.