in reply to Re: More on OLE from Perl
in thread More on OLE from Perl

Ok, here's the setup from the VB form sample. Note the CLSID string, and the reference to the ocx module.
VERSION 5.00
Object = "{9EA22D70-0EAA-4F54-80BB-3AA640DF1B96}#2.0#0"; "HALi.ocx"
Begin VB.Form Form1 
...blah...blah...
So I tried this
use Win32::OLE;
my $HALi = Win32::OLE->new('{9EA22D70-0EAA-4F54-80BB-3AA640DF1B96}');
When I run it, it does not return any errors. Cool!

So I move to the next step and add the init function.

The VB init is:

HALi.Init()
So I translate this to:
$HALi->{HALi}->Init();
I get a "Can't call method Init on undefined value" error.

It's late and I'm tired, and probably missing something obvious. I'm getting past the server creation, but hanging on the init function. Maybe a fresh look tomorrow will show me the error of my ways. Suggestions appreciated.

Nathan

Replies are listed 'Best First'.
Re^3: More on OLE from Perl
by Mr. Muskrat (Canon) on Jun 15, 2004 at 03:44 UTC
    It looks like all you need is $HALi->Init();. The extra ->{HALi} wasn't in the VB snippet you provided.