ADODB.Field (0x800A0BCD) BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除。大侠们,帮帮忙改改错

<%Dimrs,i,titleCallopenConn()'打开数据库Setrs=conn.execute("Selecttop5DiscID,TitleFrom[Dis... <%
Dim rs,i,title
Call openConn() '打开数据库
Set rs=conn.execute("Select top 5 DiscID,Title From [Discount] order by DiscID desc")
If Not rs.eof Then
For i=1 To 5
title=rs(1)
if len(title)>10 then
title=left(title,10)&"…" '如果超过10 字符则缩短标题并以...结尾
else
title=title '小于10个字符就输出原标题
end if
%>
<a href="ActiveShow.asp?ID=<%=rs(0)%>"><%=title%></a><br/>
<%
rs.moveNext
Next
Else
%>
暂时没有信息!
<%
End If
Call rsClose()
Call connClose()
%>
我知道我是没有判断对,但是我不知道该怎么判断,在哪里判断,我是菜鸟,大侠们多帮帮忙。。
展开
 我来答
lmqnli
2011-01-23 · TA获得超过1347个赞
知道小有建树答主
回答量:1328
采纳率:50%
帮助的人:1012万
展开全部
SELECT * FROM Info WHERE ID = ?
这个SQL语句有问题 改成
"SELECT * FROM Info WHERE ID ="&rs__MMColParam
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
miniappIapXHGR8TH2yi
2011-01-22 · TA获得超过298个赞
知道答主
回答量:84
采纳率:50%
帮助的人:36.7万
展开全部
在For i=1 To 5
下加上 if rs.eof then exit for
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式