Hi,
I am trying the following code :
-------------------------------------
#!/usr/bin/perl
$|++;
use strict;
use warnings qw( all );
use Win32::OLE;
my $doc = 'test.doc';
-r $doc or die "Can't open $doc\n";
my $app = Win32::OLE->GetObject( $doc );
unless (defined $app)
{
print (Win32::OLE->LastError(),"\n") ;
die "open failed $doc ($!)";
}
-------------------------------------------
Although the -r $test passes, I still get this error:
Win32::OLE(0.1403) error 0x80030002: "%1 could not be found" at
I:\sh\perl\proje
ct\test2.pl line 11
eval {...} called at I:\sh\perl\project\test2.pl line 11
Win32::OLE(0.1403) error 0x80030002: "%1 could not be found"
open failed test.doc () at I:\sh\perl\project\test2.pl line 15.
I had similiar error when trying to open a MSProject file too.
Can someone help me ? I have windows 2000 Pro
Thanks
Yossi