Är det någon som har eller vet var man kan hitta något enkelt script för att placera en (session) räknare i global.asa. Den ska helst skriva besökarantalet i en txt-fil. Har försökt skriva en själv men jag gjorde något allvarligt fel för scriptet sumpade hela servern he he.....

Tackar på förhand.

I global.asa

Sub Application_OnStart
Application("visitors")=0
End Sub

Sub Session_OnStart
Application.Lock
Application("visitors")=Application("visitors")+1
Application.UnLock
End Sub

Sub Session_OnEnd
Application.Lock
Application("visitors")=Application("visitors")-1
Application.UnLock
End Sub

Sedan använder du tex:

Response.Write "Nu är det " & Application("visitors") & " besökare på sidan"

Ja men detta är en realtimeräknare. Det är jag inte ute efter, utan bara hur många som någonsin gått in på sajten.

/Tack ändå

Sorry, missförstod dig.... nytt försök:

Set fsoObject = Server.CreateObject("Scripting.FileSystemObject")
Set filObject = fsoObject.GetFile(Server.MapPath("hit_count.txt"))
Set tsObject = filObject.OpenAsTextStream

lngVisitorNumber = CLng(tsObject.ReadAll)
lngVisitorNumber = lngVisitorNumber + 1
Set tsObject = fsoObject.CreateTextFile(Server.MapPath("hit_count.txt"))
tsObject.Write CStr(lngVisitorNumber)

Response.Write(lngVisitorNumber)

Hoppas denna snurra löser problemet

Tack Ulf! Fungerar suveränt. Jag tycker att jag hade gjort en liknande men det funkade inte. Man lär sig alltid något nytt. Tack än en gång.

/Raimo