微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

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

如何解决无法在服务器 VB.Net 上打开 Word 模板

我的以下代码在本地运行,我们在服务器上安装了 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,1,patientFirstName + " " + patientSurnameName,2,False)

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

End Sub

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。