fso实现将整个文件夹复制到另一个文件夹中

这里是将c:\test文件夹复制到D:\test里面去，在实际使用中，请通过server.mappath来将相对路径转为绝对路径。
<
%
Set objFSO = Server.CreateObject("
Scripting.FileSystemObjectwsd"
)
sPh = "
C:\test"

tPh = "
D:\test"

If objFSO.FolderExists(sPh) Then
 
 
 
objFSO.CopyFolder sPh, tPh
Else
 
 
 
Response.Write "
源文件夹不存在，无法复制！"

End If
Set objFSO = Nothing
%>