以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  自动存储不同的文件名  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=32577)
--  作者：wd9471
--  发布时间：2013/5/4 12:57:00
--  自动存储不同的文件名

Dim Book As New XLS.Book(ProjectPath & "Attachments\\死亡.xls")
Dim fl As String = ProjectPath & "2013.4.xls"
Book.Build()
Book.Save(fl)
Dim Proc As New Process
Proc.File = fl
Proc.Start()

 

 

请问怎么把2013.4.xls的文件名随时间的变化而变化。也就是每次报表都有不同的文件名。比如2013.5.xls、2013.6.xls、2013.7.xls等
--  作者：don
--  发布时间：2013/5/4 13:49:00
--  
Dim Book As New XLS.Book(ProjectPath & "Attachments\\死亡.xls")
Dim fl As String = ProjectPath & Format(Today,"yyyy.M") & ".xls"
Book.Build()
Book.Save(fl)
Dim Proc As New Process
Proc.File = fl
Proc.Start()