<%
dim id,xxxx
id = 20 '假如这是当前ID
xxxx = request.cookies("xxxx") '取出所有ID
'判断是否重复，若没有记录该ID则加在最前面，若已经存在则不加
if instr("," & xxxx,"," & id & ",")=0 then xxxx = id & "," & xxxx
'删除超过20条的ID（从后面删除）
while ubound(split(xxxx,","))>20
xxxx = left(xxxx,len(xxxx)-1)
xxxx = left(xxxx,instrrev(xxxx,","))
wend
'记录新的ID集合
response.cookies("xxxx") = xxxx
response.write xxxx & "<br>"
response.write "循环输出ID:<br>"
dim i,t
t = split(xxxx,",")
for i=0 to ubound(t)
response.write t(i) & "<br>"
next
%>统计某个新闻或帖子被哪些人访问了，要详细记录的话，可以一下方法处理。
当一个人浏览过某个页面后,把它记录并显示出来!!!
人少的话就直接把人往后累计，
直接在数据库加个字段，把人员的id往里面累，某人访问的时候，先检查那个字段里面是否包含这个人的id，如果包含了就不更新记录了，如果没有就更新记录，把这个人的id，记录在里面
这种方法局限性很大，只适合内部系统使用，人员要少，记录的信息太少，只能记录某个人看了，不知道什么时候在什么地方看的，不知道某个人一共看了多少次。
如果人多的话可以使用下面的方法来详细记录
人多的话就分记录
在另一个表里面做记录
建立一个新的表专门来记录详细的访问日志
你的文章的id，阅读时间，ip，阅读人的id，从哪个页面链接过来等信息
当访问者阅读的时候，根据需要有两种处理方法，
如果要每次都记录的话，那么就直接在表里面增加记录
另一种情况是一般的记录方式，
下次同一个人阅读的时候，你可以考虑重复用一条记录来记录同一个人同一篇文章的点击日志
如果不允许重复的话，就先在记录的日志表里面搜索一下，如果有同一个人看过同一个帖的就更新（数据表的结构有一点小的差别，里面要加字段，要搞一个第一次阅读，最后一次阅读时间，总计阅次数）
需要显示文章的阅读者的地方，查询那个日志表就可以了，这个在这里就不多讲了。
下面我想你该知道怎么搞了吧
| Word教程网 | Excel教程网 | Dreamweaver教程网 | Fireworks教程网 | PPT教程网 | FLASH教程网 | PS教程网 |
| HTML教程网 | DIV CSS教程网 | FLASH AS教程网 | ACCESS教程网 | SQL SERVER教程网 | C语言教程网 | JAVASCRIPT教程网 |
| ASP教程网 | ASP.NET教程网 | CorelDraw教程网 |
QQ：2693987339(点击联系)购买教程光盘
:
