Partager via


ServiceMonikerSample

Cet exemple montre un client qui peut être utilisé avec l’exemple TCP MetadataExchange. Il utilise moniker de service WCF.

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