解决ActiveX部件不能创建对象的有效方法

　　最近写VB程序，调试软件（导入导出Excel表格）的时候老是有这样的错误，重新安装了一下Access也无济于事。经过查看，肯定是卸载时破坏了一个链接库，查看后得知为DAO360.DLL这个链接库，重新注册成功后再试验，故障排除。注册方法是：在开始—运行框中输入：regsvr32 "C:/Program Files/Common Files/Microsoft Shared/DAO/DAO360.DLL" ，再次运行调试后问题就解决了。

　　有时我们碰到这样的问题，也可以尝试以下的操作，解决方法：

echo 正在修复，这个过程可能需要几分钟，请稍候…… 

rundll32.exe advpack.dll /DelNodeRunDLL32 %systemroot%/System32/dacui.dll 

rundll32.exe advpack.dll /DelNodeRunDLL32 %systemroot%/Catroot/icatalog.mdb 

regsvr32 /s comcat.dll 

regsvr32 /s asctrls.ocx 

regsvr32 /s oleaut32.dll 

regsvr32 /s shdocvw.dll /I 

regsvr32 /s shdocvw.dll 

regsvr32 /s browseui.dll 

regsvr32 /s browseui.dll /I 

regsvr32 /s msrating.dll 

regsvr32 /s mlang.dll 

regsvr32 /s hlink.dll 

regsvr32 /s mshtml.dll 

regsvr32 /s mshtmled.dll 

regsvr32 /s urlmon.dll 

regsvr32 /s plugin.ocx 

regsvr32 /s sendmail.dll 

regsvr32 /s mshtml.dll /i 

regsvr32 /s scrobj.dll 

regsvr32 /s corpol.dll 

regsvr32 /s jscript.dll 

regsvr32 /s msxml.dll 

regsvr32 /s imgutil.dll 

regsvr32 /s cryptext.dll 

regsvr32 /s inseng.dll 

regsvr32 /s iesetup.dll /i 

regsvr32 /s cryptdlg.dll 

regsvr32 /s actxprxy.dll 

regsvr32 /s dispex.dll 

regsvr32 /s occache.dll 

regsvr32 /s iepeers.dll 

regsvr32 /s urlmon.dll /i 

regsvr32 /s cdfview.dll 

regsvr32 /s webcheck.dll 

regsvr32 /s mobsync.dll 

regsvr32 /s pngfilt.dll 

regsvr32 /s licmgr10.dll 

regsvr32 /s hhctrl.ocx 

regsvr32 /s inetcfg.dll 

regsvr32 /s trialoc.dll 

regsvr32 /s tdc.ocx 

regsvr32 /s MSR2C.DLL 

regsvr32 /s msident.dll 

regsvr32 /s msieftp.dll 

regsvr32 /s xmsconf.ocx 

regsvr32 /s ils.dll 

regsvr32 /s msoeacct.dll 

regsvr32 /s wab32.dll 

regsvr32 /s wabimp.dll 

regsvr32 /s wabfind.dll 

regsvr32 /s oemiglib.dll 

regsvr32 /s directdb.dll 

regsvr32 /s inetcomm.dll 

regsvr32 /s msoe.dll 

regsvr32 /s oeimport.dll 

regsvr32 /s msdxm.ocx 

regsvr32 /s dxmasf.dll 

regsvr32 /s laprxy.dll 

regsvr32 /s l3codecx.ax 

regsvr32 /s acelpdec.ax 

regsvr32 /s mpg4ds32.ax 

regsvr32 /s danim.dll 

regsvr32 /s Daxctle.ocx 

regsvr32 /s lmrt.dll 

regsvr32 /s datime.dll 

regsvr32 /s dxtrans.dll 

regsvr32 /s dxtmsft.dll 

regsvr32 /s wshom.ocx 

regsvr32 /s wshext.dll 

regsvr32 /s vbscript.dll 

regsvr32 /s scrrun.dll mstinit.exe /setup 

regsvr32 /s msnsspc.dll /SspcCreateSspiReg 

regsvr32 /s msapsspc.dll /SspcCreateSspiReg 

echo 修复成功！任意键退出！ 

pause

 

　　把以上信息写到记事本中，然后修改后缀名为.bat 运行即可。