| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]怎么报错？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=81150) |
|
| -- 作者：zgjmost -- 发布时间：2016/2/19 13:49:00 -- [求助]怎么报错？ Dim Book1 As New XLS.Book(ProjectPath & "Attachments\\分数表.xls") Dim t1 As Date = Date.Now Dim fl As String = ProjectPath & "Reports\\ & 分数表 & " t1.Date " & " t1.Minute " & " .xls" |
|
| -- 作者：zgjmost -- 发布时间：2016/2/19 13:50:00 -- 分数表后要报生成报表的年月日小时分秒加上去，怎么弄？ |
|
| -- 作者：iliksou -- 发布时间：2016/2/19 13:53:00 -- Dim fl As String = ProjectPath & "Reports\\“ & ”分数表“ & t1.Date & t1.Minute & " .xls" |
|
| -- 作者：iliksou -- 发布时间：2016/2/19 13:56:00 -- ”分数表“ & Cstr(Date.now).replace(" ","").replace(":","").replace("-","") & " .xls" |
|
| -- 作者：zgjmost -- 发布时间：2016/2/19 13:57:00 -- 不对，这个会建新的一层一层的文件夹 我要的效果是在Reports下直接建一个文件 分数表20160219135505.xls
|
|
| -- 作者：iliksou -- 发布时间：2016/2/19 13:59:00 --
|
|
| -- 作者：zgjmost -- 发布时间：2016/2/19 14:08:00 -- Dim fl As String = ProjectPath & "Reports\\" & "分数表" & Cstr(Date.now).replace(" ","").replace(":","").replace("-","") & " .xls" 还是建了文件夹？ |
|
| -- 作者：iliksou -- 发布时间：2016/2/19 14:13:00 -- 这个和你的时间格式设置有关，你的时间设置是用 \\ 分隔的，我的是用 - 分隔的 稳妥的方式
Dim t As Date t=Date.now Dim fl As String = ProjectPath & "Reports\\“ & "分数表" & t.Year & t.Month & t.Day & t.Hour & t.Minute & t.Second & “.xls" [此贴子已经被作者于2016/2/19 14:15:32编辑过]
|
|
| -- 作者：大红袍 -- 发布时间：2016/2/20 0:31:00 -- Dim t1 As Date = Date.Now Dim fl As String = ProjectPath & "Reports\\分数表" & format(t1, "yyyyMMddHHmmss") & ".xls"
|