此问题以前一直没有碰到过,因为VB建立的COM和ActiveX的工程,都是超级智能,什么都封装好了,连组件注册都帮你弄好了,而且VB没有提供入口来修改这些属性。
以前用VB建立这类工程,不需要关心这些细节,也没碰到过什么问题,因为的确,CLSID都是自动生成,不需要人为干涉。直到今天去上海大平洋保险出差,遇到金蝶OA系统的一个问题:编设出来的组件CLSID和已经布署的系统的CLSID不一样!
这下就出问题了,因为在完成测试新编译出来的组件之前,我们不能把新改的组件布署上去(反正原因很复杂……)。最后是没办法,只好研究一下VB中是如何设置组件的CLSID的。
第一感觉就是VB建立工程的时候,用随机算法算出一组CLSID,然后存在某个地方,因为只有这样,每次编译时,才能保证同一组CLSID。但是把工程目录搜索了一遍,包括ASCII和二进制搜索,都搜不出来,挨个挨个文件看也看不出。
只好研究VB的工程相关设置,也没发现,最后觉得有点令人怀疑的地方是所谓的Version Compatiblity(“版本兼容”)。研究后终于搞清楚了其中来龙去脉。
VB的兼容卡中有三个设置:(工程属性--部件--版本兼容)
1、No Compatibility:不兼容,此设置下,每次编译出的CoClass和Interface的CLSID都会不一样。 2、Project Compatibility:工程兼容,此设置下,每次编译出的CoClass的CLSID一样,但Interface的CLSID不一样。 3、Binary Compatibility:二进制兼容,此设置下,保证每次编译出的CoClass和Interface的CLSID都一样。 当选择2和3时,还要在下面的Edit输入框中输入欲与其兼容的ocx文件。也就是说,要保证2和3,工程移动时必须把dll/ocx都要一起拷过来。否则编译出来的COM对象CLSID就不一样了。 如果丢失原来的ocx文件,就会弹出“Unalbe to set the version compatible component:XXXX”错误信息,你只能强制改为选项1不兼容,但此时你编译出来的组件CLSID会重新生成,也就是说和原来的就不一样了。 当然,因为类型库本来就以资源形式挂在dll/ocx中,所以你也可以直接修改二进制文件。需要注意的是,资源文件中是以二进制来存的,不是以ASCII码来存的。 利用这些原理,也可以写一个方便的插件来实现在VB中对组件CLSID的设置,有空写一个:)。 另外,基于这种原因,如果使用VB编写组件,使用方尽量使用ProgID,因为ProgID即VB中的子类名(.cls),也就是说,是可以很容易设定的。 评分 原文链接:https://www.f2er.com/vb/256298.html