ASP 中,如何用代码将一目录下的文件,转移到另一目录下!要:详细代码,谢谢!! 在ASP网站中!!
ASP中,如何用代码将一目录下的文件,转移到另一目录下!要:详细代码,谢谢!!在ASP网站中!!如果我要求移到一个已知文件名的文件,如何移到!...
ASP 中,如何用代码将一目录下的文件,转移到另一目录下!要:详细代码,谢谢!!
在ASP网站中!!
如果我要求移到一个已知文件名的文件,如何移到! 展开
在ASP网站中!!
如果我要求移到一个已知文件名的文件,如何移到! 展开
2个回答
展开全部
<%
Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
file1 = server.MapPath("zip") '和当前的asp文件同级
file2 = server.MapPath("files\")
response.Write(file1 & "<br />")
response.Write(file2 & "<hr />")
fso.MoveFolder file1,file2&"\" '注释:把zip文件夹复制到files
response.Write("移动成功")
set fso = nothing
%>
以下是解释-------------------------------------------------
将一个或多个文件夹从某位置移动到另一位置。
object.MoveFolder source, destination
参数
object
必选项。应为 FileSystemObject 的名称。
source
必选项。要移动的文件夹的路径。source 参数字符串仅可在路径的最后一个组成部分中包含通配符。
destination
必选项。指定路径,表示要将文件夹移动到该目标位置。destination 参数不能包含通配符。
Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
file1 = server.MapPath("zip") '和当前的asp文件同级
file2 = server.MapPath("files\")
response.Write(file1 & "<br />")
response.Write(file2 & "<hr />")
fso.MoveFolder file1,file2&"\" '注释:把zip文件夹复制到files
response.Write("移动成功")
set fso = nothing
%>
以下是解释-------------------------------------------------
将一个或多个文件夹从某位置移动到另一位置。
object.MoveFolder source, destination
参数
object
必选项。应为 FileSystemObject 的名称。
source
必选项。要移动的文件夹的路径。source 参数字符串仅可在路径的最后一个组成部分中包含通配符。
destination
必选项。指定路径,表示要将文件夹移动到该目标位置。destination 参数不能包含通配符。
展开全部
<%
filename = Server.MapPath("/OldFilePath")
bkfilename = Server.MapPath("/NewFilePath")
Set fso = Server.CreateObject("Scripting.FileSystemObject")
'如果已经存在,为避免出错,先删除原来的
If fso.FileExists(bkfilename) = True Then
fso.DeleteFile bkfilename
End If
'复制
fso.CopyFile filename,bkfilename
Set fso = Nothing
%>
filename = Server.MapPath("/OldFilePath")
bkfilename = Server.MapPath("/NewFilePath")
Set fso = Server.CreateObject("Scripting.FileSystemObject")
'如果已经存在,为避免出错,先删除原来的
If fso.FileExists(bkfilename) = True Then
fso.DeleteFile bkfilename
End If
'复制
fso.CopyFile filename,bkfilename
Set fso = Nothing
%>
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询