目錄

• 簡介
• 簡單的已知對像 (WKO) 示例
• 簡單的客戶端激活對像 (CAO) 示例
• 事務性組件示例
• 一切才剛剛開始

簡介

set SoapObj = GetObject   ("soap:wsdl=http://www.xmethods.net/sd/TemperatureService.wsdl")WScript.Echo "Fairbanks 氣溫 = " & SoapObj.getTemp("99707")

注意： 如果出現「未找到服務器」錯誤，您需要在控制面板的 Internet 選項中手動配置防火牆設置。

• 已知對像 (WKO)： WKO 是 SOAP V1.1 所支持的最常見的 XML Web Services 模型。它允許與其他運行 SOAP V1.1 兼容堆棧的計算機協同工作。服務器和客戶端可以是運行 Apache SOAP 的非 Windows 服務器和運行 pocketSOAP 的 Pocket PC，也可以是基於 Windows 的服務器和客戶端。唯一的要求是服務器上必須安裝了與 WSDL 1.1 版本兼容的描述功能，以便生成相應的代理。此代理是在運行時生成的，並且第一次使用 WSDL 名字對像時沒有用戶介入。
• 客戶端激活的對象 (CAO)： CAO 提供了更豐富的開發環境，包括穩定持久的連接。較之典型的 XML Web Services 模型，它更類似於 DCOM 模型，但要求在服務器和客戶端上都安裝有某一版本的 .NET 框架。

1. 當前安裝有 Microsoft® Visual Basic® 6.0 或者非托管 Microsoft Visual C++® COM+ 應用程序（需要通過防火牆才能進行某些激活操作）的 COM+ 用戶。（使用 SOAP 並不排斥通過 DCOM 訪問服務器上的相同組件，客戶端計算機可以選擇協議。）對於這些客戶來說，如果要使用 SOAP 而不是 DCOM，則使用客戶端代理導出和 CAO 模型都不需要更改客戶端和服務器應用程序。只需要在服務器應用程序上啟用 SOAP，將其作為客戶端代理導出，然後將代理安裝在要用作 SOAP 客戶端的 Windows XP 計算機上。
2. 完全遷移到 Windows XP 和 Windows .NET Server 上的托管代碼的公司。COM+ Web 服務有助於在連接的兩端設置遠程端點。
3. 需要在上述兩種方案中組合和匹配各種服務的開發人員，以及編寫托管服務器組件、或帶有非托管服務器組件的托管客戶端應用程序的開發人員。在第二種情況中，開發人員可以利用 COM+ Web 服務，在用托管代碼替換之前充分利用早期的非托管組件。

簡單的已知對像 (WKO) 示例

mon="soap:wsdl=http://MyServer/JALTServer/JALTServer.dll?   Handler=GenJALTServerWSDL"set c = GetObject(mon)WScript.Echo c.HelloWorld("COM+ Web 服務") 

數據發佈

Function Add(ByVal Value1 As Double, ByVal Value2 As Double) As Double Add = Value1 + Value2End Function

set c = GetObject   ("soap:wsdl=http://localhost/VB6Soap/VB6Soap.Calc.soap?WSDL")for i = 1 to 10 WScript.Echo i & " " & c.Add(i,i) & " " & Timenext 

set c = CreateObject("MSSOAP.SOAPClient")c.mssoapinit("http://localhost/VB6Soap/VB6Soap.Calc.soap?WSDL")for i = 1 to 10 WScript.Echo i & " " & c.Add(i,i) & " " & Timenext 

using System;using System.Reflection;using System.Runtime.InteropServices;using System.EnterpriseServices;[assembly: ApplicationName("CSSoap")][assembly: ApplicationActivation(ActivationOption.Server,    SoapVRoot="CSSoap")][assembly: AssemblyKeyFile("CSSoap.snk")]namespace CSSoap{  public interface ICalc  {   double Add (double Value1, double Value2);  }  [ClassInterface(ClassInterfaceType.AutoDual)]  [TransactionAttribute(TransactionOption.None)]  public class Calc : ServicedComponent, ICalc  {   public double Add (double Value1, double Value2);   {      return (Value1 + Value2);   }   }}

[assembly: ApplicationActivation(ActivationOption.Server,    SoapVRoot="CSSoap")]

set c = GetObject   ("soap:wsdl=http://localhost/CSSoap/CSSoap.Calc.soap?WSDL")for i = 1 to 10 WScript.Echo i & " " & c.Add(i,i) & " " & Timenext 

set c = CreateObject("MSSOAP.SOAPClient")c.mssoapinit("http://localhost/CSSoap/CSSoap.Calc.soap?WSDL?for i = 1 to 10 WScript.Echo i & " " & c.Add(i,i) & " " & Timenext 

Imports SystemImports System.Runtime.InteropServicesModule WKOClient Sub Main()    Dim WSDLMoniker =       "soap:wsdl=http://localhost/CSSoap/CSSoap.Calc.soap?WSDL"      Dim obj as Object   obj = Marshal.BindToMoniker(WSDLMoniker)   Console.WriteLine(obj.Add(1,2)) End SubEnd Module

簡單的客戶端激活對像 (CAO) 示例

1. 用鼠標右鍵單擊組件服務管理工具中的 VB6Soap COM+ 應用程序，並選擇 Export，如圖 2 所示。
   
   圖 2：組件服務管理工具
2. 在圖 3 所示的 COM+ 應用程序導出嚮導中，輸入代理 .msi 文件的位置和名稱。
   
   圖 3：COM+ 應用程序導出嚮導
3. 將代理 .msi 文件安裝在單獨的客戶端計算機上，作為預先生成的 COM+ 應用程序。
   安裝時將對代理進行適當的配置，以便通過 SOAP 訪問正確的服務器和虛擬根。對於客戶端激活，可以不使用 WSDL 名字對象，而使用常規非托管的 COM+ 激活（例如，CoCreateInstance、CreateObject 等）。在服務器上創建並在單獨的客戶端計算機上安裝上述 Visual Basic 計算器示例的應用程序代理後，以下 VBScript 將通過 SOAP 訪問該服務器：

   set c = CreateObject("VB6Soap.Calc")for i = 1 to 10 WScript.Echo i & " " & c.Add(i,i) & " " & Timenext 

   
   如果代理程序沒有啟用 COM+ Web 服務，則上述 VBScript 代碼將使用 DCOM 訪問服務器應用程序。