第一步,创建一个计数器(最简单的数字计数器,不是图片式的):
<% @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]
免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件!
如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
桃源资源网 Design By www.nqtax.com
暂无“如何做一个计数器并让人家申请使用?”评论...