主页

如何创建年月201008这个文件夹？

chong6 2010-08-07 07:05:44

就是要创建年和月为名称的文件夹，得如何写？

...全文

6 条回复

切换为时间正序

请发表友善的回复…

发表回复

ChinaXtHuLang 2010-08-08

[Quote=引用 3 楼 hookee 的回复:]

VBScript code

<%
d = Now()
y = Year(Now)
m = Right("0" & Month(Now), 2)
Set fso = CreateObject("Scripting.FileSystemObject")
dir = "c:\" & y & m & "\"
If Not fso.FolderExists(dir) T……
[/Quote]
GOOD

回复赞

chong6 2010-08-08

<%
d = Now()
y = Year(Now)
m = Right("0" & Month(Now), 2)

folder = ""&y&""&m&""
set fso = server.CreateObject("scripting.filesystemobject")
fso.createfolder(server.MapPath(".\"&folder&""))
response.Write("文件夹创建成功")
%>
这个成功！

回复赞

chong6 2010-08-08

3楼，是绝对路径啊！
相对路径失效~~说权限不足！

回复赞

hookee 2010-08-07



<%

d = Now()

y = Year(Now)

m = Right("0" & Month(Now), 2)

Set fso = CreateObject("Scripting.FileSystemObject")

dir = "c:\" & y & m & "\"

If Not fso.FolderExists(dir) Then

	fso.CreateFolder dir

End If

Set fso = Nothing

%>