UC知道asp的问题，急~~~~~~~
来源：百度知道 编辑：UC知道 时间：2024/06/18 06:26:16
总提示说：
ADODB.Field (0x80020009)
BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from s_class",conn,1,1
%>
<%
if rs.eof then
response.Write("没有类别")
else
do %>
<link href="style.css" rel="stylesheet" type="text/css" />
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
&
ADODB.Field (0x80020009)
BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from s_class",conn,1,1
%>
<%
if rs.eof then
response.Write("没有类别")
else
do %>
<link href="style.css" rel="stylesheet" type="text/css" />
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
&
<table class="table2">
<tr>
<td align="center" >类别名称</td>
<td align="center" >操作
</td>
</tr>
把这一段放到这里
<%
if rs.eof then
response.Write("没有类别")
else
do while not rs.eof%> 注意这里
<tr class="warnning">
<td align="center">
<%=rs("s_classname")%>
</td>
<td align="center">
<a href="class_mod.asp">修改</a>
<a href="?action=del&id=<%=rs("s_id")%>">删除</a></td>
</tr>
<%
rs.movenext
loop
end if
rs.close
set rs=nothing%>
</table>
你把这段代码
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from s_class",conn,1,1
%>
改写成
<%
se