LINE 的计数器源程序（附源代码）

2016-01-29 18:08 4 1 收藏

LINE 的计数器源程序（附源代码）,LINE 的计数器源程序（附源代码）

【 tulaoshi.com - ASP 】

<%
bUseImages = CBool(Request.QueryString("images"))
strCountFileName = Server.MapPath(Request.ServerVariables("SCRIPT_NAME") & ".dat")
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
' Open the file as a text stream (1 = ForReading, True = Create)
Set objCountFile = objFSO.OpenTextFile(strCountFileName, 1, True)
If Not objCountFile.AtEndOfStream Then
iCount = CLng(objCountFile.ReadAll)
Else
iCount = 0
End If
objCountFile.Close
Set objCountFile = Nothing
iCount = iCount + 1
Set objCountFile = objFSO.CreateTextFile(strCountFileName, True)
objCountFile.Write iCount
objCountFile.Close
Set objCountFile = Nothing
Set objFSO = Nothing
If bUseImages Then
For I = 1 to Len(iCount)
Response.Write "<IMG src="http://img.jcwcn.com/attachment/portal"

来源:http://www.tulaoshi.com/n/20160129/1504537.html

上一篇：内核上的dns服务应答可以工作了
下一篇：巧解燃眉之急:Word不能打开WPS文档

看过《LINE 的计数器源程序（附源代码）》的人还看了以下文章更多>>

jsp计数器制作

标签： Java JAVA基础

计数器是一般网站必备的东东，别小看它了，每当站长看着小小计数器上的数字飞速增长的时候，感觉实在是好极了。以前我们用cgi、asp来写计数器，这方面的文章很多了，在这里，我们将会采用目前比较流行的jsp技术演示如何做一个计数器。其中我们用到了两个文件，test.jsp文件用于在浏览器中运行，counter.java是后台的一个小java bean程...

jsp计数器-bean文件

标签： Java JAVA基础

import java.io.Serializable; public class Counter implements Serializable{ // Initialize the bean on creation int count = 0; // Parameterless Constructor public Counter() { } // Property Getter public int getCount() { // Increment the count property, with every request count++; return this.count; } // P...

综合图片计数器

标签： PHP

-------------------------------------------------------------------------------- 请保持文章的完整性 -------------------------------------------------------------------------------------- <? //counter.php All rights reserved http://sports98.126.com ...

用ASP编写计数器

标签： ASP

<% dim fso,f,no,I '定义变量绝对是个好习惯 Set fso = CreateObject("Scripting.FileSystemObject") '建立对象的实例 Set f = fso.OpenTextFile(Server.MapPath("count.no"), 1, True) '建立文本文件,打开为只读. if f.AtEndOfStream then '判断这个文件是否不存在 no=1 else no=f.ReadLine no=no+1 end if f.Close set f=fso.O...

来个PHP计数器怎样？

标签： PHP

<?php $counterFile = "balong.txt";//存储数值的文件名几路径 function displayCounter($counterFile) { $fp = fopen($counterFile,"rw"); $num = fgets($fp,5); $num +...

查看更多精彩>>