asp利用fso实现文件的移动function movefiles(sFolder,dFolder) on error resume next dim fso set fso = server.createobject(“scr ipting.filesystemobject”) if fso.folderexists(server.mappath(sFolder)) and fso.folderexists(server.mappath(dFolder)) th
代码如下:<% Function CopyMyFolder(FolderName,FolderPath) sFolder=server.mappath(FolderName) oFolder=server.mappath(FolderPath) set fso=server.createobject(“scr ipting.filesystemobject”) if fso.folderexists(server.mappath(FolderName)) Then’检查原文件夹是否存在