| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 575 人关注过本帖
标题:[求助]网站点击率
只看楼主 加入收藏
上炕不脱鞋
Rank: 1
等 级:新手上路
威 望:1
帖 子:332
专家分:0
注 册:2006-3-19
收藏
 问题点数:0 回复次数:4 
[求助]网站点击率
怎么实现网站点击率啊??
搜索更多相关主题的帖子: 点击率 
2006-06-07 11:54
小笨笨
Rank: 5Rank: 5
等 级:贵宾
威 望:19
帖 子:1169
专家分:0
注 册:2006-4-17
收藏
得分:0 

欢迎光临我的博客: http://smallfools.blog./default.html
2006-06-07 12:12
xufengtang
Rank: 1
等 级:新手上路
威 望:1
帖 子:89
专家分:0
注 册:2006-5-7
收藏
得分:0 

我用vb写了个记数器,是通过StreamReader 和Streamwriter对.txt文件进行读写数,再以图形方式显示能实现服务器关闭后其计算值不会消失 代码如下
Dim objReader As New System.IO.StreamReader(Server.MapPath("counter.txt"))
Dim counter As Long = objReader.ReadLine()
objReader.Close()
If Session.IsNewSession = True Then
counter = counter + 1
Dim objwriter As New System.IO.StreamWriter(Server.MapPath("counter.txt"), False)
objwriter.WriteLine(counter.ToString())
objwriter.Close()
End If
Dim i As Byte, ICounter As String
For i = 1 To Len(counter.ToString())
ICounter = ICounter & "<img src=digit" & Mid(counter, i, 1) & ".gif>"
Next
mycounter.Text = "你是第" & ICounter & "位访问者"
lastvisittime.Text = "最新一次浏览时间:" & System.DateTime.Now()


2006-06-07 12:14
water123456
Rank: 5Rank: 5
等 级:贵宾
威 望:15
帖 子:3208
专家分:5
注 册:2006-2-21
收藏
得分:0 
你上面这个不对吗?我没有看到什么问题呀?
再说了,你也可以不借助于通过StreamReader 和Streamwriter对.txt文件进行读写数,
你可以数据库是定义表来存储,当你什么感觉不能做的话,想想是否能用数据库解决,这是一种考虑的方法

让我们风风火火的过一生,别平平淡淡过一年。
2006-06-07 12:47
xufengtang
Rank: 1
等 级:新手上路
威 望:1
帖 子:89
专家分:0
注 册:2006-5-7
收藏
得分:0 

火箭,我不是提问的人哟,我的代码可以用的
我想问下request("textbox1") 和textbox1.text 这两个返回的值有区别吗


2006-06-07 21:18
快速回复:[求助]网站点击率
数据加载中...
 
   



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

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