各位大侠，系统提示：实时错误463 未在本地机器上注册类

具体情况如下：当我在做组件开发时，用下面语句在本机调用成功
Dim objWarns As CWarnings

而用下面的语句调用时，却提示：上述信息，我在本机组件服务中已加了该服务啊
Dim objWarns As ClientManagerCom.CWarnings
Set objWarns = CreateObject("ClientManagerCom.CWarnings ", "127.0.0.1 ")



[解决办法]
Set objWarns = CreateObject("ClientManagerCom.CWarnings ", "127.0.0.1 ")
Set objWarns = CreateObject("ClientManagerCom.CWarnings", "127.0.0.1")
去掉空格试试。
[解决办法]
呵呵，猴哥眼尖