From: Masaki Suketa <masaki.suketa@...>
Date: 2002-06-29T19:51:20+09:00
Subject: Re: win32ole - VARIANT creation question

In message "win32ole - VARIANT creation question"
    on 02/06/26, "Hynek Rostinsky" <hynek.rostinsky@foresta.cz> writes:

> # This converts to a variant unicode value
> my $variant = Win32::OLE::Variant->new( VT_UI1, $buf );
> $Response->BinaryWrite($variant);
> %>
> 
> The problem is in VARIANT creation - is this supported in win32ole ?

No, but Win32OLE has WIN32OLE#_invoke method.
If you have the dispatch ID of BinaryWrite, then you can write:

  $Response._invoke(dispid, [$buf], [VT_UI1])

For more information, see sample/olegen.rb and sample/xml.rb comming
with Win32OLE.

Hope this helps.

  Regards,
  Masaki Suketa