- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]关于自动生成Excel报表错误。 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=43856)
-- 发布时间：2013/12/17 15:16:00
-- [求助]关于自动生成Excel报表错误。
按钮代码如下：
Dim Book As New XLS.Book(ProjectPath & "Attachments\\平张排单信息.xls")
Dim fl As String = ProjectPath & "Reports\\平张排单信息.xls"
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()
错误代码如下：
此主题相关图片如下：qq图片20131217151341.jpg
-- 发布时间：2013/12/17 15:20:00
--
很可能文件不存在，你把代码改为：
If Filesys.FileExists(ProjectPath & "Attachments\\平张排单信息.xls") =False Then
MessageBox.show("文件不存在")
Else
MessageBox.show("狐狸爸爸眼花了,文件是存在的")
End If
Dim Book As New XLS.Book(ProjectPath & "Attachments\\平张排单信息.xls")
Dim fl As String = ProjectPath & "Reports\\平张排单信息.xls"
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()
-- 发布时间：2013/12/17 15:21:00
--
模版一定要事先复制到Attachments目录哦
-- 发布时间：2013/12/17 15:21:00
--
代码看起来没有问题啊, 做个例子发上来看看. 是否你没有安装OFFICE啊?
-- 发布时间：2013/12/27 17:28:00
--
我也遇到同样的问题,完全卸载office都没用,经过一个下午的检查,发现问题出在模板上,模板明明存在,但是 Filesys.FileExists(ProjectPath & "Attachments\\模板.xls") =False 提示 文件不存在
无计可施,我拷了几个旧项目的软件模板过去,它突然就认了,再把旧模板删除只剩一个新模板,也没问题了,百思不得其解
-- 发布时间：2013/12/27 18:21:00
--
找到原因了,确实是模板的问题,当出现错误提示的时候,模板就已经损坏了,虽然可以打开,但是ft读不出它,只能删除模板新建一个