当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP图形计数器设计详解

ASP
asp实现取得数组中的最大值的代码
asp 将日期格式化为需要的格式
asp 下产生任意位数随机密码的代码
asp下返回以千分位显示数字格式化的数值
asp重定向页面的方法总结
asp下去除数组中重复的项的方法
asp下实现 重新排序数字数组的代码
asp 验证输入网址是否有效并可以访问 与正则验证输入网址
asp验证Ip格式的函数
asp实现生成由数字,大写字母,小写字母指定位数的随机数
asp 格式化sql中的like字符串
asp 实现显示所有的服务器变量值的函数
asp 取得用户真实IP,对代理地址仍然有效的函数
asp 通用数据库连接过程函数
asp 字符串截取函数
asp下实现格式化文件大小以MB显示的函数
asp 下用正则表达式检测邮箱格式的函数
asp 实现检测字符串是否为纯字母和数字组合的函数
asp代码实现检测组件是否安装的函数
asp通过JMAIL实现通用发送函数

ASP图形计数器设计详解


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 224 ::
收藏到网摘: n/a

 

这里介绍一种不用CGI而设计出的漂亮的图形计数器。
这里分为三部分:1,建立图形文件。
            2,建立数据库。
            3,编写代码。
1,建立图形文件。
  首先,用做图软件制作10个图形,用于显示计数
器的十个数字:1,2,3,4,5,6,7,8,9,0。如果
你有美术才能,还能做出更好的图形。
2,建立数据库。
  用建立一个数据库,名字为。数据库包含一个表,
名字为,结构为:整数,有一条记录,初始值为0。
用于存放上一次访问本页面的次数。
3,编写代码。
——————number.asp———————————— 
<%@ language="vbscript" %>
<!--#include file="adovbs.inc"-->
<%
set objconn=server.createobject("adodb.connection")
objconn.attributes=adxactcommitretaining
dbpath=server.mappath("num.mdb")
objconn.open "driver={microsoft access driver (*.mdb)};dbq=" & dbpath
注释:与数据库建立连接。

sqlquery= "select * from numt"
set rsrecordset=server.createobject("adodb.recordset")
rsrecordset.open sqlquery,objconn,adopenkeyset,adlockoptimistic
注释:打开数据库。

application.lock
application("nmb")=rsrecordset("number")
application.unlock
注释:把上一次访问次数赋给Application对象

application.lock
application("nmb")=application("nmb")+1
application.unlock
rsrecordset("number")=rsrecordset("number")+1
rsrecordset.update
rsrecordset.close
objconn.close
set rsrecordset=nothing
set objconn=nothing
注释:关闭数据库,释放对象

dim nmb1
dim str()
nmb1=application("nmb")
redim str(nmb1)
for i=1 to len(nmb1)
str(i)=mid(nmb1,i,1)
注释:对于每一个数得到相应的图形文件

select case str(i)
 case"0"
   imgF="0.gif"
 case"1"
   imgF="1.gif"
 case"2"
   imgF="2.gif"
 case"3"
   imgF="3.gif"
 case"4"
   imgF="4.gif"
 case"5"
   imgF="5.gif"
 case"6"
   imgF="6.gif"
 case"7"
   imgF="7.gif"
 case"8"
   imgF="8.gif"
 case"9"
   imgF="9.gif"
end select
注释:输出图形

response.write"<img src="&imgF&">"
next
%>