从VB.NET中的dotx文件生成pdf文件

时间:2019-06-06 10:11:34

标签: vb.net pdf-generation office-interop

我可以使用vb.net从dotx文件创建docx文件。但是,我需要此dotx文件模板中的pdf文件。我试图通过将MS Office Word保存为pdf来从MS Office Word创建pdf文件,希望通过在vb.net中进行编码也可以做到这一点

Imports Word = Microsoft.Office.Interop.Word

Public Class frmWordTemplate
    Private wdApp As Word.Application
    Private wdDocs As Word.Documents
    Const sPath As String = "D:\"
    Private sFileName As String

    Private Sub btnCreate_Click(sender As Object, e As EventArgs) Handles btnCreate.Click

        sFileName = "export-file"

        wdApp = New Word.Application

        wdDocs = wdApp.Documents

        Dim wdDoc As Word.Document = wdDocs.Add(sPath & "template_sample.dotx")
        Dim wdBooks As Word.Bookmarks = wdDoc.Bookmarks

        wdBooks("bkClient_name").Range.Text = txtClient.Text.ToString
        wdBooks("bkDate").Range.Text = dtpDate.Text.ToString


        wdDoc.SaveAs2(sPath & sFileName & ".docx")

        ReleaseObject(wdBooks)
        wdDoc.Close(False)
        ReleaseObject(wdDoc)
        ReleaseObject(wdDocs)
        wdApp.Quit()

1 个答案:

答案 0 :(得分:1)

在保存中添加文件格式

wdDoc.SaveAs2(sPath & sFileName & ".pdf", Word.WdSaveFormat.wdFormatPDF)

工作完成!