Re: Re: Microsoft PowerPoint 9.0 Object Library
> >
> > 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
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Antwort: Re: Microsoft PowerPoint 9.0 Object Library
Hi,
see annotations below,
Cheers,
Armin
Armin Nolte
Database-Marketing
Deutsche Behindertenhilfe -
Aktion Mensch e.V.
Heinemannstr. 36
53175 Bonn
Tel.: 0228-2092-233
Fax: 0228-2092-222
www.aktion-mensch.de
Justin Allegakoen
Gesendet von: perl-win32-users-boun...@listserv.activestate.com
30.09.2009 02:11
An
armin.no...@aktion-mensch.de
Kopie
perl-win32-users@listserv.activestate.com
Thema
Re: Microsoft PowerPoint 9.0 Object Library
2009/9/29 :
>
> 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
___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
http://www.aktion-mensch.de
Vereinsname: Deutsche Behindertenhilfe - Aktion Mensch e. V.
Vereinssitz: Mainz
Registergericht: AG Mainz, Vereinsregister VR 902, Vorstände: Armin von Buttlar
und Martin Georgi
Vorsitzender des Aufsichtsrats: Markus Schächter
Der Inhalt dieser E-Mail (einschließlich etwaiger beigefügter Dateien) ist
vertraulich und nur für den Empfänger bestimmt. Sollten Sie nicht der
bestimmungsgemäße Empfänger sein, ist Ihnen jegliche Offenlegung,
Vervielfältigung, Weitergabe oder Nutzung des Inhalts untersagt. Bitte
informieren Sie in diesem Fall unverzüglich den Absender und löschen Sie die
E-Mail (einschließlich etwaiger beigefügter Dateien) von Ihrem System. Vielen
Dank.
The contents of this e-mail (including any attachments) are confidential and
may be legally privileged. If you are not the intended recipient of this
e-mail, any disclosure, copying, distribution or use of its contents is
strictly prohibited, and you should please notify the sender immediately and
then delete it (including any attachments) from your system. Thank you.
___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Microsoft PowerPoint 9.0 Object Library
2009/9/29 :
>
> 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?
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}!'";
}
HTH,
Just in
___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
