JACOB 开发

  如果你想写一个JAVA代码,其中需要调用JACOB提供的功能,而你还是新手,也许篇文章会大大降低你的花费时间。

    我将一个关于JACOB的代码分成下面几个步骤:

    1) ActiveXComponent ax = new ActiveXComponent("a1");//构建ActiveX组件实例

    其中的a1的值和你需要调用的ActiveX控件有关

MS控件名

a1的值

InternetExplorer

InternetExplorer.Application

Excel

Excel.Application

Word

Word.Application

Powerpoint

Powerpoint.Application

vb/java Script

ScriptControl

windows media Player

WMPlayer.OCX

Outlook

Outlook.Application

Visio

Visio.Application

DAO

DAO.PrivateDBEngine.35

MultiFace

MultiFace.Face

    2) Dispatch ds = ax.getObject()。 toDispatch();//获取Dispatch对象,我们可以把每个Dispatch对象看成是对Activex控件的一个操作,这一步是获得该ActiveX控件的控制权。

    (注:浅析JACOB 中提到过Variant类,这里的ax.getObject()便是获得该对象,我们将其转化为任何对象(类型))

    3) Dispatch ds1 = Dispatch.get(ds, "a2")。toDispatch(); //获取该ActiveX对象数据结构中的a2属性

    4) Dispatch d2 = Dispatch.invoke(ds1, "a3", a4, a5, a6)。toDispatch(); //功能调用,对ActiveX对象ds1的a3属性执行a4(Dispatch.Put\Dispatch.Get等)操作,执行后a3的值为a5,a6为错误参数码常定义为new int[1],(注:call、get和put方法都是通过该方法实现的)

    5) Dispatch ds2 = Dispatch.put(ds, "a7","a8")。toDispatch();//将ActiveX对象ds的属性a4的值设置为a5,该方法返回类型同get一样

    6) Dispatch ds3 = Dispatch.call(ds1, "a9", a10);//该方法和get方法非常类似,他是把a9属性赋值给a10

    Ok其他的方法我觉得很容易理解,这里就不再做描述了。

    下面是一个关于excel的代码,也许对您的进一步自学,会有好处

import com.jacob.activeX.ActiveXComponent;
import com.jacob.com.ComThread;
import com.jacob.com.Dispatch;
import com.jacob.com.Variant;

public class ExcelDispatchTest {

    
public static void main(String[] args) {
        ComThread.InitSTA();

        ActiveXComponent xl 
= new ActiveXComponent("Excel.Application");
        
try {
            System.out.println(
"version=" + xl.getProperty("Version"));
            System.out.println(
"version=" + Dispatch.get(xl, "Version"));
            Dispatch.put(xl, 
"Visible"new Variant(true));
            Dispatch workbooks 
= xl.getProperty("Workbooks").toDispatch();
            Dispatch workbook 
= Dispatch.get(workbooks, "Add").toDispatch();
            Dispatch sheet 
= Dispatch.get(workbook, "ActiveSheet").toDispatch();
            Dispatch a1 
= Dispatch.invoke(sheet, "Range", Dispatch.Get,
                    
new Object[] "A1" }new int[1]).toDispatch();
            Dispatch a2 
= Dispatch.invoke(sheet, "Range", Dispatch.Get,
                    
new Object[] "A2" }new int[1]).toDispatch();
            Dispatch.put(a1, 
"Value""123.456");
            Dispatch.put(a2, 
"Formula""=A1*2");
            System.out.println(
"a1 from excel:" + Dispatch.get(a1, "Value"));
            System.out.println(
"a2 from excel:" + Dispatch.get(a2, "Value"));
            Variant f 
= new Variant(false);
            Dispatch.call(workbook, 
"Close", f);
        }
 catch (Exception e) {
            e.printStackTrace();
        }
 finally {
            xl.invoke(
"Quit"new Variant[] {});
            ComThread.Release();
        }

    }

转载于:https://www.cnblogs.com/ppgs8903/archive/2013/03/27/4343275.html

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
一个简单示例 初始化当前Java线程STA ComThread InitSTA ; ActiveXComponent xl new ActiveXComponent "Excel Application" ; try{ 打开现有的Excel xl setProperty "Visible" new Variant false ; Dispatch workbooks xl getProperty "Workbooks" toDispatch ; Dispatch workbook Dispatch invoke workbooks "Open" Dispatch Method new Object[]{excelPath new Variant false 是否只读 new Variant false } 是否显示打开 new int[1] toDispatch ; 得到所有sheet Dispatch sheets Dispatch get workbook "sheets" toDispatch ; System out println "sheet数量:"+Dispatch get sheets "count" toString ; 根据索引得到sheet Dispatch sheet Dispatch invoke sheets "Item" Dispatch Get new Object[]{i} new int[1] toDispatch ; 绘图 Dispatch chartobjects Dispatch call sheet "ChartObjects" toDispatch ; Dispatch achart Dispatch invoke chartobjects "Add" Dispatch Method new Object[] { new Double 12 yHeight 横坐标 纵坐标 new Double 943 new Double 293 宽度 高度 } new int[1] toDispatch ; Dispatch chart Dispatch get achart "chart" toDispatch ; Dispatch range Dispatch invoke sheet "Range" Dispatch Get new Object[] {rangeX rangeY} 列名位置 数据位置 new int[2] toDispatch ; Dispatch series Dispatch call chart "seriescollection" toDispatch ; Dispatch call series "add" range new Variant true ; 生成图形 Dispatch put chart "PlotBy" "2" ; 纵向读取数据绘制chart 设置线条气泡颜色 黄色 Dispatch seriesChartFillFormat Dispatch get series "Fill" toDispatch ; Dispatch seriesForeColor Dispatch get seriesChartFillFormat "ForeColor" toDispatch ; Dispatch put s

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值