Tekst Counter

Sendt den 4 marts 2009 i ASP af admin

Nu oprette en mappe kaldet tællere, eller du kan kalde det noget andet, hvis du vil bare huske og ændre koden ovenfor. Nu oprette en tekstfil kaldet counter1.txt og skriv hvad du ønsker at starte tæller.

<% @ Language = VBScript%>
<%
Dim FSO
Set FSO = Server.CreateObject ( "Scripting.FileSystemObject")
/ / dette er stien til counter1.txt fil
counter = Server.MapPath ( "/ tællere") & "\ counter1.txt"
/ / åbne tekstfil
Indstil InStream = fso.OpenTextFile (counter, 1, False)
oldCount = Trim (InStream.ReadLine)
/ / øge oldcount ved 1 og opbevares i newcount
newCount = oldCount + 1
Indstil OutStream = fso.CreateTextFile (counter, True)
/ / kopi newcount til tekstfil
OutStream.WriteLine (newCount)
%>

Nu ville du placere folllowing, hvor du vil tælleren skal vises på dit websted

<% = NewCount%>

Relaterede stillinger:

  1. Mere præcis tekst counter Dette er en mere præcis counter end vores tidligere eksempel ...
  2. Vis en CSV-fil Display en csv-fil csv-filer er fælles formater til ...
  3. Lagring af en csv-fil til en database Oprettelse af en database med adgang kaldet stock.mdb. Nu oprette ...
  4. rndimage1 Dette er en simpel tilfældig image script som er ideel ...
  5. Skrive tekst til en fil Dette eksempel bruger streams at skrive tekst til en fil ...

Relaterede stillinger bringes til dig af endnu en stillinger Plugin.

Skriv en kommentar