以下显示,打开存储文件错误,找不到问题所在,请老师帮看看
Dim Book
As New XLS.Book(ProjectPath & "Attachments\变更台账.xls")
Dim fl
As String = ProjectPath & "Reports\变更台账.xls"
book.AddDataTable("变更台账","xlgl","Select
*, (selec t sum(Round(Case When 变更后数量 Is null Then 0 Else 变更后数量 End * Case When 单价
Is null Then 0 Else 单价 End,0) - Round(Case When 变更前数量 Is null Then 0 Else 变更前数量
End * Case When 单价 Is null Then 0 Else 单价 End,0)) fro m {申请费用表} b where a.项目名称=b.项目名称 and a.变更编号=b.
变更编号) As [估计变更金额] fro m {变更申请单} a " &
IIF(DataTables("变更申请单").LoadFilter
> "","
where " & DataTables("变更申请单").LoadFilter,""))
Book.Build()
Book.Save(fl)
Dim Proc As New Process
Proc.File = fl
Proc.Start()
模板
此主题相关图片如下:111.png
