Click here to Skip to main content
Click here to Skip to main content
Add your own
alternative version

Beginner's Tutorial: Calling Visual Basic ActiveX DLLs from Visual C++

, 18 Nov 1999
vb_from_vc.zip
TestVBCOM.dsp
vbTestCOM.exp
vbTestCOM.lib
vbTestCOM.tlb
vbTestCOM.vbp
vbTestCOM.vbw
clsVBTestClass.cls
/* this ALWAYS GENERATED file contains the definitions for the interfaces */


/* File created by MIDL compiler version 5.01.0164 */
/* at Wed Nov 03 20:10:20 1999
 */
/* Compiler settings for vbTestCOM.idl:
    Os (OptLev=s), W1, Zp8, env=Win32, ms_ext, c_ext
    error checks: allocation ref bounds_check enum stub_data 
*/
//@@MIDL_FILE_HEADING(  )


/* verify that the <rpcndr.h> version is high enough to compile this file*/
#ifndef __REQUIRED_RPCNDR_H_VERSION__
#define __REQUIRED_RPCNDR_H_VERSION__ 440
#endif

#include "rpc.h"
#include "rpcndr.h"

#ifndef __vbTestCOM_h__
#define __vbTestCOM_h__

#ifdef __cplusplus
extern "C"{
#endif 

/* Forward Declarations */ 

#ifndef ___clsVBTestClass_FWD_DEFINED__
#define ___clsVBTestClass_FWD_DEFINED__
typedef interface _clsVBTestClass _clsVBTestClass;
#endif 	/* ___clsVBTestClass_FWD_DEFINED__ */


#ifndef __clsVBTestClass_FWD_DEFINED__
#define __clsVBTestClass_FWD_DEFINED__

#ifdef __cplusplus
typedef class clsVBTestClass clsVBTestClass;
#else
typedef struct clsVBTestClass clsVBTestClass;
#endif /* __cplusplus */

#endif 	/* __clsVBTestClass_FWD_DEFINED__ */


void __RPC_FAR * __RPC_USER MIDL_user_allocate(size_t);
void __RPC_USER MIDL_user_free( void __RPC_FAR * ); 


#ifndef __vbTestCOM_LIBRARY_DEFINED__
#define __vbTestCOM_LIBRARY_DEFINED__

/* library vbTestCOM */
/* [version][uuid] */ 



EXTERN_C const IID LIBID_vbTestCOM;

#ifndef ___clsVBTestClass_INTERFACE_DEFINED__
#define ___clsVBTestClass_INTERFACE_DEFINED__

/* interface _clsVBTestClass */
/* [object][oleautomation][nonextensible][dual][hidden][version][uuid] */ 


EXTERN_C const IID IID__clsVBTestClass;

#if defined(__cplusplus) && !defined(CINTERFACE)
    
    MIDL_INTERFACE("C8771967-F992-447A-B4A0-083894E6326E")
    _clsVBTestClass : public IDispatch
    {
    public:
        virtual /* [id] */ HRESULT STDMETHODCALLTYPE CountStringLength( 
            /* [in] */ BSTR strValue,
            /* [retval][out] */ long __RPC_FAR *__MIDL_0014) = 0;
        
    };
    
#else 	/* C style interface */

    typedef struct _clsVBTestClassVtbl
    {
        BEGIN_INTERFACE
        
        HRESULT ( STDMETHODCALLTYPE __RPC_FAR *QueryInterface )( 
            _clsVBTestClass __RPC_FAR * This,
            /* [in] */ REFIID riid,
            /* [iid_is][out] */ void __RPC_FAR *__RPC_FAR *ppvObject);
        
        ULONG ( STDMETHODCALLTYPE __RPC_FAR *AddRef )( 
            _clsVBTestClass __RPC_FAR * This);
        
        ULONG ( STDMETHODCALLTYPE __RPC_FAR *Release )( 
            _clsVBTestClass __RPC_FAR * This);
        
        HRESULT ( STDMETHODCALLTYPE __RPC_FAR *GetTypeInfoCount )( 
            _clsVBTestClass __RPC_FAR * This,
            /* [out] */ UINT __RPC_FAR *pctinfo);
        
        HRESULT ( STDMETHODCALLTYPE __RPC_FAR *GetTypeInfo )( 
            _clsVBTestClass __RPC_FAR * This,
            /* [in] */ UINT iTInfo,
            /* [in] */ LCID lcid,
            /* [out] */ ITypeInfo __RPC_FAR *__RPC_FAR *ppTInfo);
        
        HRESULT ( STDMETHODCALLTYPE __RPC_FAR *GetIDsOfNames )( 
            _clsVBTestClass __RPC_FAR * This,
            /* [in] */ REFIID riid,
            /* [size_is][in] */ LPOLESTR __RPC_FAR *rgszNames,
            /* [in] */ UINT cNames,
            /* [in] */ LCID lcid,
            /* [size_is][out] */ DISPID __RPC_FAR *rgDispId);
        
        /* [local] */ HRESULT ( STDMETHODCALLTYPE __RPC_FAR *Invoke )( 
            _clsVBTestClass __RPC_FAR * This,
            /* [in] */ DISPID dispIdMember,
            /* [in] */ REFIID riid,
            /* [in] */ LCID lcid,
            /* [in] */ WORD wFlags,
            /* [out][in] */ DISPPARAMS __RPC_FAR *pDispParams,
            /* [out] */ VARIANT __RPC_FAR *pVarResult,
            /* [out] */ EXCEPINFO __RPC_FAR *pExcepInfo,
            /* [out] */ UINT __RPC_FAR *puArgErr);
        
        /* [id] */ HRESULT ( STDMETHODCALLTYPE __RPC_FAR *CountStringLength )( 
            _clsVBTestClass __RPC_FAR * This,
            /* [in] */ BSTR strValue,
            /* [retval][out] */ long __RPC_FAR *__MIDL_0014);
        
        END_INTERFACE
    } _clsVBTestClassVtbl;

    interface _clsVBTestClass
    {
        CONST_VTBL struct _clsVBTestClassVtbl __RPC_FAR *lpVtbl;
    };

    

#ifdef COBJMACROS


#define _clsVBTestClass_QueryInterface(This,riid,ppvObject)	\
    (This)->lpVtbl -> QueryInterface(This,riid,ppvObject)

#define _clsVBTestClass_AddRef(This)	\
    (This)->lpVtbl -> AddRef(This)

#define _clsVBTestClass_Release(This)	\
    (This)->lpVtbl -> Release(This)


#define _clsVBTestClass_GetTypeInfoCount(This,pctinfo)	\
    (This)->lpVtbl -> GetTypeInfoCount(This,pctinfo)

#define _clsVBTestClass_GetTypeInfo(This,iTInfo,lcid,ppTInfo)	\
    (This)->lpVtbl -> GetTypeInfo(This,iTInfo,lcid,ppTInfo)

#define _clsVBTestClass_GetIDsOfNames(This,riid,rgszNames,cNames,lcid,rgDispId)	\
    (This)->lpVtbl -> GetIDsOfNames(This,riid,rgszNames,cNames,lcid,rgDispId)

#define _clsVBTestClass_Invoke(This,dispIdMember,riid,lcid,wFlags,pDispParams,pVarResult,pExcepInfo,puArgErr)	\
    (This)->lpVtbl -> Invoke(This,dispIdMember,riid,lcid,wFlags,pDispParams,pVarResult,pExcepInfo,puArgErr)


#define _clsVBTestClass_CountStringLength(This,strValue,__MIDL_0014)	\
    (This)->lpVtbl -> CountStringLength(This,strValue,__MIDL_0014)

#endif /* COBJMACROS */


#endif 	/* C style interface */



/* [id] */ HRESULT STDMETHODCALLTYPE _clsVBTestClass_CountStringLength_Proxy( 
    _clsVBTestClass __RPC_FAR * This,
    /* [in] */ BSTR strValue,
    /* [retval][out] */ long __RPC_FAR *__MIDL_0014);


void __RPC_STUB _clsVBTestClass_CountStringLength_Stub(
    IRpcStubBuffer *This,
    IRpcChannelBuffer *_pRpcChannelBuffer,
    PRPC_MESSAGE _pRpcMessage,
    DWORD *_pdwStubPhase);



#endif 	/* ___clsVBTestClass_INTERFACE_DEFINED__ */


EXTERN_C const CLSID CLSID_clsVBTestClass;

#ifdef __cplusplus

class DECLSPEC_UUID("46F6C251-C914-4353-A2D2-BF6AF058F454")
clsVBTestClass;
#endif
#endif /* __vbTestCOM_LIBRARY_DEFINED__ */

/* Additional Prototypes for ALL interfaces */

/* end of Additional Prototypes */

#ifdef __cplusplus
}
#endif

#endif

By viewing downloads associated with this article you agree to the Terms of Service and the article's licence.

If a file you wish to view isn't highlighted, and is a text file (not binary), please let us know and we'll add colourisation support for it.

License

This article has no explicit license attached to it but may contain usage terms in the article text or the download files themselves. If in doubt please contact the author via the discussion board below.

A list of licenses authors might use can be found here

Share

About the Author

C. Lung

United States United States
No Biography provided

| Advertise | Privacy | Terms of Use | Mobile
Web04 | 2.8.141223.1 | Last Updated 19 Nov 1999
Article Copyright 1999 by C. Lung
Everything else Copyright © CodeProject, 1999-2014
Layout: fixed | fluid