主题：[求助]开发版中导出功能可以实现，但是发布项目后再导出出现报错，代码如下

附上代码：

Dim dlg As New SaveFileDialog '定义一个新的SaveFileDialog
dlg.Filter= "Excel文件|*.xlsx" '设置筛选器 Excel文件|*.xls|Word文件|*.doc
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
    Dim Book As New XLS.Book(ProjectPath & "Publish\事业部日报表.xlsx")
MessageBox.show(ProjectPath)
    Dim fl As String = dlg.FileName  ''''ProjectPath & "Reports\物料信息表.xlsx"
    Book.Build() '生成细节区
    'Book.Sheets(0).Rows.RemoveAt(0) '删除第一行,Excel报表的第一行通常是标记行
    Book.Save(fl) '保存工作簿
    Dim Proc As New Process '打开工作簿
    Proc.File = fl
    Proc.Start()
End If