主题:  一个关于点击数的例子

topgun

职务:普通成员
等级:2
金币:1.0
发贴:366
注册:2002/3/17 20:53:44
#12002/7/4 10:34:36
其实实现点击数很简单,小田的这个插件其实说白了也就几行代码!不知道大家有没有发现小田的这个

插件有个标识栏很多时候下拉列表里都是空的!为此,我改了一下!其实也很简单

这里是我用command做的实现点击数记录,而且实现了刷新不增加,重新打开浏览器又可增加点击数。

我用文章标题和内容来做例子,共2页,default.asp和show.asp。数据库,字段有id 编号 title:标题 content:内容 author:作者 intime:文章加入时间 hits:用来保存点击数

第一页做的是标题页,点击标题进入内容。这一页还没用到command,所以按常规方法做好字段绑定,

go to detail page 和重复区域和分页跳转。

第二页先作好内容显示字段绑定,都做完后,然后在前加入如下代码:

1  <%

2  if NOT (InStr(Session("marchVisited"), "," & Request("id") & "," ) >0) then
3  Session("marchVisited") = Session("marchVisited") & "," & Request("id") & ","
4  command1__id = Request("id")
5  set Command1 = Server.CreateObject("ADODB.Command")
6  Command1.ActiveConnection = MM_hits_STRING
7  Command1.CommandText = "UPDATE hits SET hits=hits+1"
8  Command1.CommandType = 1
9  Command1.CommandTimeout = 0
10  Command1.Prepared = true
11  Command1.Execute()
12  end if

13  %>

这里便于说明加了编号,第2到第4行的id全部改为你的传递参数!第6行的hits改为你的数据库名,第7行的

第一个hits改为你的数据表名,后面两个为你保存点击数的字段名,就这么简单,是不是很容易啊!~:)

再讲一点,2,3,4行是用command——update做好后手动加进去的!防止刷新增加点击数!