对文件夹操作2

80酷酷网    80kuku.com

  对文件的操作--建立移动删除文件夹
对文件夹的建立
<%
dim objfso
set objfso=server.createobject("scripting,filesystemobject")
objfso.createfolder(server.mappath("\c:\newfolder"))
response.write"新文件夹的实际路为"&server.mappath("\C:\newfolder")
set objfso=nothing
%>
对文件夹的移动
<%
dim objfso
set objfso=server.createobject("scripting,filesystemobject")
if objfso.folderExists(server.mappath("\folder1")) then
objfso.moveFolder.server.mappath("\folder1"),server.mappath("c:\folder2")
else
response.write"floder1文件夹不存在无法移动"
end if
set objfso=nothing
%>

对文件夹的删除
<
dim objfso
set objfso=server.createobject("scripting,filesystemobject")
if objfso.folderExists(server.mappath("\folder1")) then
objfso.deletefolder server.mappath("\folder1")
else
response.write"文件夹不存在,无法删除"
end if
set objfso=nothing
>

分享到
  • 微信分享
  • 新浪微博
  • QQ好友
  • QQ空间
点击: