使用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.
<待续>
本文地址：http://com.8s8s.com/it/it6685.htm