寻ASP网页设计高手帮下忙,在下感激不尽

来源:百度知道 编辑:UC知道 时间:2024/05/29 10:06:31
许多同学都有自己的blog空间或者其他的什么网页,很多人都希望能够了解到底有什么人访问过自己的页面,有的网站也提供这样的功能让你知道有什么用户在访问你的页面。但是这些功能上总是有一些让人不满意的地方,例如msn spaces的统计功能不能显示ip,QQ空间如果不登录就不能留下痕迹。为了让用户得到更强的统计页面访问情况的功能,许多网站开始提供网页访问记录的功能,但是他们也受用户数或者显示数量的限制,例如有的只能显示最近的100个访问者,有的只能显示最近7天的访问者。这些让人不满意的地方就让我们有了自己来写一个页面访问记录程序的冲动。

一、问题分析
现在很多网站(例如msn spaces、QQ空间)只能嵌入图片或者flash,不能嵌入自己的客户端代码,所以程序的载入要受到限制。
二、你所擅长的语言
现在我们的课程是Asp,那么我们将用asp来做。
三、功能要求
3.1 必须可以让你的程序可以被嵌入到网页中。
3.2 访问记录应该尽量详细,能够记录谁在哪里通过哪个页面进入到你的哪个页面。
3.3 访问记录要能长久的保存下来,(数据库是首选保存方式)。
3.4 访问记录必须可以显示出来。
四、实现步骤:
4.1 能够显示一张图片。
4.2 能够在显示图片的时候记录来访者的情况。
提示:获取来访者的ip,通过ip地址库查询此ip的国家、城市。
4.3 将来访者情况保存到数据库中。
提示:将来访者的ip、来访时间、来访url、国家、城市等信息存储到数据库中。
4.4 将来访者历史记录显示出来(最好有查询功能)。
提示:最好能够分页显示。

给你一个小例子看一下 (分页的)
<%
'连接数据库

'执行sql 改你要的sql
set rs=server.CreateObject("adodb.recordset")%>
rs.open "select * from news order by id desc ",conn,1,3

下面的代码就复制用可以了

'分页
i=50
rs.pagesize=i
pu=request("pu")
if pu="" then pu=1
if cint(pu)<="0" then pu=1
if cint(pu)>rs.pagecount then pu=rs.pagecount
if not rs.eof then rs.absolutepage=cint(pu)
'显示记录
if not rs.eof then
do while not rs.eof and i=>1
response.write rs("字段")'显示字段
'就这里改你要的,其它复制用就可以
rs.movenext
i=i-1
loop
end if
%>

当前第 <%=pu%> 页;分
<%=rs.pagecount%> 页;
共 <%=rs.recordcount%> 条记录;
每页<%=i%>条记录
<a href="?pu=1">首 页</a>
<a href="?pu=<%=cint(PU)-1%>">上一页</a>
<a