Initial commit

samples/test/ScriptTest2.java

@@ -0,0 +1,98 @@
+package samples.test;
+
+import com.jacob.com.*;
+import com.jacob.activeX.*;
+
+/**
+ * This example demonstrates how to make calls between
+ * two different STA's.
+ * First, to create an STA, you need to extend the STA class
+ * and override its OnInit() method. This method will be called
+ * in the STA's thread so you can use it to create your COM
+ * components that will run in that STA.
+ * If you then try to call methods on those components from other
+ * threads (STA or MTA) - this will fail.
+ * You cannot create a component in an STA and call its methods
+ * from another thread.
+ * You can use the DispatchProxy to get a proxy to any Dispatch
+ * that lives in another STA. This object has to be created in the
+ * STA that houses the Dispatch (in this case it's created in the
+ * OnInit method). Then, another thread can call the toDispatch()
+ * method of DispatchProxy to get a local proxy. At most ONE (!)
+ * thread can call toDispatch(), and the call can be made only once.
+ * This is because a IStream object is used to pass the proxy, and
+ * it is only written once and closed when you read it.
+ * If you need multiple threads to access a Dispatch pointer, then
+ * create that many DispatchProxy objects.
+ */
+class ScriptTest2 extends STA
+{
+  public static ActiveXComponent sC;
+  public static DispatchEvents de = null;
+  public static Dispatch sControl = null;
+  public static DispatchProxy sCon = null;
+
+  public boolean OnInit()
+  {
+     try
+     {
+       System.out.println("OnInit");
+       System.out.println(Thread.currentThread());
+       String lang = "VBScript";
+       sC = new ActiveXComponent("ScriptControl");
+       sControl = (Dispatch)sC.getObject();
+
+       // sCon can be called from another thread
+       sCon = new DispatchProxy(sControl);
+
+       Dispatch.put(sControl, "Language", lang);
+       errEvents te = new errEvents();
+       de = new DispatchEvents(sControl, te);
+       return true;
+     }
+     catch (Exception e)
+     {
+       e.printStackTrace();
+       return false;
+     }
+  }
+
+  public void OnQuit()
+  {
+     System.out.println("OnQuit");
+  }
+
+  public static void main(String args[]) throws Exception
+  {
+    try {
+      ComThread.InitSTA();
+      ScriptTest2 script = new ScriptTest2();
+      Thread.sleep(1000);
+
+      // get a thread-local Dispatch from sCon
+      Dispatch sc = sCon.toDispatch();
+
+      // call a method on the thread-local Dispatch obtained
+      // from the DispatchProxy. If you try to make the same
+      // method call on the sControl object - you will get a
+      // ComException.
+      Variant result = Dispatch.call(sc, "Eval", args[0]);
+      System.out.println("eval("+args[0]+") = "+ result);
+      script.quit();
+      System.out.println("called quit");
+    } catch (ComException e) {
+      e.printStackTrace();
+    }
+    finally
+    {
+      Integer I = null;
+      for(int i=1;i<1000000;i++)
+      {
+        I = new Integer(i);
+      }
+      System.out.println(I);
+      ComThread.Release();
+    }
+  }
+}
+