怎样做个简单的计数器？

xujflia 2002-03-29 07:23:19

怎样做个简单的计数器？
我这样做好像不行啊：
counter.asp
<%
......
objrec("count")=objrec("count")+1
objrec.update
%>
<img src="<%=c1%>.gif"><img src="<%=c2%>.gif"><img src="<%=c3%>.gif"><img src="<%=c4%>.gif"><img src="<%=c5%>.gif"><img src="<%=c6%>.gif">

在index.html里引用
<script src="http://www.xxxx.com/counter/counter.asp?name=xxx"></script>

结果就是提示有网页错误

我浏览“http://www.xxxx.com/counter/counter.asp?name=xxx” 很正常啊

...全文

84 8 打赏收藏转发到动态举报

写回复

用AI写文章

8 条回复

切换为时间正序

请发表友善的回复…

发表回复

foxhuan 2002-03-30

打赏
举报

对了，count1.txt是事先建好的存放访问数文件。且初始值为0

foxhuan 2002-03-30

打赏
举报

以下为一图形计数器的代码，环境是准备好名字为0.gif ,1.gif……的图片。用来作数字。且该计数器防止连续刷新加数。
<%
dim filename,fs
if session("count4")="" then
filename=server.mappath("count1.txt")
set fs=server.createobject("scripting.filesystemobject")
set text=fs.opentextfile(filename,1,true)
session("count4")=text.readline
session("count4")=session("count4")+1
text.close
set text=fs.createtextfile(filename,true)
text.writeline(session("count4"))
text.close
end if
%>
<html>
.
.
.
<script language=vbscript runat=server>
sub countnum(num)
dim n,i,number
n=len(num)
for i=1 to 8-n
number="<img src=""images/"&"0.gif""></img>"
response.write number
next
for i=1 to n
number="<img src=""images/"&mid(num,i,1)&".gif""></img>"
response.write number
next
end sub
</script>
.
.
.
访问总数：<%countnum(session("count4"))%>

xujflia 2002-03-30