scripttest3.java

Very Nice library for using ActiveX controls directly from java without heavy knowledge of JNI, simp

package com.jacob.test.vbscript;

import com.jacob.activeX.ActiveXComponent;
import com.jacob.com.ComException;
import com.jacob.com.ComThread;
import com.jacob.com.Dispatch;
import com.jacob.com.DispatchEvents;
import com.jacob.com.Variant;
import com.jacob.test.BaseTestCase;

/**
 * Here we create the ScriptControl component in a separate MTA thread and then
 * call the Eval method from the main thread. The main thread must also be an
 * MTA thread. If you try to create it as an STA then you will not be able to
 * make calls into a component running in another thread.
 * <p>
 * May need to run with some command line options (including from inside
 * Eclipse). Look in the docs area at the Jacob usage document for command line
 * options.
 */
public class ScriptTest3 extends BaseTestCase {

	public static ActiveXComponent sC;

	public static DispatchEvents de = null;

	public static Dispatch sControl = null;

	public static boolean quit = false;

	public void testScript() {
		try {
			ComThread.InitMTA();
			ScriptTest3Inner script = new ScriptTest3Inner();
			script.start();
			try {
				Thread.sleep(1000);
			} catch (InterruptedException ie) {
				// should we get this?
			}

			Variant result = Dispatch.call(sControl, "Eval",
					getSampleVPScriptForEval());
			System.out.println("eval(" + getSampleVPScriptForEval() + ") = "
					+ result);
			System.out.println("setting quit");
			ScriptTest3.quit = true;
		} catch (ComException e) {
			e.printStackTrace();
			fail("Caught excpetion running script with MTA");
		} finally {
			System.out.println("main done");
			ComThread.Release();
		}
	}

	class ScriptTest3Inner extends Thread {
		public void run() {
			try {
				ComThread.InitMTA();
				System.out.println("OnInit");
				String lang = "VBScript";
				sC = new ActiveXComponent("ScriptControl");
				sControl = sC.getObject();
				Dispatch.put(sControl, "Language", lang);
				ScriptTestErrEvents te = new ScriptTestErrEvents();
				de = new DispatchEvents(sControl, te);
				System.out.println("sControl=" + sControl);
				while (!quit) {
					sleep(100);
				}
				ComThread.Release();
			} catch (Exception e) {
				e.printStackTrace();
			} finally {
				System.out.println("worker thread exits");
			}
		}

	}
}