Win7系统下解决VB6.0鼠标滚轮支持

首先,请看一篇转帖:

原帖地址:http://tieba.baidu.com/p/1969613735

不知道阅读这篇帖子的朋友有没有遇到跟在下一样问题:VB6.0没有内置加载项来提供鼠标滚轮支持的功能。如果代码量少的话还能将就,要是碰到几百行的代码简直是无法忍受的。于是百度一下有没有这样的东西,结果还真找到了。原来人家微软也发现了VB这个令人烦扰的症结所在,因此及时的提供了补丁。这里给一个官方的下载链接:http://download.microsoft.com/download/e/f/b/efb39198-7c59-4ace-a5c4-8f0f88e00d34/vb6mousewheel.exe。下载后解压到指定的文件夹,找到VB6IDEMouseWheelAddin.dll这个文件,将它复制到C:\Windows\System32目录下,点击【运行】,输入:regsvr32 VB6IDEMouseWheelAddin.dll,然后......
然后竟然出问题了!嘿嘿,请注意这篇文章的标题,问题的产生是在WIN7系统下,在XP系统下,经本人试验,以上步骤是没有问题的。那么Win7下会遇到什么问题呢?
按照上述步骤,你运气好的话也许会成功,但是一般会看到这样的错误提示:模块“C:\Windows\System\VB6IDEMouseWheelAddin.dll”已加载,但是对DllRegisterServer的调用失败,错误代码OX80004005。这是神马情况?起初我很困惑,还以为是微软的补丁包没有针对Win7系统,所以郁闷了一阵子,都想忍痛把VB6.0卸载了,从此投向.Net的怀抱。但是一次偶然的“百度一下”,让我发现了问题的原因。
原来归根结底是Win7系统比XP系统更严谨的安全机制问题。出现DllRegisterServer失败这样的问题是因为没有提供足够的权限,解决的方法如下:
1. 重复前述步骤,确保文件VB6IDEMouseWheelAddin.dll成功解压并且已经复制到C:\Windows\System32文件夹下(如果系统盘符不是C的,自行做相应调整)。
2. 点击【开始】-【所有程序】-【附件】,鼠标移到【命令提示符】(即cmd),右击,然后在弹出的菜单中选择【以管理员身份运行】,弹出cmd的运行界面,输入:regsvr32 空格 VB6IDEMouseWheelAddin.dll,点击【enter】.OK,操作无误的话就能看到成功的提示了。
3. 打开VB的IDE开发环境,点击【外接程序】-【外接程序管理器】-选中【MouseWheel Fix】,在【加载行为】中勾选【在启动中加载】和【加载/卸载】。OK!大功告成!感谢上帝,VB6.0终于又愉快地回到了我身边......

 

补充:以上只适用于WIN7的32位版本,因为我的机子装的是WIN7 64位版本,所以,用上面的方法没有成功。解决方法是:将VB6IDEMouseWheelAddin.dll复制到c:\WINDOWS\sysWow64文件夹中!

posted @ 2013-03-22 15:43  drsniper  阅读(3167)  评论(0编辑  收藏  举报