Question

ASP删除数据同时删除文件代码

请帮忙看一下这个代码错在哪里？
<%
if request.querystring("id")="" then
sqlo="select * from myphoto where id="&request.querystring("id")
set rso=server.createobject("adodb.recordset")
rso.open sqlo,conn,1,1
if rso("photo")<>"" then
xxx = rs("photo")
xxx = right(xxx,len(xxx)-15)
aaa = "\image_photo\"
xxx = aaa & xxx
xxx = server.mappath(xxx)
Set fso = Server.CreateObject("Scripting.FileSystemObject")
If fso.FileExists(xxx) Then '判断文件是否存在！
fso.DeleteFile (xxx),true '此处需要服务器支持FSO删除权限!
end if
set fso=nothing
end if
dele="delete from myphoto where id="&request.querystring("id")
conn.execute dele
response.redirect"<a href='?del=<%= rs('id') %>' onclick='return confirm('是否确认删除数据和保存的图片')'>删除</a>"
end if
%>

Answer 1

把详细报错信息发上来，还有你刚开始的判断语句写错了，应该是if request.querystring("id")<>"" then，如果按你写的为空时进行下一步操作的话，下面一行的sqlo="select * from myphoto where id="&request.querystring("id")当request.querystring("id")=""时就会取不到值而 报错，下面取出对应ID的字段后让数据库里的相应字段与文件进行匹配，再删除就可以了！
xxx = rs("photo")
这里应该是
xxx = rso("photo")
response.redirect"<a href='?del=<%= rs('id') %>' onclick='return confirm('是否确认删除数据和保存的图片')'>删除</a>"
这一行没有意义，去掉！

Answer 2

我来回到吧：

<%
if request.querystring("id")<>"" then
sqlo="select * from myphoto where id="&request.querystring("id")
set rso=server.createobject("adodb.recordset")
rso.open sqlo,conn,1,1
if not ( rso.eof or rso.bof ) then
if request.querystring("del")<>"" then
if rso("photo")<>"" then
xxx = rs("photo")
xxx = right(xxx,len(xxx)-15)
aaa = "\image_photo\"
xxx = aaa & xxx
xxx = server.mappath(xxx)

Set fso = Server.CreateObject("Scripting.FileSystemObject")
If fso.FileExists(xxx) Then '判断文件是否存在！
fso.DeleteFile (xxx),true '此处需要服务器支持FSO删除权限!
end if
set fso=nothing
end if
dele="delete from myphoto where id="&request.querystring("id")
conn.execute dele
end if
response.Write "<a href='?del="&rs("id")&"&id="&rs("id")&"' onclick='return confirm(\'是否确认删除数据和保存的图片\')'>删除</a>"
end if
end if
%>

Answer 3

if rso("photo")<>"" then
xxx = rs("photo")
xxx = right(xxx,len(xxx)-15)
------------------------------
rs是什么？没定义呢。是不是拼写错误？
----------------------------------
if request.querystring("id")="" then
sqlo="select * from myphoto where id="&request.querystring("id")
-----------------------------------
既然ID已然为空了，你后面的查询怎么会引用一个空值呢？查询缺少关键值哦。

Answer 4

if request.querystring("id")="" then

应该是

if request.querystring("id")<>"" then 吧？

rs("photo"）字段为什么 right(xxx,len(xxx)-15)要根据具体情况决定

response.redirect"<a href='?del=<%= rs('id') %>' onclick='return confirm('是否确认删除数据和保存的图片')'>删除</a>"
这个还有意义吗，代码都执行过了，再来确认？