ServiceMonikerSample

This sample shows a client which can be used with the TCP MetadataExchange sample. It utilizes WCF service moniker.

• PurchaseOrderClient.vbs

PurchaseOrderClient.vbs

set obj = GetObject("service:mexAddress='net.tcp://localhost/example/mex', address='net.tcp://localhost/example', contract='IPurchaseOrder', contractNamespace='http://example.org', binding=PurchaseOrderBinding, bindingNamespace='http://example.org'")
for i = 1 to 100
 orderId = obj.Order(i,"Pencil", date)
 Wscript.Echo orderId, date
Next