新浪首页免费邮件用户注册网站地图
上移动梦网
赢手机大奖

新浪首页 > 科技时代 > 网上学园 > 主页制作 > 正文
用ASP编程实现图形计数器

http://www.sina.com.cn 赛迪网

  文/褚健耘

  许多主页都用到计数器,而且一般使用的都是网上提供的免费的CGI计数器。用人家的计数器总显得不太方便。其实用ASP编写基于数据库的图形计数器非常简单。

  首先用Access 97建立只含有一个字段的数据库aspcount.mdb,负责计数器的访问累加。用ASP对后台数据库进行读写,再根据要显示的数字调用图形文件。具体实现方法如下:

  1.建立计数器数据库结构

  字段:acounts

  数据类型:长整型

  宽度:20

  2.连接odbc数据库源

  在“控制面板”中选择“odbc data source…”,在对话框中选择“system dsn”,单击“add”按钮选择数据库驱动程序“microsoft access driver(*.mdb) 4.0”,在新弹出的对话框中data source name栏里输入“userdbs”,单击“select”按钮选择aspcount.mdb数据库即可。

  3.asp对数据库对象操作的语句

  1)从数据库字段中读取内容:

  set rs=server.createobject("adodb.recordset")

  rs.open "select * from aspcount","dsn=userdbs",3,3

  rs.movefirst

  counter=rs(0)

  2)向数据库字段中写入内容:

  rs.open "update aspcount set countss=countss+1","dsn=userdbs",3,3

  4.程序清单

  〈html〉

  〈head〉

  ……

  〈/head〉

  〈body〉

  〈%dim tms,counter,countlen

  dim images(20)

  h1="〈p〉〈font color='#8000ff'〉这是一个asp计数器〈/font〉〈/p〉"

  set rs=server.createobject("adodb.recordset")

  application.lock

  rs.open "update aspcount set countss=countss+1","dsn=userdbs",3,3

  application.unlock

  set rs=server.createobject("adodb.recordset")

  rs.open "select * from aspcount","dsn=userdbs",3,3

  rs.movefirst

  counter=rs(0)

  countlen=len(counter)

  tms="〈h1〉〈font color='#8000ff'〉您是第〈/font〉"&&counter&&"〈font color='#8000ff'〉位访问者!〈/font〉〈/h1〉"

  response.write(tms)

  for i=1 to countlen

  images(i)="〈img src=" && mid(counter,i,1) && ".gif〉〈/img〉"

  next

  response.write images(1)&&images(2)&&images(3)&&images(4)&&images(5)&&images(6)&&images(7)

  rs.close

  %〉

  〈/body〉

  〈/html〉

  以上程序在Frontpage 2000、Access 97、Windows 98软件环境下运行通过。

  (责任编辑Ray)



发表评论】【初学者园地】【科技聊天】【关闭窗口

新 闻 查 询

 相关链接
在ASP中优化数据库处理 (2001/09/29 11:04)
迁移到 ASP .NET:需考虑的重要问题 (2001/09/20 18:24)
使用ASP编程常见问题解答 (2001/09/19 11:00)
ASP+安全身份验证的实现 (2001/08/30 15:48)
用ASP为你的站点加密 (2001/08/13 10:43)
用Delphi开发ASP分页组件 (2001/07/31 10:57)
用ASP让用户访问指定页面 (2001/07/13 11:12)


科技时代意见反馈留言板 电话:010-82612286 或 010-82628888-3361   欢迎批评指正

网站简介 | 用户注册 | 广告服务 | 招聘信息 | 中文阅读 | Richwin | 联系方式 | 帮助信息

Copyright © 1996 - 2001 SINA.com, Stone Rich Sight. All Rights Reserved

版权所有 四通利方 新浪网