以文本方式查看主题

-  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=91392)
--  作者：mamuaiqing
--  发布时间：2016/10/9 23:48:00
--  Excel报表

Excel报表当中保存工作薄路径代码如下

Dim khmc As String = "张三"

Dim rq1 As Date = #01/01/2016#

Dim rq2 As Date = #02/02/2016#

khmc = khmc & rq1 & "至" & rq2 & "对账单.xls"
Book.Save(ProjectPath & "对账单\\" & khmc)

 

在XP系统生成的文件名为"张三2016-01-01至2016-02-02对账单.xls",这个正常

WIN7系统生成的文件名为:对账单\\张三\\2016\\01\\01\\2016\\02\\02\\对账单.xls,文件名为"对账单.xls",其它的变为路径了,请教老师怎么回事
--  作者：有点蓝
--  发布时间：2016/10/10 9:48:00
--  
khmc = khmc & Format(rq1,"yyyy-MM-dd") & "至" & Format(rq2,"yyyy-MM-dd") & "对账单.xls"

不同系统默认日期格式不一样