注册控件后仍不能使用
一下代码

obj=Createobject("MSComDlg.CommonDialog.1")
obj.Flags = 524288 + 512 + 4
obj.Filter = "文件类型(*.*)|*.*"
obj.FileName = "2010年4月21日"
obj.maxFileSize=10000
obj.ShowOpen()
Self=obj.FileName+CHR(0)

注册完comdlg32.ocx控件，使用时提示 class is not licensed for use
仍然不能使用，为什么

[解决办法]
将下列内容粘贴到一文本文件内并保存为 aaa.reg，双击导入注册表即可：

Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\Licenses\4D553650-6ABE-11cf-8ADB-00AA00C00905]
@="gfjmrfkfifkmkfffrlmmgmhmnlulkmfmqkqj"