Re: creating a reference to a com object - COM Discussion Boards

Re: creating a reference to a com object

Roger Stoltz19-Feb-07 11:18

19-Feb-07 11:18

You don't create a reference to a COM server, you create the server by a call to ::CoCreateInstance() and if the server could successfullly be created you'll get the interface pointer that you requested in the call.
Learn the basics of COM in this CodeProject section: clickety[^].
Michael Dunn's articles would be a good starting point.

Re: creating a reference to a com object

shivapriyak19-Feb-07 18:21

shivapriyak

19-Feb-07 18:21

Hi,
I guess the way my question is formed is wrong.I am sorry about that. Actually my requirement is , I have a vb project which is using a COM Component in it. Now i have created a separate VB project and i want to use the same COM component which is present in the other vb project instead of again adding the COM component in my proj. Thus i want to avoid creating 2 instances of the COM but instead create a reference to existing COM object which is included in a VB client.
I guess u have got my problem. how to do it?
Kindly help me with this.
Thanks in advance

Priya.

Re: creating a reference to a com object

Tim Paaschen19-Feb-07 19:45

Tim Paaschen

19-Feb-07 19:45

This is not a trivial task. A COM DLL is always an in-proc server - which means that it is executed within the process of the client application. Windows does separate different processes quite good.
The approach which I would recommend is to change the COM server to an out-proc (EXE) server. Then make it a singleton server and the two applications can share one instance of it - as long as both clients run in the same user context.
If you don't have access to the sources of the COM server, you will have to implement some other means of inter-process communication. Eventually it is possible to register the COM server in the ROT (running object table) to share it. However, I have never tried to use this approach.

Regards,
Tim

Re: creating a reference to a com object

Roger Stoltz19-Feb-07 22:22

Roger Stoltz

19-Feb-07 22:22

Tim Paaschen wrote:
A COM DLL is always an in-proc server - which means that it is executed within the process of the client application.

Not quite true, Tim.
You can run the DLL server in a surrogate process. This even means that you can run a DLL server that is executing on another computer using DCOM.
Read this[^] for more info.

The exe-server solution and registering in the ROT would do fine, but that may slow things down from the VB-client perspective.
I suggest the use of aggregation.

"It's supposed to be hard, otherwise anybody could do it!" - selfquote
"High speed never compensates for wrong direction!" - unknown

Re: creating a reference to a com object

shivapriyak19-Feb-07 23:44

shivapriyak

19-Feb-07 23:44

Hi,
I understood ur approach,but as i am new to this COM thing..I do not know how to implement. First of all how to convert an in-proc COM instance to an out-proc COM instance so that both the clients can share the same dll. Secondly, How to convert it to a singleton server?? The last registering part which u told, to register in ROT, I am not sure I understood that.
Regards,

Priya.

Re: creating a reference to a com object

Tim Paaschen20-Feb-07 1:25

Tim Paaschen

20-Feb-07 1:25

shivapriyak wrote:
First of all how to convert an in-proc COM instance to an out-proc COM instance

The easiest way is to create a new project and select an COM EXE (out-proc) server right from the beginning. If you want to convert your project, create a new dummy out-proc server and reproduce the required settings and code in your project.

If your server derives from CComCoClass, you can use the DECLARE_CLASSFACTORY_SINGLETON macro. However, be awae that this only works for clients started by the same user.

Regarding the Running Object Table have a look at the MSDN[^] or this article[^].

Regards,
Tim

Re: creating a reference to a com object

Roger Stoltz19-Feb-07 22:27

Roger Stoltz

19-Feb-07 22:27

I suggest you use COM aggregation; a way to encapsulate an inner COM server inside an outer and expose interfaces from the inner server to clients of the outer server.
Have a look in MSDN here[^] and at CodeProject here[^].

"It's supposed to be hard, otherwise anybody could do it!" - selfquote
"High speed never compensates for wrong direction!" - unknown

Re: creating a reference to a com object

shivapriyak19-Feb-07 23:48

shivapriyak

19-Feb-07 23:48

