以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教老师,excel生成的报表文件可以自动保存在相应行的附件中吗?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=118440)

--  作者:wakai
--  发布时间:2018/5/2 23:03:00
--  请教老师,excel生成的报表文件可以自动保存在相应行的附件中吗?
请教老师,excel生成的报表文件可以自动保存在相应行的附件中吗?
比如:合同表(有附件列),合同明细表生成EXCEL后,其对应生成的文件会自动保存在合同表的附件中

--  作者:有点甜
--  发布时间:2018/5/2 23:30:00
--  

1、把excel文件生成保存到某个文件夹下(如果是ftp,上传到ftp某个文件夹里)

 

2、给附件列赋值,如 合同编号.xls

 

3、设置附件列的存放目录,即可


--  作者:wakai
--  发布时间:2018/5/8 23:03:00
--  
请教老师,生成代码如下
Dim Book As New XLS.Book(ProjectPath & "templets\\采购订单.xls")
Dim r As Row = e.Form.controls("合同").Table.Current
Dim fl As String = "\\\\192.168.1.18\\$fill$\\CaiGou\\CaiGouDan\\" & r("包材合同编号")& r("简称").replace("*","X")  & "采购单.xls"
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()

在附件中要怎么设置

--  作者:有点蓝
--  发布时间:2018/5/8 23:09:00
--  
参考:http://www.foxtable.com/webhelp/scr/1506.htm


--  作者:wakai
--  发布时间:2018/5/30 22:09:00
--  
蓝老师,是采用局域网的存放模式,用到了上面两个参考帮助
比如编号为20180530的行,通过按钮生成了文件名为20180530瓶子采购单.xls报表,报表存放在\\\\192.168.1.18\\$fill$\\CaiGou\\CaiGouDan\\目录下
现在想实现一功能,在20180530这行的附件列中,能直接找到已生成对应的20180530瓶子采购单.xls,要怎么实现

--  作者:有点甜
--  发布时间:2018/5/30 22:18:00
--  

1、附件列的存放路径,要设置成 \\\\192.168.1.18\\$fill$\\CaiGou\\CaiGouDan

 

2、要合成文件名

 

Dim r As Row = e.Form.controls("合同").Table.Current

r("附件") = r("包材合同编号") & r("简称").replace("*","X")  & "采购单.xls"


--  作者:wakai
--  发布时间:2018/5/30 22:45:00
--  

刚写在AfterLoad不行,改写在生成报表代码后面就可以了

谢谢甜老师