Re: How print doc files in a row

[moklevat]

in reply to How print doc files in a row

It may depend on how you are invoking Word. It looks like the following command line switches should work:

"c:\program files\microsoft office\office11\winword.exe" "c:\perl\test.doc" /q /n /mFilePrintDefault /mFileExit

Without seeing your code and a better description of what happens, this is the best I can do.

[xiaoyafeng]

Thanks!!;
below is my snippet:

my $dir;
opendir ($dir, ".") or die "error!\n";

for my $file_name (readdir $dir) {
    next if $file_name =~ m/^\./;
    system("c:\\program\ files\\microsoft\ office\\office10\\winword.e
+xe", "$file_name", "/q", "/n", "/mFilePrintDefault", "/mFileExit");
    sleep 10;
}

[cdarke]

Not sure if that was a typo, but you have some back-slashes missing from your system call, should be:

system("c:\\program\\files\\microsoft\\office\\office10\\winword.exe",
+ "$file_name", "/q", "/n", "/mFilePrintDefault", "/mFileExit");

One option to stop the windows showing is to run the program with the C API CreateProcess and set the SW_HIDE attribute to the main Window, unfortunately it looks like Win32::Process does not support that.:(

[ikegami]

No, he's trying to escaping spaces. Rather silly, though, since "\ " is the same thing as " ". Good thing, too, since Windows wouldn't understand "\ " to mean space.

If you wanted to hide the Window, you could use Win32::Process's CreateProcess instead of system.