ServiceMonikerSample

Dieses Beispiel zeigt einen Client, der mit dem TCP MetadataExchange-Beispiel verwendet werden kann. Sie verwendet den WCF-Dienstmoniker.

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