Counter mit Reload-Sperre

[Christoph Ruhnke]

Hallo Manuel

Ich suche ein kostenloses ASP-Script für einen werbefreien Besucherzähler MIT Reload-Sperre

Kostenlos: Selbst machen

Reload-Sperre: Da mußt Du mit ASP-Sessions oder mit Cookies arbeiten, das setzt aber beides voraus, daß Cookies auf dem Client (Browser) freigeschaltet sind.

Es sollte ein grafischer Counter sein, der eine festzulegende Stellenzahl hat, also nicht "Besucher: 12" sondern "Besucher: 00012"

Grafisch: Für jede Ziffer 0..9 eine kleine Grafik auf dem Server hinterlegen, es wird dann im ASP-Script der Zähler zusammen gebastelt.

Funktion in Global.Asa könnte so sein:

Sub Session_OnStart()
 Dim Counter
 Application.Lock
 Counter = Application("Counter")
 if Counter="" then Counter=1 else Counter=Counter+1
 Application("Counter")=Counter
 Application.Unlock
End Sub

Script auf der betreffenden Seite:

...
<p>Sie sind Besucher Nummer :
 <script language="vbscript" runat="server">
  Dim Counter, I, url
  Counter=Trim(CStr(Application("Counter")))
  While Len(Counter)<5
   Counter="0" & Counter
  Wend
  For I=1 To Len(Counter)
   url = Mid(Counter,I,1) & ".gif"  'Ergibt 0.gif, 1.gif, usw.
   Response.write("<img src='" & url & "'>")
  Next
 </script>
</p>

CU Christoph