正在加载图片...
令中国铁道出版社 11.3计数器 11.31轻松制作计数器 接下来介绍图形计数器的制作方法。原理很简单,首先准备 0-9十个数字的图形,在本范例中十个图形文件分别为0jpg 1Jjpg、…、9jpg。取得计数结果后,再显示出相对应的数字图形文 件就行了。制作图形计数器的程序代码 graphcounterl. asp如下 <I--graphcounter I. asp-. <html> <head> Application Lock <ttle图形计数器测试1<ttle Application ("Counter"=Application Counter")+ <body> Application. UnLock <h2 align=" center"><b>欢迎浏览本 Sub gcounter 网站</b><h2> counts=Application(Counter) <p align="center ><img border="0 digits= For i=digits-l to O STEP-1 width height=180> temp=Fix(counts10 i) <h2> <p align=" center">您是术站第 response. write < img src="& % Call gcounter%>位贵宾!<p temp &"jpg </img> </font> counts=counts-temp*101 </h2 Next body> End sub </htmI> (77 11.3 计数器 • 11.3.1 轻松制作计数器 接下来介绍图形计数器的制作方法。原理很简单，首先准备 0~9十个数字的图形，在本范例中十个图形文件分别为0.jpg、 1.jpg、…、9.jpg。取得计数结果后，再显示出相对应的数字图形文 件就行了。制作图形计数器的程序代码graphcounter1.asp如下： <!--graphcounter1.asp--> <% Application.Lock Application("Counter")=Application ("Counter")+1 Application.UnLock Sub gcounter counts=Application("Counter") digits=5 For i=digits-1 to 0 STEP -1 temp=Fix(counts/10^i) response.write "<img src=" & temp & ".jpg></img>" counts=counts-temp*10^i Next End Sub %> <html> <head> <title>图形计数器测试1</title> </head> <body> <h2 align="center"><b>欢迎浏览本 网站</b></h2> <p align="center"><img border="0" src="dhs.jpg" width="300" height="180"></p> <h2><p align="center">您是本站第 <%Call gcounter%>位贵宾！</p> </font> </h2> </body> </html>