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")
不产生错误
我来帮他解答

回答 共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后的空格哦! ^_^
原文地址:https://www.cnblogs.com/wuyifu/p/2782693.html