summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--comIvy/ivyscript.vbs5
1 files changed, 4 insertions, 1 deletions
diff --git a/comIvy/ivyscript.vbs b/comIvy/ivyscript.vbs
index be16094..3d81256 100644
--- a/comIvy/ivyscript.vbs
+++ b/comIvy/ivyscript.vbs
@@ -9,9 +9,10 @@ dim bus,all_message,pp,count
set bus = WScript.CreateObject("comIvy.Bus", "bus_")
-'WScript.Echo " bus type " & TypeName(bus)
+WScript.Echo " bus type " & TypeName(bus)
bus.Create "IvyScript", "IvyScript Ready"
+WScript.Echo " bus domain " & bus.GetDomain()
set all_message= bus.Bind( "(.*)")
@@ -49,6 +50,8 @@ end sub
'--------------------------------------------
sub all_Received(name,args)
dim i,argc,argv
+ WScript.Echo " args type " & TypeName(args)
+
argc = UBound(args) - LBound(args) + 1
argv = " args: "
for i = LBound(args) to UBound(args)