imports system imports system.runtime.interopservices module 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 sub end module
使用 vbscript 是为了表明,托管的和非托管的客户端都可以访问发布为 com+ web 服务的 com+ 组件。在大型组织或应用程序中,很难一次转换所有部分,com+ web 服务允许将一部分应用程序转换为托管代码,而无需立即全面重新编写现有的应用程序。