vb.net - 无法在服务器 VB.Net 上打开 Word 模板

Question

我的以下代码在本地运行，我们在服务器上安装了 Microsoft Word。在我的解决方案项目中，我们有一个名为“Patients”的文件夹，在它下面有一个名为“Test1”的单词模板。

     Protected Sub btnPatientDoc_Click(sender As Object, e As EventArgs)

        Dim fLocation = Server.MapPath("~/Patients/Test1.docx")
        
        Dim id As String = Request.QueryString("ID")

        Dim applicationWord = New Microsoft.Office.Interop.Word.Application()

        applicationWord.Visible = True

        Dim doc As Document = applicationWord.Documents.Open(fLocation)

        doc.Activate()


        Dim patientFirstName = (From x In dbo.Patient Where x.ID= id Select x.firstname).FirstOrDefault()

        Dim patientSurnameName = (From x In dbo.Patient Where x.ID = id Select x.lastname).FirstOrDefault()

        doc.Content.Find.Execute("PATIENTS FULL NAME", False, True, False, False, False, True, 1, False, patientFirstName + " " + patientSurnameName, 2,False, False, False, False)

        doc.Content.Find.Execute("Date", False, True, False, False, False, True, 1, False, Today.Date(), 2,False, False, False, False)

End Sub

标签： vb.netms-wordinterop