网站后台出错，上传好的新闻后无法修改，修改新闻点击提交就报错：

答案:2 悬赏:30 手机版

解决时间 2021-01-31 14:22

提问者网友：ミ烙印ゝ
2021-01-30 13:46

错误类型：
ADODB.Recordset (0x800A0BCD)
BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
/slpc/admin1/admin_inform_modifysave.asp, 第 72 行

代码如下：
<%@language=vbscript codepage=936 %>
<%
option explicit
response.buffer=true
%>



<%
Dim sContent1, i1, isok, rs, sql,fl,fld

For i1 = 1 To Request.Form("content1").Count
sContent1 = sContent1 & Request.Form("content1")(i1)
Next
isok = true
%>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../manage.css" type="text/css">
</head>
<body bgcolor="" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<div align="center">
<table border="0" cellpadding="0" cellspacing="0" height="43" width="80%">
<tr>
<td height="43"><div align="center"> <br>
<p>
<%
if request.form("ftitle") = "" then
isok = false
%>
</p>
<p><font color="#FF0000">请填写新闻标题！</font></p>
<%
end if
if request.form("fdate") = "" or (not isdate(request.form("fdate"))) then
isok = false
%>
<p><font color="#FF0000">没有填写发布日期或日期格式不正确！</font></p>
<p>
<%
end if
if isok = false then
%>
<a href="JavaScript:history.go(-1)">返回重新填写</a>
<%
end if

if isok then

if isok then
set rs=server.createobject("adodb.recordset")
fld=request.QueryString("fl")
select case fld
case "咨询专区"
sql="select * from zl where id = " & request.form("tempid")
case "普查简报"
sql="select * from fx where id = " & request.form("tempid")
case "执法监督"
sql="select * from sz where id = " & request.form("tempid")
case "工作动态"
sql="select * from szy where id = " & request.form("tempid")
case "基础研究"
sql="select * from yj where id = " & request.form("tempid")
case "水利经济"
sql="select * from jj where id = " & request.form("tempid")
case "普查简报"
sql="select * from rn where id = " & request.form("tempid")
end select
rs.open sql,conn,1,3
rs("ftitle") = request.form("ftitle")
rs("ftext") = sContent1
rs("fdate") = request.form("fdate")
rs("froot")=request.form("froot")
rs.update
rs.close
set rs=nothing
response.redirect("admin_inform_list.asp?fl="&fld)
end if
response.redirect("admin_inform_list.asp?fl="&fld)
end if
%>
</div></td>
</tr>
</table>
</div>
</body>
</html>

我要修改代码，重根本上完成。

最佳答案

五星知识达人网友：走死在岁月里
2021-01-30 15:08

要解决最快的方法是重新发布一个新的改好的新闻，再把以前的删除！
还有就是联系提供给你后台系统的客服可以很快的到解决！

全部回答

1楼网友：独钓一江月
2021-01-30 16:23

你右键、看看图片链接地址

我要举报

如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！