注册日历控件时,为什么出现“OLE异常码Ox80040154 dlass not registered”的出错提示

注册日历控件时,为什么出现“OLE错误码Ox80040154 dlass not registered”的出错提示?
    注册日历控件,编写的运行程序是:

     oll=Createobject('Wscript.shell')
    oll.Run("Regsvr32 /S MSCAL.OCX",0,.T.)
    Release oll

    在很多计算机上运行都正常,但现在一台电脑上却出现了这样的出错提示:

    OLE错误码 Ox80040154  dlass not registered

    敬向电脑专家请教,是何原因?如何解决?不胜感激!

------解决方案--------------------
1. 检查 mscal.ocx 是否在当前目录中
2. 检查系统是否禁用了 Wscript
3. Vista 以上系统在 uac 未关闭的情况下,只有“以管理员身份”运行的进程才有资格执行 regsvr32 来注册控件
4. 另外,不需要调用 Wscript,直接调用 ocx 自身的函数即可:
Declare Long DllRegisterServer in mscal.ocx
if DllRegisterServer() <> 0
  Messagebox('注册成功。')
else
  Messagebox('注册失败。')
endif
------解决方案--------------------
在开始运行中执行以下看看能否成功
Regsvr32 路径\MSCAL.OCX