Hi,
I am new to this COM thing..but let me see if i got u right. COM aggregation is a method by which v can encapsulate a inner COM componet within another and the client can call the interfacing methods of the outer component instead of the inner COM.
So, How will this solve my issue?? Actually what i need is 2 clients accessing the same COM component instance..how v can get this??Plz explain.
Thanks.

Regards,

Priya.

Re: creating a reference to a com object

Roger Stoltz20-Feb-07 0:11

Roger Stoltz

20-Feb-07 0:11

shivapriyak wrote:
So, How will this solve my issue?? Actually what i need is 2 clients accessing the same COM component instance.

Ok, I misunderstood your problem.
Then I suggest you do what Tim suggested: create an exe-server and register the instance in the Running-Object-Table (ROT). Clients to the server can then request an already running instance of the server from the ROT. If it's essential that there is only one single instance running at the same time you can implement it as a singleton.
Perhaps this[^] article can help you. It's partly written in C#, but the concept is the same no matter the language.

"It's supposed to be hard, otherwise anybody could do it!" - selfquote
"High speed never compensates for wrong direction!" - unknown

Re: creating a reference to a com object

shivapriyak20-Feb-07 1:19

shivapriyak

20-Feb-07 1:19

Hi,
I went thru the article.
What i understood is that the COM has to be registered and running in the ROT table. Then both the clients can access the same running instance of the COM dll by getting pointers to it.Correct me if i am wrong...
But i am afraid i don't know C# can u tell me how to do this in vb??
both my clients r vb applic only..

Thanks

Priya

Re: creating a reference to a com object

Roger Stoltz20-Feb-07 2:47

Roger Stoltz

20-Feb-07 2:47

shivapriyak wrote:
What i understood is that the COM has to be registered and running in the ROT table. Then both the clients can access the same running instance of the COM dll by getting pointers to it.Correct me if i am wrong...

No need for correction, you've got it.

shivapriyak wrote:
i don't know C# can u tell me how to do this in vb?

Sorry mate, unfortunately I don't know how the synthax looks in VB for doing COM.
However, it's the flow that's important; in what order to do things and what IRunningObjectTable methods to call since it will be the same regardless of the language used. You'll have to translate it to VB by yourself.

In addition to the links that Tim provided you with, have a look at this[^], an article in MS Systems Journal written by Jeff Prosise about the use of ROT and monikers.

"It's supposed to be hard, otherwise anybody could do it!" - selfquote
"High speed never compensates for wrong direction!" - unknown

Re: creating a reference to a com object

shivapriyak20-Feb-07 21:02

shivapriyak

20-Feb-07 21:02

Hi,
Thnx everybody I could solve this issue. Smile | :)

com -vb "error-70"

aamn116-Feb-07 2:26

aamn1

16-Feb-07 2:26

Hi,
i have an com application which keeps track of another application and displays the message accordingly.
but it gives error70 when we handle the application to and fro very frequently.
can anyone help me on Error-70 or any idea about the possible reasons.

thanks in advance

amolk

error "The stub received bad data" while calling CreateInstance function

Sumesh V.V14-Feb-07 21:30

Sumesh V.V

14-Feb-07 21:30

Hai friends,

I am get an error "The stub received bad data" while calling CreateInstance function.
But some times its working.

I am using a COM Exe as server. I am using a regular dll to call the interface functions of COM Server. I am getting this error in dll.I had registered the COM Exe using regerver.

OS installed : WindowsXP Service Pack 2
Platform : VC++6.0 Service Pack 6

Can anybody help me to solve?

With regards,
appoos

Known is a drop, unknown is an ocean

Re: error "The stub received bad data" while calling CreateInstance function

lafleon15-Feb-07 11:08

lafleon

15-Feb-07 11:08

Hello,

1. Have you initialized all your variables inside com server? Some memory garbage can cause the problem

2. It can be some timing problem with initialization. Try to play with some delays (just use Sleep(…)) inside constructor and FinalConstruct() method of your exe com server.

Regards,

want to close MSWord after sending e-mail via Outlook

salman kazi13-Feb-07 19:47

salman kazi

13-Feb-07 19:47

i have made the plugin in VC for outlook so when i send mail the micorsoft word page remain open i want to close that page so any1 can help me in this regard.
the code for initilizing the word is as follow
if(EditorType==olEditorWord)
{
HWND hwnd;
hwnd = ::GetForegroundWindow();
HRESULT hr = EnumChildWindows(hwnd, &EnumWindowsProc, NULL);
CComPtr<idispatch>Dispatch;
spInspect->get_WordEditor((IDispatch**)&Dispatch);
DISPID dispp;
OLECHAR FAR* szMemberpName;
EXCEPINFO pexcep;
UINT uArgErr;
DISPPARAMS disparams={NULL,NULL,0,0};
szMemberpName = L"Close";
VARIANTARG ApResult;
Dispatch->GetIDsOfNames (IID_NULL, &szMemberpName, 1, LOCALE_SYSTEM_DEFAULT, &dispp);
hr = Dispatch->Invoke(dispp, IID_NULL, LOCALE_SYSTEM_DEFAULT,DISPATCH_METHOD, &disparams, &ApResult, &pexcep, &uArgErr);
if(FAILED(hr))
{
_bstr_t des;
char * ii;
des = pexcep.bstrDescription;
ii = (char*) des;
}
else
{}

To Retrieve Path of a DLL file.

georgekjolly12-Feb-07 19:44

georgekjolly

12-Feb-07 19:44

Hi all ,

How can I get the path of a COM DLL ??

I am using this way..

Inside DLL , I am writing this code.

/******************************************************/

HINSTANCE g_hInst;

TCHAR szModule[MAX_PATH];

g_hInst = _Module.GetModuleInstance();

GetModuleFileName(g_hInst, szModule, MAX_PATH);

/*******************************************************/

I am getting the Path . But am getting in this form..

"D:\THINVI~1\INTEGR~1.DLL" .

The tilt sign makes the folder and file names incomplete . My actual path is

"D:\THINVISITS_14-2-07\INTEGRALHOTBAR.DLL"

So how can I get my dll path in the complete form without Tilt(~)..

Please Help Me

Thanks
George.

Re: To Retrieve Path of a DLL file.

Stephen Hewitt13-Feb-07 11:18

Stephen Hewitt

13-Feb-07 11:18

Add an additional call to GetLongPathName.

Steve

Problem in Passing 1d array from VC++ to VB [modified]

georgekjolly8-Feb-07 6:00

georgekjolly

8-Feb-07 6:00

Hi all,

I have a VB applicatiOn , which calls a function in VC++ DLL.

Arguement of function is a one dimensional string array.

Array will get filled in VC++ dll function.

I have written the programme given below.

But I am unable to get the array elements from VC++.

Programme is given below.

VC++ COM
/*****************************************/
STDMETHODIMP CTest111CL::myFun(SAFEARRAY **ppOutputArray)
{
AFX_MANAGE_STATE(AfxGetStaticModuleState())

HRESULT hresult;

SAFEARRAYBOUND aDim[1] ;

aDim[0].lLbound = 0;
aDim[0].cElements = 3;

BSTR HUGEP *pbstr;

*ppOutputArray = SafeArrayCreate(VT_BSTR , 1, aDim);

hresult=SafeArrayAccessData(*ppOutputArray,(void HUGEP**)&pbstr);

pbstr[0] = SysAllocString(OLESTR("SOURCE_VA"));
pbstr[1] = SysAllocString(OLESTR("ACV"));
pbstr[2] = SysAllocString(OLESTR("10"));

SafeArrayUnaccessData(*ppOutputArray);

return S_OK;
}
/**********************************************/

VB Application
---------------
''''''''''''''''''''''''''''
Dim i As Test111CL

Private Sub Command1_Click()

Dim arr_str(3) As String
Set i = New Test111CL
i.myFun arr_str()
MsgBox arr_str(1)
End Sub

''''''''''''''''''''''''''

MsgBox arr_str(1) , The message Box shows and empty string.

How can I rectify it. Please help me.

Thanks
George

-- modified at 4:53 Friday 9th February, 2007

Re: Problem in Passing 1d array from VC++ to VB

lafleon9-Feb-07 10:58

lafleon

9-Feb-07 10:58

Hello,

Try this:

Idl: HRESULT FunName([in,out] SAFEARRAY(BSTR)* pbsData);
.h: STDMETHOD(FunName)((SAFEARRAY** pbsData);
.cpp: STDMETHODIMP ClassName:: FunName(SAFEARRAY** pbsData)
{
//checking if it is an one-dimensional array
if((*pbsData)->cDims != 1)
return E_FAIL;

//Checking the number of elements of the array
if(3 != (*pbsData)->rgsabound[0].cElements)
return E_FAIL;

// locking the array before using its elements
HRESULT hr = SafeArrayLock(*pbsData);
if(FAILED(hr))
return E_FAIL;

// using the array
BSTR* pbs = (BSTR*)(*pbsData)->pvData;
pbs[0] = …
pbs[1] = …
pbs[2] = …
…
// releasing the array
return SafeArrayUnlock(*pbsData);
}

VB: Option Explicit
Option Base 1
Dim sArr(1 To 3) As String

Call ….FunName(sArr)

Regards,

Re: Problem in Passing 1d array from VC++ to VB

georgekjolly10-Feb-07 0:36

georgekjolly

10-Feb-07 0:36

Hi lafleon ,

Its working excellent . I have implemented it for a 3d array and got correct result.

Thank you Very much for your help.
George

Re: Problem in Passing 1d array from VC++ to VB

lafleon9-Feb-07 11:10

lafleon

9-Feb-07 11:10

Hello,

Read the article on MSDN: “How to Pass Arrays between Visual Basic and C”. http://support.microsoft.com/kb/207931

Regards

Re: Problem in Passing 1d array from VC++ to VB

lafleon9-Feb-07 11:19

lafleon

9-Feb-07 11:19

Some more links:
1. "Passing an array from VC++ DLL to VB", by Amol Kakhandki on Code project. http://www.codeproject.com/dll/ctovbarray_passing.asp

2. http://www.manbu.net/Lib/En/Class5/Sub7/1/23.asp

Enumerate menu item identifiers of MS-Office apps. Can anybody help

San24687-Feb-07 23:13

San2468

7-Feb-07 23:13

Hi All,
I want to enumerate menu item identifiers of MS-Office apps. I found all MS-Office apps share resources stroed in some dll (MSO.dll, may be wrong). I like to disable some menu items by using subclassing or something else. So can anybody help to enumerate these id's.
Thanks a lot!
- Santosh Big Grin | :-D

-- modified at 4:14 Friday 9th February, 2007

Passing 3d string array from VC++ to VB

georgekjolly7-Feb-07 3:43

georgekjolly

7-Feb-07 3:43

Hi all,

I have code for passing 2d array from VC++ to VB6(Code is given below), But My need is to pass a 3d array from VC++ to VB6, Can any one pleas replace the code I have given for 2d to 3d

STDMETHODIMP TestMacroInterface::ProcessStringArray(SAFEARRAY**ppOutputArray)
{
HRESULT hresult;
SAFEARRAYBOUND aDim[2]
aDim[0].lLbound = 0;
aDim[0].cElements = 3;
aDim[1].lLbound = 0;
aDim[1].cElements = 2
BSTR HUGEP *pbstr;
*ppOutputArray=SafeArrayCreate(VT_BSTR , 2, aDim);
if (*ppOutputArray==NULL)
{
::MessageBox(NULL, _T("NOT_OK"), _T("Pickup"), MB_OK);
}
else

hresult=SafeArrayAccessData(*ppOutputArray,(void HUGEP**)&pbstr)

pbstr[0][0] = SysAllocString(OLESTR("SOURCE_VA"));
pbstr[0][1] = SysAllocString(OLESTR("ACV"));
pbstr[0][2] = SysAllocString(OLESTR("10"));

SafeArrayUnaccessData(*ppOutputArray);

}

Thanks
George

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.