明霞山资源网 Design By www.htccd.com
第一步，创建一个计数器（最简单的数字计数器，不是图片式的）：
<% @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]
明霞山资源网 Design By www.htccd.com
广告合作：本站广告合作请联系QQ：858582 申请时备注：广告合作（否则不回）
免责声明：本站文章均来自网站采集或用户投稿，网站不提供任何软件下载或自行开发的软件！ 如有用户或公司发现本站内容信息存在侵权行为，请邮件告知！ 858582#qq.com
免责声明：本站文章均来自网站采集或用户投稿，网站不提供任何软件下载或自行开发的软件！ 如有用户或公司发现本站内容信息存在侵权行为，请邮件告知！ 858582#qq.com
明霞山资源网 Design By www.htccd.com
暂无评论...