Dokładniejsze tekst counter

Wysłany 4 marzec 2009 w ASP przez admin

To jest bardziej dokładne niż licznik naszym poprzednim przykładzie, w tym np. liczyć tylko wtedy, gdy na sesję inkrementowana. Oznacza to, że liczyć będą bardziej dokładne, jeśli chcesz ją mieć, że jest.

Tworzenie pliku txt i umieścić w niej numer startowy. Następnie należy skopiować kod poniżej, jeżeli chcesz, aby wyświetlić licznik na stronie.

W przykładzie poniżej counter.txt jest umieszczona w tym samym katalogu co do tej strony, jeśli umieszczenie pliku txt gdzie indziej zapamiętać i zmienia Server.MapPath część kodu.

Gościem

<%
"Utworzyć FileSystemObject
Ustaw objFSO = CreateObject ( "Scripting.FileSystemObject")
"Jest to ścieżka do naszego pliku counter
CounterFile = Server.MapPath ( "counter.txt")
Ustaw objCount = objFSO.OpenTextFile (CounterFile)
visitorcount = CLng (objCount.ReadLine)
jeśli Session ( "visitorcount") = "", a następnie
Sesja ( "visitorcount") = visitorcount
visitorcount = visitorcount + 1
objCount.close
Ustaw objCount = objFSO.CreateTextFile ( "counter.txt", True)
objCount.WriteLine (visitorcount)
End If
objCount.Close
"Wyświetlacz liczyć
Response.Write visitorcount
%>

Podobne posty:

  1. Tekst Licznik teraz utworzyć folder o nazwie liczniki lub możesz zadzwonić ...
  2. Wyświetl plik CSV Wyświetl plik CSV CSV wspólnych formatów ...
  3. Aktywni użytkownicy w ASP Ten fragment kodu pokazuje, w jaki sposób by pokazać jak wiele aktywnych ...
  4. aspactiveusers Ten fragment kodu pokazuje, w jaki sposób by pokazać jak wiele aktywnych ...
  5. Zapisywanie pliku CSV do bazy danych Tworzenie bazy danych o nazwie stock.mdb dostępu. Teraz stworzymy ...

Podobne posty przyniósł ci przez Yet Another Related Posts Plugin.

Dodaj komentarz