使用 JACOB 为数组属性设置参数

Question

我有以下 VB 代码：

Set QuoteRequest = Quotes.Add
With QuoteRequest
    .No = 1
    .QuoteCode(0)="101"
    .Code(0)="NAME1"
    .Code(1)="NAME2"
End With

我使用 JACOB 访问该 COM 对象。

quoteRequest.setProperty("No",1);
quoteRequest.setProperty("QuoteCode(0)","101");
quoteRequest.setProperty("Code(0)", "NAME1");
quoteRequest.setProperty("Code(1)", "NAME2");

但这会导致异常

com.jacob.com.ComFailException: Can't map to dispid: QuoteCode(0)

我怎样才能通过属性？

Answer 1

import com.jacob.com.*;
import com.jacob.activeX.*;

static void setProperty(Dispatch d, String sName, String sIndex, String sValue) {
  Variant av[] = { new Variant(sIndex), new Variant(sValue) };
  Dispatch.invokev(d, sName, Dispatch.Put, av, NO_INT_ARGS).safeRelease();
  av[0].safeRelease(); av[1].safeRelease();
  }

这就是我使用的代码。对我有用，但是我正在对 Jacob 进行一些更改，以强制对未使用的变体进行垃圾处理。很难说我到底做了什么，那是几年前的事了:)

使用 JACOB 为数组属性设置参数

setParameter for an array property with JACOB

java

vb.net

jacob

使用 JACOB 为数组 属性 设置参数

setParameter for an array property with JACOB

java

vb.net

jacob

使用 JACOB 为数组属性设置参数