Jak mogę otworzyć dokument w formacie Word tylko do odczytu z Perla?

Question

Czy istnieje jakakolwiek metoda w Perlu, która pozwoliłaby uzyskać obiekt w trybie tylko do odczytu, , aby uniknąć wyświetlania okna dialogowego, jeśli plik jest zablokowany przez innego użytkownika?

$document = Win32::OLE->GetObject("$docFile") 
    or die "can't open $docFile"; 

Answer 1

To dlatego, że robisz to źle. GetObject po prostu otwiera obiekt z domyślnym zachowaniem. należy utworzyć obiekt Word.Application:

my $word = Win32::OLE->new('Word.Application'); 

Następnie użyj Documents kolekcja Open metodę z parametru nazwanego ReadOnly. Tak:

$doc = $word->Documents->Open({ FileName => $document_path, 
           , ReadOnly => 1 
           }); 

Czytaj http://msdn.microsoft.com/en-us/library/bb216319.aspx dla składni Documents.Open