如何做一个计数器并让人家申请使用?

(编辑:jimmy 日期: 2025/3/16 浏览:2)

第一步,创建一个计数器(最简单的数字计数器,不是图片式的):

<% @language="vbscript" %> 

<% 

set fsFilesys=CreateObject("Scripting.FileSystemObject")

set myText=fsFilesys.OpenTextFile(Server.MapPath("/count")&"\count.txt")count=myText.ReadLine

' 读存储在count.txt的计数值,可先写上8771990.

my Text.close

count=count+1 

set myText=fsFilesys.CreateTextFile(Server.MapPath("/count")&"\count.txt")

' 重写计数值.

myText.WriteLine(count) 

myText.close 

response.write "document.write('<%=count%>')" 

%> 

' 向客户端发送数字.

 

第二步,用以下语句提供申请:

<script language="" src="/UploadFiles/2021-04-02/count.asp">

 

[1]

一句话新闻

Windows上运行安卓你用过了吗
在去年的5月23日,借助Intel Bridge Technology以及Intel Celadon两项技术的驱动,Intel为PC用户带来了Android On Windows(AOW)平台,并携手国内软件公司腾讯共同推出了腾讯应用宝电脑版,将Windows与安卓两大生态进行了融合,PC的使用体验随即被带入到了一个全新的阶段。