您可以通过使用Microsoft Windows提供的标准“传真”驱动程序以编程方式将Word文档转换为TIFF。此工作的关键是确保OutputFileName具有“.tiff”的扩展名以下是示例代码(VB.net & Word 2010):
Dim objWdDoc As Word.Document
Dim objWord As Word.Application
Dim sDesktop As String = _
Environment.GetEnvironmentVariable("userprofile") & "\Desktop\"
objWord = CreateObject("Word.Application")
objWdDoc = objWord.Documents.Open(sDesktop & "testdocument.doc")
objWord.Visible = True
'Select Printer
objWord.ActivePrinter = "Fax"
'Print to Tiff
objWdDoc.PrintOut(Range:=WdPrintOutRange.wdPrintAllDocument, _
OutputFileName:=sDesktop & "test.tiff", _
Item:=WdPrintOutItem.wdPrintDocumentContent, _
PrintToFile:=True)
'Close Document
objWdDoc.Close()
'Close Word
objWord.Quit()
'General Cleanup
objWdDoc = Nothing
objWord = Nothing