.net - .MSGをPDFに印刷する方法

Question

1000通のメール（.msg形式）があり、それらをPDFファイルに変換したいと思います。
.MSGファイルの読み取りはすでにここで求められています。

しかし、私にとっての問題は、「ファイル->印刷」から行うのと同じように.msgメールを印刷することです。

.msgメールをPDFに印刷する簡単な方法はありますか？

Answer 1

各メッセージを手動で印刷するのではなく、プログラミング言語でソリューションを実装する場合は、Aspose.NetworkおよびAspose.Wordsfor.NETコンポーネントの使用を検討してください。それらは連携してMSGファイルをPDFに変換します。

1. MSGをロードしてMHTML形式で保存するためのAspose.Networkfor.NET
2. Aspose.Words for .NETは、MHTMLをロードし、PDFまたはその他のサポートされている形式を生成します。

このページのサンプルコードをご覧ください。MSGからTIFFまで実行しますが、PDF、DOC、DOCXなどのサポートされている形式を少し変更して指定することができます。

Answer 2

    Dim objItem, objFSO, strFile, input, fileExt, strHtml, strPdf, msg,    wordDoc, wordApp, tempFileFolder

    Const olFormatHTML = 5
    Const wdFormatPDF = 17


    input = Wscript.Arguments(0)

    ' Create a File System object
    Set objFSO = CreateObject( "Scripting.FileSystemObject" )

     ' Check if the Word document exists
    If objFSO.FileExists(input) Then
        Set objItem = objFSO.GetFile(input)
        strFile = objItem.Path  
    Else
        WScript.Echo "FILE OPEN ERROR: The file does not exist" & vbCrLf
        WScript.Quit
    End If

    fileExt = Right(strFile,3)

    If fileExt <> "msg" Then
        WScript.Echo "FILE ERROR: The file extension is not .msg" & vbCrLf
        WScript.Quit
    End If

    strHtml = objItem.Path + ".html"
    strPdf = objItem.Path + ".pdf"

    Set Outlook = CreateObject("Outlook.Application")
    Set msg = Outlook.CreateItemFromTemplate(objItem.Path) 
    msg.SaveAs strHtml, olFormatHTML
    Outlook.Quit

    Set wordApp = CreateObject( "Word.Application" )    
    wordApp.Documents.Open strHtml
    Set wordDoc = wordApp.ActiveDocument
    wordDoc.SaveAs strPdf, wdFormatPDF
    wordDoc.Close
    wordApp.Quit


    If objFSO.FileExists(strHtml) Then
        objFSO.DeleteFile(strHtml)
    End If

    tempFileFolder = objItem.Path & "_files"
    If objFSO.FolderExists(tempFileFolder) Then
        objFSO.DeleteFolder(tempFileFolder)
    End If

Answer 3

MsgViewerProのようなアプリケーションを使用できます。

おそらくバッチモードで使用できる「コマンドラインからの印刷」機能があります。

注：私はこのビューアを使用しませんでしたが、それは良い提案かもしれないと思いました。