************************调用*********************
'* <script language="javascript" src="xxx.asp?max=8"></script>
'*************************************************
javastr="<div algin='center'>"
<%
max=request("max") '//计数器位数
if request.cookies("count")="" then '//防刷
set fso=server.createobject("scripting.filesystemobject")
set fp=fso.opentextfile(server.mappath("count.dat")) '//计数器统计文件
countn=fp.readline
countn=countn+1
fp.close
set fp=nothing
set fp=fso.createtextfile(server.mappath("count.dat"))
fp.writeline countn
set fp=nothing
set fso=nothing
response.cookies("count")=countn
end if
set fso=server.createobject("scripting.filesystemobject")
set fp=fso.opentextfile(server.mappath("count.dat"))
s=fp.readline
for n=(max-len(s)) to 1 step -1
%>
javastr=javastr+"<img src=count/0.gif' border=0>" '//计数器图片文件
<%
next
j=0
for i=(max-len(s)) to max-1
j=j+1
%>
javastr=javastr+"<img src='count/<%=mid(s,j,1)%>.gif' border=0>"
<%
next
set fp=nothing
set fso=nothing
javastr=javastr+"</div>"
%>
document.write(javastr)
Java Asp PHP .Net XML C/C++ CGI VB Jsp J2ee J2se J2me EJB Servlet Tomcat Resin Struts Weblogic Eclipse ANT GUI JMS Web servise IDEA Webphere Hibernate Spring Jboss Applet Swing Socket Javamail Perl Ajax P2P 安全 模式 框架 测试 开源 游戏
Windows XP Windows 2000 Windows 2003 Windows Me Windows 9.x Linux UNIX 注册表 操作系统 服务器 应用服务器