如何解决无法在服务器 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 举报,一经查实,本站将立刻删除。