VB6.0 怎样启用控件comdlg32.ocx

怎样启用控件comdlg32.ocx

2008-10-08 09:32 提问者： nefu_20061617 |浏览次数：1502次

vbs文件中有代码
Set ComDlg = CreateObject("MSComdlg.CommonDialog")
运行时发生错误
ActiveX 部件不能创建对象: 'MSComdlg.CommonDialog'
怎样启用控件comdlg32.ocx,不使用On Error语句,使这句不产生错误？
最好用vbs文件或bat文件，安装VB,VC++等编程语言的方法除外
试过"regsvr32 comdlg32.ocx"命令,不能启用comdlg32.ocx

问题补充：

计算机没有安装VB,否则comdlg32.ocx就启用了，这句代码也不会发生错误。
我的意思是在没有安装任何编程软件的情况下，使vbs文件中的代码
Set ComDlg = CreateObject("MSComdlg.CommonDialog")
不产生错误

我来帮他解答

 

图片

 

 

 

符号

 

 

编号

 

 

排版

 

 

地图

您还可以输入9999 个字

您提交的参考资料超过50字，请删除

 

参考资料：

提交回答

回答 共2条

2008-10-08 10:17nhednwfnh| 二级

在部件里添加就是啊

赞同0|评论

2008-10-08 10:32yiivon| 四级

您必需在您程序文件中附带上一个comdlg32.ocx文件(与主程序同一文件夹），然后在主窗体的Load()事件中或首执行过程中写注册命令：

shell "regsvr32 comdlg32.ocx /s"

例： comdlg32.ocx 放在主程序的文件夹的子文件夹ocx中，则主窗体Load()事件中写：

shell "regsvr32 " & app.path & "\ocx\comdlg32.ocx /s"


您能看懂吗？注意 "regsvr32 "32后的空格哦！ ^_^