How to fix "unexpected error (32801)" when compiling a VB 6 program?

Question

I need to support the old VB 6 ActiveX DLL called by another third-party program for which I have no sources, etc. This DLL has been working and compiling in accordance with the API of the specified program for approximately 6 years and 3 major versions.

But now, when I try to compile the DLL against the new major version, this error occurs. It seems that the error occurs before the "my" code is called, so no debugging or logging is required. The only way was to compile without binary compatibility, which is not a real option. In my Google search, quite a few people appeared with the same problem, but there was no solution.

Does anyone know how to solve this problem?

Thanks in advance

banzai

Answer 1

It looks like one of the interface types defined in your new DLL is different from the one in the previous DLL. I use types defined in a third-party program in your public interfaces of your DLL. It sounds to me, like a third party changed the definition of one of the types, but kept the name and GUIDs the same. You can use something like an OLE / COM Object viewer to check if this is true. If this is true, you can file a complaint with the publisher of the third-party program. Do you have enough political power to succeed?

, , Hardcore Visual Basic 6, , . , , ( ) - VB6, . , - .

Answer 2

, , VB6 32801 .

. VB6 , . 32801 , .

OLEView. COM IDL. , IDL . , . . , WINMerge, . .

, . DLL .

Answer 3

devx.com, , , , Microsoft Scripting Runtime (scrrun.dll).

FileSystemObject (32810)

DLL ? , (, FileSystemObject VB / API).

Answer 4

- , , " " (.. SourceSafe )?

*. *.vbw *.lib

Answer 5

---------------------------
Microsoft Visual Basic
---------------------------
Unexpected error (32810)
---------------------------
OK      
---------------------------

, , VBIDE OCX, .

, ,

Property Get MouseActivate() As BookmarkEnum

Property Get MouseActivate() As Boolean

, , .

BookmarkEnum - ADO. - Server 2003, - Win10. ADO 2.8, , , Server 2003 Win10