Testo Counter

Pubblicato il 4 marzo 2009 in ASP da admin

Ora create una cartella chiamata contatori o si può chiamare un altro se si vuole solo ricordare e modificare il codice di cui sopra. Ora create un file di testo chiamato counter1.txt e inserire tutto ciò che vuoi per iniziare il conte a.

<% @ Language = VBScript%>
<%
Dim fso
Set fso = Server.CreateObject ( "Scripting.FileSystemObject")
/ / questo è il percorso al vostro file counter1.txt
contatore = Server.MapPath ( "/ contatori") & "\ counter1.txt"
/ / apre il file di testo
Imposta InStream = fso.OpenTextFile (contatore, 1, False)
oldCount = Trim (InStream.ReadLine)
/ / incremento il oldcount da 1 e conservare in newcount
newCount = oldCount + 1
Imposta OutStream = fso.CreateTextFile (contatore, True)
/ / copia newcount per il file di testo
OutStream.WriteLine (newCount)
%>

Ora si dovrebbe collocare il folllowing se si desidera che il contatore di apparire sul tuo sito

<% = NewCount%>

Related post:

  1. Più preciso testo counter Questo è un più accurato di contrastare il nostro esempio precedente ...
  2. Visualizzare un file CSV di visualizzazione di un file CSV file CSV sono comuni formati di ...
  3. Salvataggio di un file CSV in un database Creare un database in Access chiamato stock.mdb. Ora creare ...
  4. rndimage1 Questa è una semplice immagine casuale script che è l'ideale ...
  5. Scrivere il testo in un file Questo esempio utilizza i flussi di scrivere in un file di testo ...

Related posti portato a voi da Yet Another Related Posts Plugin.

Pubblica un commento