set oFso=ServerCreateObject("ScriptingFileSystemObject")
sPath=ServerMapPath(S_UploadDir&"/"&Year(Now())&"-"&Month(Now())&"-"&Day(Now()))
if oFsoFolderExists(sPath)=false then
call oFsoCreateFolder(sPath)
end if
oFileSaveToFile sPath&"/"&sSaveFileName
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)