Java

本类阅读TOP10

·使用MyEclipse开发Struts框架的Hello World!(录像1)
·hibernate配置笔记
·AOP编程入门--Java篇
·linux下Tomcat 5.0.20 与 Apache 2 安装/集成/配置
·在win2003下整合了整合Tomcat5.5+ apache_2.0.53+ mod_jk_2.0.47.dll
·构建Linux下IDE环境--Eclipse篇
·Jsp 连接 mySQL、Oracle 数据库备忘(Windows平台)
·ASP、JSP、PHP 三种技术比较
·Tomcat5.5.9的安装配置
·AWT GUI 设计笔记(二)

分类导航
VC语言Delphi
VB语言ASP
PerlJava
Script数据库
其他语言游戏开发
文件格式网站制作
软件工程.NET开发
轻松架起Java连接COM对象的桥梁(续)

作者:未知 来源:月光软件站 加入时间:2005-2-28 月光软件站

  继《轻松架起Java连接COM对象的桥梁》文章发表后,收到很多网友的来信,探讨关于jacob开

发的问题,这篇续文是为了解决jacob传送数组到com以及从com的提取com对修改后的数组参数。关

于jacob的使用这里不详述,请见《轻松架起Java连接COM对象的桥梁》,具体实现如下:
import com.jacob.com.*;
import com.jacob.activeX.*;

public class Exam_6
{
  public static void main(String[] args)
  {
    ActiveXComponent pp = new ActiveXComponent("PrjCOM.MyCOM");
    try {
  SafeArray sa = new SafeArray(Variant.VariantString,2);
  Variant var = new Variant();
  sa.fromStringArray(new String[]{"H","H"});
  var.putSafeArrayRef(sa);//传递数组引用地址
  //如果只是传一个数组进去,而不需要取得改动后内容的话,可以用putSafeArray方法
  Dispatch.call(pp, "Test",var);
  String[] sack= sa.toStringArray();
  System.out.println(sack[0]+"\t"+sack[1]);
    } catch (Exception e) {
      e.printStackTrace();
    }
  }
}
VB实现的Com对象如下
VERSION 1.0 CLASS
BEGIN
  MultiUse = -1  'True
  Persistable = 0  'NotPersistable
  DataBindingBehavior = 0  'vbNone
  DataSourceBehavior  = 0  'vbNone
  MTSTransactionMode  = 0  'NotAnMTSObject
END
Attribute VB_Name = "MyCOM"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = True
Public Sub Test(ByRef param() As String)
ReDim param(2)
param(0) = "Hello"
param(1) = "World"
End Sub

编译执行Exam_6.java
打印 Hello World

有疑问联系[email protected]




相关文章

相关软件