代码如下:TempSource,TempEnd必须用绝对路径 rootPath=Request.ServerVariables(“APPL_PHYSICAL_PATH”) ‘获取当前程序绝对路径 Function CopyFiles(TempSource,TempEnd) Dim FSO Set FSO = Server.CreateObject(“Scripting.FileSystemObject”) IF FSO.FileExists(TempEnd) then Response.Write “目标备份文件 ” & TempEnd & “ 已