复制代码 代码如下:
%
Function CopyMyFolder(FolderName,FolderPath)
sFolder=server.mappath(FolderName)
oFolder=server.mappath(FolderPath)
set fso=server.createobject("scripting.filesystemobject")
if fso.folderexists(server.mappath(FolderName)) Then'检查原文件夹是否存在
if fso.folderexists(server.mappath(FolderPath)) Then'检查目标文件夹是否存在
fso.copyfolder sFolder,oFolder
Else '目标文件夹如果不存在就创建
CreateNewFolder = Server.Mappath(FolderPath)
fso.CreateFolder(CreateNewFolder)
fso.copyfolder sFolder,oFolder
End if
CopyMyFolder="复制文件夹["server.mappath(FolderName)"]到["server.mappath(FolderPath)"]成功!"
Else
CopyMyFolder="错误,原文件夹["sFolde"]不存在!"
End If
set fso=nothing
End Function
FolderName="2006" '原文件夹
FolderPath="2008" '目标文件夹
response.write""CopyMyFolder(FolderName,FolderPath)"" '复制文件夹2006下的所有内容到2008文件夹下并返回结果
%>
您可能感兴趣的文章:- PHP文件及文件夹操作之创建、删除、移动、复制
- PHP创建/删除/复制文件夹、文件
- C#程序中创建、复制、移动、删除文件或文件夹的示例
- PHP实现递归复制整个文件夹的类实例
- C#实现复制文件夹中文件到另一个文件夹的方法
- C#将文件复制到指定文件夹并整理
- .NET创建、删除、复制文件夹及其子文件的实例方法
- C# 对文件与文件夹的操作包括删除、移动与复制
- PHP操作文件类的函数代码（文件和文件夹创建，复制，移动和删除）
- 实现文件和文件夹的复制的方法
