初学，哥哥姐姐帮忙啊！

wwwjia 2004-04-03 09:37:39

<%newsid=request("id")
set rs_del=cn.execute("select pic from honor where id="&newsid)
if not isnull(rs_del("pic")) then
if not rs_del.eof then
set fso=server.createobject("scripting.filesystemobject")

fname=rs_del("pic")

end if
if fso.fileexists(server.mappath("/")&"\management\honor\upfile\"&fname) then
fso.deletefile(server.mappath("/")&"\management\honor\upfile\"&fname)
end if
end if
ADODB.Field 错误 '800a0bcd'

BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。

/gsdj/english/management/techn/modifysave.asp，行55

...全文

51 5 打赏收藏转发到动态举报

写回复

用AI写文章

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

wwwjia 2004-04-03

打赏
举报

谢谢大家了，以后还要多帮忙啊！！

cjf1009 2004-04-03

打赏
举报

应该先判断记录集是否为空，在判断其中字段的值是否为空，你弄反了。

hhzh426 2004-04-03

打赏
举报

if not isnull(rs_del("pic")) then
if not rs_del.eof then

==>
if not rs_del.eof then
if not isnull(rs_del("pic")) then
试试

cjf1009 2004-04-03

打赏
举报

<%newsid=request("id")
set rs_del=cn.execute("select pic from honor where id="&newsid)
if not rs_del.eof then
if not isnull(rs_del("pic")) then //调换顺序
set fso=server.createobject("scripting.filesystemobject")

fname=rs_del("pic")

end if
if fso.fileexists(server.mappath("/")&"\management\honor\upfile\"&fname) then
fso.deletefile(server.mappath("/")&"\management\honor\upfile\"&fname)
end if
end if