COM+ Web 服务：通过复选框路由到 XML Web Services(1) （微软中国）

目录

• 简介
• 简单的已知对象 (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 访问服务器应用程序。