ASP删除记录同时删除图片
Setfs=Server.CreateObject("Scripting.FileSystemObject")fs.deleteFile("images/upfile/2...
Set fs = Server.CreateObject("Scripting.FileSystemObject")
fs.deleteFile("images/upfile/2007062922270245382.jpg")
set fs = nothing
以上代码可以删除图片,但是当没有图片的记录删除时出现“无效的过程调用或参数”,请问如何才能解决,在这里谢了。 展开
fs.deleteFile("images/upfile/2007062922270245382.jpg")
set fs = nothing
以上代码可以删除图片,但是当没有图片的记录删除时出现“无效的过程调用或参数”,请问如何才能解决,在这里谢了。 展开
4个回答
展开全部
要先判断一下文件是否存在。
Set fs = Server.CreateObject("Scripting.FileSystemObject")
If fs.FileExists("images/upfile/2007062922270245382.jpg") Then
fs.deleteFile("images/upfile/2007062922270245382.jpg")
else
response.write "文件不存在"
end if
set fs = nothing
Set fs = Server.CreateObject("Scripting.FileSystemObject")
If fs.FileExists("images/upfile/2007062922270245382.jpg") Then
fs.deleteFile("images/upfile/2007062922270245382.jpg")
else
response.write "文件不存在"
end if
set fs = nothing
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
先判断图片文件是否存在
Set fs = Server.CreateObject("Scripting.FileSystemObject")
If FS.FileExists("images/upfile/2007062922270245382.jpg") Then
fs.deleteFile("images/upfile/2007062922270245382.jpg")
end if
set fs = nothing
Set fs = Server.CreateObject("Scripting.FileSystemObject")
If FS.FileExists("images/upfile/2007062922270245382.jpg") Then
fs.deleteFile("images/upfile/2007062922270245382.jpg")
end if
set fs = nothing
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
逻辑上应该先判断数据库记录存在,如果存在再判断图片是否存在。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
两种方法: 一
tFilePath = "images/upfile/2007062922270245382.jpg"
If tFilePath<>"" Then
Set fs = Server.CreateObject("Scripting.FileSystemObject")
fs.deleteFile(tFilePath)
set fs = nothing
End If
二:
Set fs = Server.CreateObject("Scripting.FileSystemObject")
On Error Resume Next
fs.deleteFile(tFilePath)
Err.Clear
On Error Goto 0
set fs = nothing
tFilePath = "images/upfile/2007062922270245382.jpg"
If tFilePath<>"" Then
Set fs = Server.CreateObject("Scripting.FileSystemObject")
fs.deleteFile(tFilePath)
set fs = nothing
End If
二:
Set fs = Server.CreateObject("Scripting.FileSystemObject")
On Error Resume Next
fs.deleteFile(tFilePath)
Err.Clear
On Error Goto 0
set fs = nothing
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询