In the Module, I have

Dim X As CAuto

Set X = New CAuto and uses X to do something.


After that I call a form. In this form, I have

Dim WithEvents X As CAuto

Set X = New CAuto


CAuto is a DCOM object

If CAuto is in the same PC with client, there is no problem happened.

If CAuto is in the different PC with client. a "Run-time error '-2147220990 (80040202)': Automation error". After pressing the Debug button in the warning dialog, the debug arrow stop at "Set X = New CAuto" in the form. At that time X = Nothing; CAuto =

Could you please help me.

Thank you very much.

Best regards.

Hau Nguyen.