本文示例源代码或素材下载

　　第一步：创建WCF服务　　这个和上一篇的完全一样，具体请参见COM(VB/VBA/Script)利用服务标记调用WCF服务之一使用类型化契约的第一步，如果您曾经按照上一篇文章做过相应的测试，你就可以直接使用已经建好的服务了。第二步：在Script中调用WCF服务1 这里大家对比前面一篇就可以看到，这里没有任何创建客户端库以及注册等步骤，而是直接进行调用WCF服务了。在写调用代码之前，首先让我们打开服务的WSDL来看看，因为这里有我们需要的服务标记信息。2 我们打开http://localhost/WCFServiceMoniker/Service1.svc?wsdl之后，如下图所示：

　　3 下面就是创建我们的Script文件了，我们起名为CallWCFService_mex.vbs,内容如下：1'---------------------------------------------------------------
2' MEX service moniker example
3'---------------------------------------------------------------
4' Create a string for the service moniker specifying the address
5' to retrieve the service metadata from
6mexMonikerString = "service:mexAddress='http://localhost/WCFServiceMoniker/Service1.svc/mex'"
7mexMonikerString = mexMonikerString + ", address='http://localhost/WCFServiceMoniker/Service1.svc'"
8mexMonikerString = mexMonikerString + ",binding=WSHttpBinding_IService1, bindingNamespace='http://tempuri.org/'"
9mexMonikerString = mexMonikerString + ", contract=IService1, contractNamespace='http://tempuri.org/'"
10' Create the service moniker object
11Set mexServiceMoniker = GetObject(mexMonikerString)
12' Call the service operations using the moniker object
13WScript.Echo　mexServiceMoniker.SayHello("I am LazyBee, My blog is http://lazybee.cnblogs.com/ ")
14Set mexServiceMoniker = nothing
15