|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
由于ASP提供的是一对多的服务,所以用户的一些特殊需求很难得到满足。计数器|计划|详解 (三)与页面分别的图像计数器
人们的寻求是永无尽头的,大概你必要一个更有本性的图形数字计数器,而不是复杂的文本数字计数器。没成绩,如今我们就来看看用ASP是如何来完成图形计数器功效的。要完成图形计数器,关头点在于怎样完成把计数器文件中的数据值变化为对应的图像暗示。由于十进制数有0,1,2,3,4,5,6,7,8,9共十个分歧的数数字,我们必要有十个对应的图像,且图像的文件名字要与显现的数字对应起来,好比0对应的数字图像的文件名字就是0.gif,1对应的就是1.gif,...(图像本人能够用Photoshop等工具制造,大概从收集高低载)。这里我们要用到VBScript函数Len(string|varname)、Mid(string,start[,length])。由Len(counter)可失掉计数器值的位数,由Mid(counter,i,1)能够失掉计数器值的第i位上的数字,我们可使用这个值来挪用响应的数字图像。用For轮回语句,我们不可贵出计数器值各个位上的数字并转化成对应的数字图像,如许,我们就可以完成文本数值到图像数字的变化。上面就是一个用ASP编写的图像计数器实例,由于年夜部分代码后面都剖析过,以是代码中只正文了部分语句。
与页面分别的图像计数器imgcounter.asp代码:
<%@language="VBScript"%>
<%
dimimages(20)
界说一数组,用来寄存显现每位数字图像的语句
CountFile=Server.MapPath("imgcounter.txt")
SetFileObject=Server.CreateObject("Scripting.FileSystemObject")
SetOut=FileObject.OpenTextFile(CountFile,1,FALSE,FALSE)
counter=Out.ReadLine
Out.Close
SETFileObject=Server.CreateObject("Scripting.FileSystemObject")
SetOut=FileObject.CreateTextFile(CountFile,TRUE,FALSE)
Application.lock
counter=counter+1
Out.WriteLine(counter)
Application.unlock
countlen=len(counter)
失掉计数器值的位数
fori=1tocountlen
images(i)="
//援用时注重ASP计数器地点的服务器及目次路径。
</script>
位来客
</p>
附注:以上asp计数器均在WindowsNTServer4.0(中文)/IIS3.0下测试经由过程。以下任何一种情况都可实行ASP:
1、WindowsNTServer4.0 / IIS3.0以上
2、WindowsNTWorkStation4.0/MicrosoftPeerWebService3.0以上
3、Windows95/98/MicrosoftPersonalWebServer1.0a以上Windows本身的所有问题都会一成不变的也累加到了它的身上。安全性、稳定性、跨平台性都会因为与NT的捆绑而显现出来; |
|