Dim wfrPdf As WfrCom_PdfServer.CtrlObject 'PDF Serverのオブジェクトを作成 wfrPdf = CreateObject("Wfr.PdfServer.3") 'テンプレートの読み込み wfrPdf.LoadTemplate("c:\sample\template.txt") 'PDFへの出力 wfrPdf.PdfOut("c:\out\sample.pdf", "PdfUser=test;PdfOwner=owner;PdfPermissions=PrintHigh,Copy,Accessibility") 'オブジェクトの破棄 System.Runtime.InteropServices.Marshal.ReleaseComObject(wfrPdf)