Я работаю над приложением, которое автоматически генерирует факсы.
Система использует взаимодействие слов, чтобы заполнить файл шаблона .doc значениями (что работает нормально), но когда приходит время печатать полученный файл в pcl, у меня возникают проблемы.
Итак, у нас есть принтер HP Laserjet, который печатает файлы .pcl.
Dim appWord As New Word.Application
Dim doc As New Word.Document
appWord.ActivePrinter = PCL_PRINTER
doc = appWord.Documents.Open(APPLICATION_DIR & "LTL_" & n.Language & ".doc")
... (заполните файл значениями)
outFile = APPLICATION_DIR & "Faxout\DROPDIR\" & n.Order & ".pcl"
doc.PrintOut(True, True, , outFile, , , , , , , True)
'cleanup...
Проблема в том, что когда запускается строка doc.PrintOut, слово жалуется, выскакивая сообщение:
Я пробовал всевозможные комбинации вещей, но сообщение об ошибке сохраняется. Очень редко эта штука на самом деле работает и генерирует пригодный для использования файл pcl, но в 98% случаев появляется сообщение об ошибке, и весь процесс останавливается.
У нас есть другие приложения на том же сервере, которые делают почти то же самое, за исключением того, что они печатают из Excel вместо слова, и они работают без выдачи ошибки.
Может кто-нибудь помочь?