Nauwkeuriger tekst counter

Geplaatst op 4 maart, 2009 in ASP door admin

Dit is een nauwkeuriger zijn dan onze vorige voorbeeld, in dit voorbeeld de telling alleen krijgt opgehoogd eenmaal per sessie. Dit betekent dat uw tellen zal nauwkeuriger als u wilt dat het dat is.

Maak een txt bestand en zet uw startnummer in. Vervolgens kopieert u de code hieronder waar u wilt dat de teller weer te geven op uw pagina.

In het voorbeeld hieronder de counter.txt wordt geplaatst in dezelfde map als de pagina, als je de txt bestand elders onthouden en veranderen de Server.MapPath deel van de code.

Bezoeker

<%
'Maak een FileSystemObject
Set objFSO = CreateObject ( "Scripting.FileSystemObject")
'Dit is het pad naar onze bestand
CounterFile = Server.MapPath ( "counter.txt")
Stel objCount = objFSO.OpenTextFile (CounterFile)
visitorcount = CLng (objCount.ReadLine)
indien Session ( "visitorcount") = "" then
Session ( "visitorcount") = visitorcount
visitorcount = visitorcount + 1
objCount.close
Stel objCount = objFSO.CreateTextFile ( "counter.txt", True)
objCount.WriteLine (visitorcount)
end if
objCount.Close
'Elkaar tellen
Response.Write visitorcount
%>

Verwante posten:

  1. Tekst Counter Maak nu een map genaamd tellers of u kunt bellen ...
  2. Elkaar een CSV-bestand Display een CSV-bestand CSV-bestanden zijn gemeenschappelijke formats naar ...
  3. Actieve gebruikers in ASP Deze code laat zien hoe om te laten zien hoe veel actieve ...
  4. aspactiveusers Deze code laat zien hoe om te laten zien hoe veel actieve ...
  5. Het opslaan van een CSV-bestand met een database Maak een database in Access genaamd stock.mdb. Nu maken ...

Gerelateerde posts brought to you by Yet Another Related Posts Plugin.

Plaats een reactie