杭州交通信息网不义联盟挑战人物:asp图片计数器
来源：百度文库 编辑：杭州交通信息网 时间：2024/04/28 23:50:13
不好意思，还是一个老问题了，就是关于asp图片计数器的，只是一个很简单的计数器那种，就是只需要在网页中一按刷新就自动计数一次，9张好看的数字图片我都做好了，可是代码我就怎么也写不对，请大家帮忙阿，只是初级很简单的那种。最重要的是图片要放到哪里，我怎么老显示不出来/。
<%
Dim grkz,counts,i,str
counts=1
Set grkz=Server.CreateObject("scripting.filesystemobject")
On Error Resume Next
counts=grkz.OpenTextFile(Server.MapPath("count.txt"),1,true).ReadLine+counts
grkz.OpenTextFile(Server.MapPath("count.txt"),2,true).writeline counts
Set grkz=nothing
For i=1 to Len(counts)
str=str&Replace(Mid(counts,i,1),Mid(counts,i,1),"<img src="&Mid(counts,i,1)&".gif>")
Next
Response.Write str
%>
这个我也做过哦，问题多很哦，要一个一个的慢慢去找