使用vb建立dcom服务器端及客户端应用的详细过程(1)
window9x,winnt server和winnt workstation平台都能支持dcom。
本节介绍如何建立dcom服务器端应用,及其注意事项。(本人使用的是西文版vb6)
一、建立如下目录:
c:\dcomdemo
c:\dcomdemo\server
c:\dcomdemo\server\setup
c:\dcomdemo\client
c:\dcomdemo\client\setup
二、构建server端dcom应用
1.打开一个新的vb工程,在新工程对话框里,选择"activex exe"工程类型,打开工程,对该工程设置如下属性:
control name property value
------------------------------------------------------------------
class module class1 (name) clsdcomdemoserver
instancing 5 - multiuse
2.拷贝如下代码到类模块clsdcomdemoserver:
option explicit
public function servertime()
'返回服务器时间
servertime = time
end function
public function addnumbers(x as integer, y as integer) as integer
'使用服务器计算两数之和
addnumbers = x + y
end function
public function subtractnumbers(x as integer, y as integer) _
as integer
'计算两数之差
subtractnumbers = x - y
end function
3.在工程菜单, 单击 "project1 properties."
注意:如果你已经更改并保存过工程,现在工程名称将不会叫"project1"
4.单击"general" 按钮,设置如下属性:
project type: activex
startup object: (none)
project name: prodcomdemoserver
project description: dcom demo project - server
5.单击"make"按钮,设置如下属性:
auto increment: <checked>
application title: prodcomdemoserver version
6.单击"compile" 按钮,设置如下属性:
compile to p-code: <selected>
compile to native code: <not selected>
其它选项无需有效.
7.单击"component" 按钮,设置如下属性:
start mode: activex component
remote server files: <checked>
version compatibility: project
注意:一定要选中"remote server files",目的用于生成vbr文件.
8.单击"ok"
9.在"file"菜单, 单击"save project as". 保存为如下所述名称:
目录 文件类型 文件名称 扩展名称