2025-11-28 00:35:46 +09:00

7 lines
342 B
Plaintext

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