In the VB code you pass two parameters to the RLVersion(), you should do the same in Perl. You just need to tell Win32::OLE that you want that parameter passed by reference. Something like this might help:
I think something like this should work.use Win32::OLE::Variant; my $y = Variant(VT_BSTR || VT_BYREF, ""); $RL->RLVersion(1, $y); print $y;
Jenda
|
We'd like to help you learn to help yourself Look around you, all you see are sympathetic eyes Stroll around the grounds until you feel at home -- P. Simon in Mrs. Robinson |
In reply to Re: Calling COM method
by Jenda
in thread Calling COM method
by StephenLL
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |