当前位置： 移动技术网 > IT编程>开发语言>.net > ASP图形计数器设计详解

ASP图形计数器设计详解

2018年10月10日  | 移动技术网IT编程  | 我要评论

争先恐后打一字,qire123,你把爱情给了谁dj

这里介绍一种不用cgi而设计出的漂亮的图形计数器。
这里分为三部分：1，建立图形文件。
            2，建立。
            3，编写代码。
1，建立图形文件。
  首先，用做图软件制作10个图形，用于显示计数
器的十个数字：1，2，3，4，5，6，7，8，9，0。如果
你有美术才能，还能做出更好的图形。
2，建立数据库。
  用建立一个数据库，名字为。数据库包含一个表，
名字为，结构为：整数，有一条记录，初始值为0。
用于存放上一次访问本页面的次数。
3，编写代码。
——————number.———————————— 
<%@ 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
%>

您可能感兴趣的文章:

如对本文有疑问，请在下面进行留言讨论，广大热心网友会与你互动！！ 点击进行留言回复

相关文章:

验证码：
最近更新的文章
大家感兴趣的文章
移动技术网