以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=67023)

--  作者:老奤
--  发布时间:2015/4/17 17:25:00
--  [求助]
在菜单中设置了一个按钮,想实现像传统菜单里的 生成excel报表 中的特定表的功能,如何写事件代码? 模板等都做好了,在传统界面中可以正常生成excel表。模板文件在默认目录Attachments,生成的文件也在默认目录Reports,比如我的一个报表文件叫    模板叫  模板_已完成安置明细表.xls  生成的文件叫 已完成安置明细表.xls,我是菜鸟不懂变成,请高手写一下,我复制,谢谢了!

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()

看到帮助里是这样的代码,还有哪里需要改?
[此贴子已经被作者于2015/4/17 17:44:04编辑过]

--  作者:Bin
--  发布时间:2015/4/17 17:28:00
--  
http://www.foxtable.com/help/topics/1145.htm