以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  文件名的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=52133)
--  作者：498350800
--  发布时间：2014/6/9 23:17:00
--  文件名的问题

小白一个，求指点

 

比如我要生成文件，命名的时候我要生成“文件20140501_20140515.txt”    “文件20140515.txt”，这两个文件名要怎么写

 

FileSys.CopyFile("d:\\data\\文件.csv", "d:\\data\\文件20140501_20140515.txt",True)，比如这样20140501可能一月变一次，20140515每天变，不会写了
--  作者：Bin
--  发布时间：2014/6/10 8:42:00
--  
Dim s1 As String = format(new Date(Date.Today.Year,Date.Today.Month,1),"yyyyMMdd")
Dim s2 As String = format(Date.today,"yyyyMMdd")

FileSys.CopyFile("d:\\data\\文件.csv", "d:\\data\\" & s1 & "_" & s2 & ".txt",True)
--  作者：498350800
--  发布时间：2014/6/10 20:52:00
--  
以下是引用Bin在2014-6-10 8:42:00的发言：
Dim s1 As String = format(new Date(Date.Today.Year,Date.Today.Month,1),"yyyyMMdd")
Dim s2 As String = format(Date.today,"yyyyMMdd")

FileSys.CopyFile("d:\\data\\文件.csv", "d:\\data\\" & s1 & "_" & s2 & ".txt",True)

谢谢老师，我试试