| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 928 人关注过本帖
标题:如何实现文章评论
只看楼主 加入收藏
alonemu
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2008-8-23
收藏
 问题点数:0 回复次数:8 
如何实现文章评论
我做了一个同事显示某篇文章与其评论的网页,但是却出现错误提示:ADODB.Field (0x80020009)
BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除,所需的操作要求一个当前的记录。

我现在发一下我的相关代码:
文章显示代码(带有一个hits阅读次数的功能):
<%
id = trim(request.querystring("id"))
set rsX=server.createobject("adodb.recordset")
ConnX.Execute ("Update xinqingyizhan Set hits=hits+1 Where id=" & Request("id"))
if id<>"" and isnumeric(id)then
  id = clng(id)
else
  response.write("非法访问")
  response.end
end if
sql="select hits,biaoti,ID,neirong,faburiqi,chuchu from xinqingyizhan where id=" & id
rsX.open sql,connX,1,1
%>
评论读取代码:
<%
set rsXpl=server.createobject("adodb.recordset")
sql="select * from xinqingyizhanpl where  plid=" & id
rsXpl.open sql,connXpl,1,1
%>

请帮忙解决一下两天了没有解决呢 我知道这个应该是简单问题 哎·~难着不会,会者不难 啊~~!!
搜索更多相关主题的帖子: 评论 
2008-11-08 19:58
multiple1902
Rank: 8Rank: 8
等 级:贵宾
威 望:42
帖 子:4881
专家分:671
注 册:2007-2-9
收藏
得分:0 
这几行都没错啊。
2008-11-08 20:03
alonemu
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2008-8-23
收藏
得分:0 
但是确实测试不通过,提示刚写到的错误
[bo][un]multiple1902[/un] 在 2008-11-8 20:03 的发言:[/bo]

这几行都没错啊。


您在检查一下,帮帮忙
2008-11-08 20:08
sunfishy
Rank: 3Rank: 3
等 级:论坛游侠
威 望:5
帖 子:311
专家分:163
注 册:2007-6-29
收藏
得分:0 
写数据库读取的时候.

用上if not rs.eof then ...

或者do while not rs.eof 等
2008-11-09 11:00
hmhz
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:30
帖 子:1890
专家分:503
注 册:2006-12-17
收藏
得分:0 
代码是没错,但要是第一个打开没有评论的时候就会出现这个错误,解决这个空记录的办法就是在显示评论之前先
if rs.eof and rs.bof then
    response.write("暂时没有评论")
else
    response.write("显示评论内容")
end if

[编程论坛] ASP超级群:49158383  敲门暗号:ASP编程
龍艺博客 http://www.
2008-11-09 11:24
alonemu
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2008-8-23
收藏
得分:0 
里面有内容
数据库里面有内容啊 怎么还是不行呢。而且您所写的 if rs.eof and rs.bof then
    response.write("暂时没有评论")
else
    response.write("显示评论内容")
end if
应该放在哪个位置?
2008-11-09 13:13
hmhz
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:30
帖 子:1890
专家分:503
注 册:2006-12-17
收藏
得分:0 
程序代码:
<%
set rsXpl=server.createobject("adodb.recordset")
rsXpl.open "select * from xinqingyizhanpl where  plid="&id,connXpl,1,1
if rsXpl.eof and rsXpl.bof then
    response.write("暂时没有评论")
else
do while not rsXpl.eof
    response.write("显示评论内容")
rsXpl.moveNext
loop
end if
rsXpl.close
set rsXpl=nothing
%>

[编程论坛] ASP超级群:49158383  敲门暗号:ASP编程
龍艺博客 http://www.
2008-11-09 15:24
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
评论的确需要判断是否EOF,在没有评论的文章时没有EOF判断就会出错误
2008-11-09 16:02
快速回复:如何实现文章评论
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.034037 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved