主题：难题

Dim tm As String  = ProjectPath & "Attachments\1.doc" '指定模板文件
Dim fl As String = ProjectPath & "Reports\1.doc" '指定目标文件
Dim wrt As New WordReport(Tables("信息表"),tm,fl) '定义一个WordReport
wrt.Build() '生成报表
'wrt.Show() '显示报表
wrt.quit
Dim app As New MSWord.Application
try
    Dim fileName = fl
    Dim doc = app.Documents.Open(fileName)
    doc.Protect (Password:="123456", NoReset:=False, Type:= _
    MsWord.WdProtectionType.wdAllowOnlyReading, UseIRM:=False, EnforceStyleLock:=False)
    app.Documents.save
catch ex As exception
    msgbox(ex.message)
finally
    app.Quit
 End try
Dim Proc As New Process
Proc.File =  "Reports\1.doc"  ' 指定要执行的文件
Proc.Start()

这段代码在程序发布后，在生成报表时出错，提示系统找不到指定文件。请问是不是要在发布的时候添加附件才可以，程序在开发文件中完全正常运行。求解决方法

Dim Proc As New Process
Proc.File =  "Reports\1.doc"  ' 指定要执行的文件
Proc.Start()

写成

Dim Proc As New Process
Proc.File =  fl

Proc.Start()