use strict; use Win32::OLE qw(in with); use Win32::OLE::Const 'Microsoft PowerPoint'; #Must Be capitalized to load constants--^ my $PptApp = Win32::OLE->GetActiveObject('PowerPoint.Application')|| Win32::OLE->new('PowerPoint.Application', 'Quit'); $PptApp->{Visible} = 1; my $Presentation = $PptApp->Presentations->Open({FileName=>'<SOMEFIL +ENAME>',ReadOnly=>1});
Now, please notice that the constants line REQUIRES you to use a capital, but the GetActiveObject and new do not necessarily require capitalization.
I have a sinking suspicion your problem lies in how you utilizied Open.
Hope this helps.
Quick Note: Also, you can't pass True, It's a type mismatch (You gotta flip the bool bit with an integer, which is different than flipping the bozo bit, but sometimes, not by much)
C-.
In reply to Re: Powerpoint OLE
by cacharbe
in thread Powerpoint OLE
by smithwt
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |