您可以通過使用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