scripttestactivex.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.DispatchEvents;
import com.jacob.com.Variant;
import com.jacob.test.BaseTestCase;

/**
 * In this case the component is created and used in the same thread and it's an
 * Apartment Threaded component, so we call InitSTA.
 * <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 ScriptTestActiveX extends BaseTestCase {
	public void testActiveXScript() {
		ComThread.InitSTA(true);
		DispatchEvents de = null;

		try {
			String lang = "VBScript";
			ActiveXComponent sC = new ActiveXComponent("ScriptControl");
			sC.setProperty("Language", lang);
			ScriptTestErrEvents te = new ScriptTestErrEvents();
			de = new DispatchEvents(sC, te);
			if (de == null) {
				System.out
						.println("null returned when trying to create DispatchEvents");
			}
			Variant result;
			result = sC.invoke("Eval", getSampleVPScriptForEval());
			// call it twice to see the objects reused
			result = sC.invoke("Eval", getSampleVPScriptForEval());
			// call it 3 times to see the objects reused
			result = sC.invoke("Eval", getSampleVPScriptForEval());
			System.out.println("eval(" + getSampleVPScriptForEval() + ") = "
					+ result);
		} 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();
			ComThread.quitMainSTA();
		}
	}
}