asp删除指定文件夹下的指定文件
文件夹pic_1下有1.xls和1.xls,要求能删除指定的1.xls或1.xls文件,下列代码只能清空文件夹,不能指定删除某一文件,代码如何改,先谢了.<%dimpat...
文件夹pic_1下有1.xls和1.xls,要求能删除指定的1.xls或1.xls文件,下列代码只能清空文件夹,不能指定删除某一文件,代码如何改,先谢了.
<%
dim path
Sub EmptyFolder(filespec)
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFolder(filespec)
fso.CreateFolder(filespec)
End Sub
path=server.MapPath("/pic_1")
Emptyfolder(path)
%> 展开
<%
dim path
Sub EmptyFolder(filespec)
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFolder(filespec)
fso.CreateFolder(filespec)
End Sub
path=server.MapPath("/pic_1")
Emptyfolder(path)
%> 展开
3个回答
展开全部
ASP删除文件,必须要使用服务器的FileSystemObject对象
1、创建删除文件函数:
'删除文件(适合所有文件)
Function Deltextfile(fileurl)'参数为相对路径
Set objFSO = CreateObject("Scripting.FileSystemObject")
fileurl = Server.MapPath(fileurl)
if objFSO.FileExists(fileurl) then '检查文件是否存在
objFSO.DeleteFile(fileurl)
end if
Set objFSO = nothing
End Function
2、调用删除文件函数:
'删除网站根目录下的a.txt文件
Deltextfile "\a.txt"
展开全部
这二个方法你要区分一下
fso.DeleteFolder 删除文件夹
fso.DeleteFile 删除文件
ex: fso.DeleteFile(Server.mappath(filepath))
希望对你有帮助!
fso.DeleteFolder 删除文件夹
fso.DeleteFile 删除文件
ex: fso.DeleteFile(Server.mappath(filepath))
希望对你有帮助!
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
xdim path
Sub EmptyFolder(filespec)
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFile(Server.mappath(filespec))
End Sub
path=server.MapPath("/pic_1/1.xls")
Emptyfolder(path)
Sub EmptyFolder(filespec)
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFile(Server.mappath(filespec))
End Sub
path=server.MapPath("/pic_1/1.xls")
Emptyfolder(path)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |