| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 970 人关注过本帖
标题:实现查看文章阅读次数的问题
只看楼主 加入收藏
alonemu
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2008-8-23
收藏
 问题点数:0 回复次数:5 
实现查看文章阅读次数的问题
如果想实现文章的阅读次数统计该如何添加代码啊我试着添了一下但是不对啊提示:Microsoft JET Database Engine (0x80040E14)
语法错误 (操作符丢失) 在查询表达式 'ID =' 中。
/ME/index.asp, 第 35 行

以下是需要添加此功能的代码:红色部分是我添加的。请高手明示啊!!
<%
set rsX=server.createobject("adodb.recordset")
connX.Execute "Update xinqingyizhan Set hits=hits +1 where id=" & id
dim id
id = trim(request.querystring("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
%>

[[it] 本帖最后由 alonemu 于 2008-10-22 20:06 编辑 [/it]]
搜索更多相关主题的帖子: 阅读 
2008-10-22 19:45
cslldu
Rank: 1
等 级:新手上路
帖 子:61
专家分:0
注 册:2007-4-12
收藏
得分:0 
没见过
2008-10-22 20:04
hmhz
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:30
帖 子:1890
专家分:503
注 册:2006-12-17
收藏
得分:0 
文章阅读次数很简单,原理就是打开文章的时候把读出来的次数+1后再重新录进数据库
比如:
程序代码:
<%
set rsX=server.createobject("adodb.recordset")
rsX.open "select htis from xinqingyizhan where id="&int(curid),connX,1,3
if not(rsX.eof and rsX.bof) then
rsX("htis")=rsX("htis")+1
end if
rsX.close
%>


[[it] 本帖最后由 hmhz 于 2008-10-22 20:25 编辑 [/it]]

[编程论坛] ASP超级群:49158383  敲门暗号:ASP编程
龍艺博客 http://www.
2008-10-22 20:15
alonemu
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2008-8-23
收藏
得分:0 
呵呵 问题解决
[bo][un]alonemu[/un] 在 2008-10-22 19:45 的发言:[/bo]

如果想实现文章的阅读次数统计该如何添加代码啊我试着添了一下但是不对啊提示:Microsoft JET Database Engine (0x80040E14)
语法错误 (操作符丢失) 在查询表达式 'ID =' 中。
/ME/index.asp, 第 35 行
以下是需要 ...

将connX.Execute "Update xinqingyizhan Set hits=hits +1 where id=" & id
改为:ConnX.Execute ("Update xinqingyizhan Set hits=hits+1 Where id="&Request("id"))
即可
呵呵,希望遇到同样问题朋友可以借鉴
2008-10-22 20:18
multiple1902
Rank: 8Rank: 8
等 级:贵宾
威 望:42
帖 子:4881
专家分:671
注 册:2007-2-9
收藏
得分:0 
[bo][un]alonemu[/un] 在 2008-10-22 20:18 的发言:[/bo]


将connX.Execute "Update xinqingyizhan Set hits=hits +1 where id=" & id
改为:ConnX.Execute ("Update xinqingyizhan Set hits=hits+1 Where id="&Request("id"))
即可
呵呵,希望遇到同样问题朋友可以借鉴

应该说,问题不完全在这里。
你仔细读读你的程序,居然在Dim ID、获取到ID之前使用了ID这个变量。很不规范而且是错误的代码。
至于你这个修改,我想是治标不治本的。
2008-10-22 22:49
nicechlk
Rank: 3Rank: 3
等 级:论坛游侠
威 望:4
帖 子:330
专家分:187
注 册:2008-9-6
收藏
得分:0 
这样调换位置就对了!
<%
set rsX=server.createobject("adodb.recordset")
dim id
id = trim(request.querystring("id"))

connX.Execute "Update xinqingyizhan Set hits=hits +1 where id=" & 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
%>

莫以善小而不为,莫以恶小而为之!
2008-10-22 22:58
快速回复:实现查看文章阅读次数的问题
数据加载中...
 
   



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

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