最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
asp fso创建文件夹
时间:2022-07-02 22:44:24 编辑:袖梨 来源:一聚教程网
Function CreatePath(fromPath)
Dim objFSO, uploadpath
uploadpath = Year(Now) & "-" & Month(Now) '以年月创建上传文件夹,格式:2003-8
On Error Resume Next
Set objFSO = CreateObject(Newasp.FSO_ScriptName)
If objFSO.FolderExists(Server.MapPath(fromPath & uploadpath)) = False Then
objFSO.CreateFolder Server.MapPath(fromPath & uploadpath)
End If
If Err.Number = 0 Then
CreatePath = uploadpath & "/"
Else
CreatePath = ""
End If
Set objFSO = Nothing
End Function
相关文章
- 无期迷途局长长阶怎么样 无期迷途局长装束长阶介绍 11-25
- 重返未来1999J什么时候up 重返未来晴日决胜局卡池活动介绍 11-25
- 时空中的绘旅人罗夏妄语怎么样 11-25
- 重返未来1999J什么时候up 11-25
- 无期迷途哈梅尔依偎涟漪怎么样 四星装束哈梅尔依偎涟漪介绍 11-25
- 剑与远征折翼苍空攻略 剑与远征奇境探险折翼苍空怎么过 11-25