Opened by Kristop8 at 2005-12-23 11:45
User since
2005-10-06
22 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2005-10-06
22 Artikel
BenutzerIn
Hallo Leute,
Win32::OLE erscheint mir wirklich der sinnvollere Weg zu sein...
könnt Ihr mir vielleicht sagen warum folgender Code nicht funz... sondern eine Fehlermeldung bringt.
die Fehlermedlung lautet:
Danke lg Chris
Win32::OLE erscheint mir wirklich der sinnvollere Weg zu sein...
könnt Ihr mir vielleicht sagen warum folgender Code nicht funz... sondern eine Fehlermeldung bringt.
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
use strict;
use Win32::OLE qw(in with);
use Win32::OLE::Const 'Microsoft PowerPoint';
$Win32::OLE::Warn = 2; # Throw Errors, I'll catch them
my $PptApp = Win32::OLE->GetActiveObject('PowerPoint.Application')||
+Win32::OLE->new('PowerPoint.Application', 'Quit');
$PptApp->{Visible} = 1;
my $Presentation = $PptApp->Presentations->Open({FileName=>'test.ppt'});
die Fehlermedlung lautet:
QuoteOLE exception from "Microsoft PowerPoint 2000";
PowerPoint coud not open the file.
Win32::OLE(0.1403) error 0x80004005: "Unbekannter Fehler" in METHOD/PROPERTYGET "Open" at ... line 10
Danke lg Chris