Word.Interop 打印到 pcl 文件。

Question

我正在开发一个自动生成传真的应用程序。 系统使用 word interop 用值填充模板 .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 行运行时，word 会抱怨，弹出一条消息：

我尝试了各种组合，但错误消息仍然存在。偶尔，这个东西确实可以工作并生成一个可用的 pcl 文件，但 98% 的情况下，错误消息会弹出，整个过程就会停止。

我们在同一服务器上有其他应用程序，它们执行几乎完全相同的操作，除了它们从 Excel 而不是 Word 打印，并且它们工作时不会抛出错误。

有人可以帮忙吗？

Answer 1

不知道这是否有帮助，但是您的计算机上有防病毒软件吗？如果是这样，您是否尝试禁用它？有时，病毒扫描程序在后台访问文件、阻止访问或删除临时文件时会出现问题。

Answer 2

我刚刚想通了。显然，您必须在尝试写入文件之前创建该文件。

例如：

Dim fs As FileStream
fs = System.IO.File.Create(outFile)
fs.Close()
fs = Nothing
doc.PrintOut(True, True, , outFile, , , , , , , True)

我之前尝试过创建文件，但没有意识到 Create 返回了一个文件流，需要在 word 打印出来之前关闭该文件流。

有没有什么方法可以在 vb.net 中创建一个文件，而不会在带有文件流对象的文件上创建锁定？这个版本可以工作，但最好稍微清理一下代码。