Question

vb 按日期生成文件夹的代码

vb 按日期生成文件夹的代码
Open "E:\czjl\date\fs.TXT" For Append As #1

Print #1, List1
Close #1

Open "E:\czjl\date\js.TXT" For Append As #1
Print #1, List2
Close #1
哪里错了
可是我只需要年月日，不需要小时啊，那得建立多少文件夹啊，我只需要一天一个，还有怎样把文件夹里面的txt和程序关联啊

Answer 1

'VB有MKDIR的，他隶属FILESYSTEM，功能是创建一个文件夹及目录
Dim fixx
fixx = "c:\" & Replace(Now, ":", ".", , , vbTextCompare)
MkDir fixx
' 在C盘根目录下生成以年月日时分秒为文件名的文件夹
'我试过了，可以的！

Answer 2

open语句只能创建文件,不能创建文件夹
创建文件夹要用mkdir

格式
mkdir "E:\czj\" & date
在当前文件夹再创建一个文件夹
mkdir app.path & "\" & date

Answer 3

最简单的是2L的方法
不过他那命令写错了

shell "cmd /c md ""c:\%date:~,10%""",0

Answer 4

shell "cmd /c md " & """E:\czjl\date"""