텍스트 카운터

3 월 2009 년 ASP에서 관리자에 의해 4 게시됨

이제 카운터라는 폴더를 만들거나 다른 무슨 일이있는 건 당신이 꼭 기억하고 싶지 전화로 위의 코드를 변경하실 수있습니다. 이제 counter1.txt라는 텍스트 파일과 뭐든에서 카운트를 시작하고자하는 입력 만듭니다.

언어 @ <% = VBScript를 "%>
<%
희미 fso를
세트 fso를 = Server.CreateObject를 ( "Scripting.FileSystemObject를")
/ /이 counter1.txt 파일의 경로입니다
카운터 =는 Server.MapPath ( "/ 카운터") & "\ counter1.txt"
/ / 텍스트 파일을 열려면
세트 InStream = fso.OpenTextFile (, 1, 거짓) 카운터
oldCount = 다듬기 (InStream.ReadLine)
/ / 증가에서 1과 가게로 oldcount newcount
newCount = oldCount + 1
세트 OutStream = fso.CreateTextFile (카운터, True)로
/ / 텍스트 파일을 복사 newcount
OutStream.WriteLine (newCount)
"%>

이제 당신은 어디에 귀하의 사이트에 게재 folllowing 카운터를 원하는 곳이 것이

<% = newCount "%>

관련 게시물 :

  1. 보다 정확한 텍스트 이것이 우리 앞의 예에서보다 정확한 카운터이다 카운터 ...
  2. 디스플레이 디스플레이를 CSV CSV 파일 형식으로 공통되는 CSV 파일을 파일은 ...
  3. CSV 파일을 저장하는 데이터베이스에 stock.mdb 전화 접속에있는 데이터베이스를 만듭니다. 지금 만들려면 ...
  4. rndimage1 이것은 이상적입니다 간단한 무작위 이미지 스크립트입니다 ...
  5. 쓰기 텍스트가이 예제 파일에 대한 스트림을 사용하여 파일에 텍스트를 작성하려면 ...

그러나 당신에게 관련 게시물에 의해 또 다른 관련 게시물 플러그인 가져왔어.

포스트 코멘트

()