请问谁用过Remote Automation?

snowguy 2000-12-25 01:02:00
有问题请教!
在Remote Automation中,客户方怎样才能使用withevents 申明类而不发生80004005错误!
...全文
194 10 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
snowguy 2001-02-08
  • 打赏
  • 举报
回复
关注
snowguy 2000-12-30
  • 打赏
  • 举报
回复
在win95/98里是要装DCOM95/98的,但是就是不知在95/98里怎样设置网络!
WUCCC,您能不能详细讲解一下95/98下网络的设置方法(NT4。0和windows2000我会的)
wuccc 2000-12-30
  • 打赏
  • 举报
回复
我没有太多时间上网,还有问题欢迎给我发信:
rhost@china.com
wuccc 2000-12-30
  • 打赏
  • 举报
回复
不好意思,隔了这么久. 今天终于翻出了以前的代码,
看了一下,解释如下:
Set myCls = New Class1 不对
应当为
Set myCls = CreateObject("Class1","ServerName")
其中"ServerName"是服务器的计算机名.
在95/98下网络不需特别设置,反而在NT下权限设置很麻烦.
wuccc 2000-12-29
  • 打赏
  • 举报
回复
我一直是使用NT4.0的,不论server还是client都是,
所以无论使用DCOM还是RPC都没有问题,只需要设一下
相关权限就可以了,用win95/98作服务器我想需要安装
DCOM95/98(Visual Studio 光盘里面有)。
snowguy 2000-12-29
  • 打赏
  • 举报
回复
难道没人知道吗?
snowguy 2000-12-28
  • 打赏
  • 举报
回复
wuccc,在不在?
snowguy 2000-12-27
  • 打赏
  • 举报
回复
请指点!
snowguy 2000-12-27
  • 打赏
  • 举报
回复
假若我在Server中包括以下代码:

Class1中的CODE

Option Explicit
Public Event SendMessage1
......
Private Sub Text1_change()
......
RaiseEvent SendMessage
End
......

然后在客户方包括以下代码:
Option Explicit

Private WithEvents myCls as Class1

Private Sub Form_Load()
Set myCls = New Class1 '???????????????????????
.......
End Sub

Private Sub myCls_SendMessage()
msgbox "Message Arive"
End Sub

程序在执行时会出现错误,错误代码是80004005,看MSDN说是Remote Automation不支持WithEvents!但听说有人可以做到这一点,不知道是不是借用了其他软件。当然用DCOM是
能够做到的。但如果是在win95/win98做服务器和工作站时又怎么样配置网络呢?
wuccc 2000-12-25
  • 打赏
  • 举报
回复
请详细些,我没有遇到这样的问题。

7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