michael higgins wrote:
John Deretich wrote:
Hi, does anyone know
how to insert proper page breaks
using OLE?
I am trying to insert a perl created report into a microsoft
word document to get the proper page
breaks, and
then print the report. Any thoughts?
This too... here's a snip that purports to print the document
use strict;
use Win32::OLE;
use Win32::OLE::Const 'Microsoft Word';
my $Word = Win32::OLE->new('Word.Application'); #, 'Quit'
$Word->{'Visible'} = 1; # if you want to see what's going on
$Word->Documents->Open("C:\\WINDOWS\\DESKTOP\\screenlayouts.doc")
|| die("Unable to open document ", Win32::OLE->LastError());
$Word->ActiveDocument->PrintOut({
Background => 0,
Append => 0,
Range => wdPrintAllDocument,
Item => wdPrintDocumentContent,
Copies => 1,
PageType => wdPrintAllPages,
});
-- MRH
^ ^
<-|->
(.)__ the world is a big box of paints.
__ __ and others, the canvas we're dealt.
| | - XTC
_/ \_
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
