> >
> > Hi,
> >
> > I want to write
> > use Win32::OLE::Const 'Microsoft PowerPoint';
> > instead of
> > use Win32::OLE::Const Microsoft PowerPoint 9.0 Object Library';
> >
> > ... on one machine the first Notation works correctly on the other machine
> > not, I get
> > an error Message when Loading the TypeLib. Can anyone tell me what do
> > I have to do, so the first on works?
> >
> > Cheers
> > Armin
>
> That's worked for me in the past. What error message do you get?
>
> ###
> ... I got the message Win32::OLE(0.1704): GetOleTypeLibObject() Not a
> Win32::OLE::TypeLib object at C:
> /Perl/site/lib/Win32/OLE/Const.pm line 49.
> ###
>
>
> Perhaps a pointless reminder but the version numbers refer to the
> version of MS Office you're running on the machine.
>
> There's probably a better way to determine the Office version that a
> machine is running but I have used the following successfully:
>
> sub _DetermineExcelVersion
> {
> for ( 7 .. 15 )
> {
> my $office_path =
> $Registry->{
> "HKEY_LOCAL_MACHINE|Software|Microsoft|Office|$_.0|Excel|InstallRoot|Path"
> };
>
> if ( defined $office_path and -e "$office_path/EXCEL.exe" )
> {
> return $_;
> }
> }
>
> die "Excel not found on '$ENV{COMPUTERNAME}!'";
> }
> ###
> this is a nice way but it doesn't help me in my Skript.
> Because I want to run the same skript on different machines.
> So actually on both machines is the Version 9.0 of the Object Library.
> But on the on machine it isn't necessary to specify the Version Number.
> I thought there would be a pointer/overall-class-name in the registry
> which is refering to the actuall/highest version of the installed
> library. And it would be nice if I could have the same installation
> on the other machine, So I would not have to care about which version
> installed.
> ####
>
>
>
>
> HTH,
>
> Just in
I'd say that something's gone and corrupted the Office installation on
that particular machine - perhaps you can undo some recent of the
recent automatic updates. Or even reinstall Office?
Just in
_______________________________________________
Perl-Win32-Users mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
