怎么计算文章的点击数，代码怎么写？

你要的是个计数器吧？？

1、在网站目录下新建一个文本：txtcounter.txt 在文本填写1或其他识字
2、新建一asp文件：count.asp，加入以下代码：
<%
CountFile=Server.MapPath("txtcounter.txt")
Set FileObject=Server.CreateObject("Scripting.FileSystemObject")
Set Out=FileObject.OpenTextFile(CountFile,1,FALSE,FALSE)
counter=Out.ReadLine
Out.Close
SET FileObject=Server.CreateObject("Scripting.FileSystemObject")
Set Out=FileObject.CreateTextFile(CountFile,TRUE,FALSE)
Application.lock
counter= counter + 1
Out.WriteLine(counter)
Application.unlock
Response.Write"document.write("&counter&")"
'为了在页面正确显示计数器的值，调用VBScript函数Document.write
Out.Close
%>
3、在需要计数的网页加入：总点击<script language="JavaScript" src="count.asp"></script>次

<%owen=request("id") /////获取一个id的值赋给owen id=cstr(request("id")) /////把id的值变成字串赋给id Set rsnews=Server.CreateObject("ADODB.RecordSet") 创建一个记录集 sql="update news set hits=hits+1 where id="&id 更新news的数据 hist+1一般是点击率 conn.execute sql 执行更新 sql="select * from news where id="&owen 以id为条件查询news表里所有的数据

rsnews.Open sql,conn,1,1 以只读方式 打开记录集, title=rsnews("title") 标题等于从记录集中的的标题字段里获得 if rsnews.eof and rsnews.bof then 假如最顶一条和最末一条都没有,就成立 response.Write("数据库出错") 显示数据库出错. else 否则

%>