关于DCOM事件的问题.

Question

WithEvents 可选的。关键字，说明 varname 是一个用来响应由 ActiveX 对象触发的事件的对象变量。只有在类模块中才是合法的。使用 WithEvents，可以声明任意个所需的单变量，但不能使用 WithEvents 创建数组。New 和 WithEvents 不能一起使用。

Answer 1

water_j(jxp):
我上述语句在同一台机器在上调试是通过的,说明不是语法问题.

Answer 2

运行dcomcnfg把server和client的 默认身份验证级别 设置为 无

Answer 3

执行 Set SerObj = CreateObject("HotSer.ClsSev") 
SerObj.aa 方法都正常.（服务器和客户端都配置完毕）
只是在窗体模块中 Dim WithEvents MyEvent As HotSer.ClsSev
Set MyEvent = SerObj时出现"自动化错误"

Answer 4

用VB做DCOM很不爽，
你不在窗体模块内引用全局对象，而在窗体内声明私有的事件对象试试看

Answer 5

adafirst3219:
我是在窗体内声明的私有事件。

Answer 6

应该是在DCOMCNFG配置中选中 Enable Remote Conection，就可以了吧。