使用vb建立DCOM服务器端及客户端应用的详细过程（1）

使用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". 保存为如下所述名称:

目录 文件类型 文件名称 扩展名称
---------------------------------------------------------------------
C:/DCOMDemo/Server Class Module COMDemoServer .cls
Project proDCOMDemoServer .vbp

10.单击"File"菜单, 单击"Make proDCOMDemoServer.exe."

此时弹出一个对话框,保存exe文件到如下目录: c:/DCOMDemo/Server directory.

<待续>