Hej!
Har en enkel räknare på min sida. Problemet är bara att när applikationen startar om nollas den. Använder application("counter")=Application("counter")+1;. och skriver det till en text-fil. Men om allt stasnnar börjar den om och skriver över...Kan man lösa detta med typ Application_OnEnd eller nåt? Hur läser jag in den så att den fortsätter där den slutade? Någon som har ett förslag?

//Magnus H

Innan du skriver nytt värde - öppna filen och kolla att det värdet du skriver in inte är mindre än det som redan finns.

Jag har en räknare som använder FSO, då slipper man problemet med att den nollas när servern startar om: Koden ser ut så här:

countfilnamn = "db/counter.dat"n ' Mapp som ska ha skrivrättigheter.
Dim fso
Set fso = Server.CreateObject("Scripting.FileSystemObject")

if fso.FileExists(Server.MapPath(countfilnamn)) = true then
' om finns, läs in
set fh = fso.OpenTextFile(Server.MapPath(countfilnamn))
filinnehall = int(fh.readline) + 1

Set fh = fso.createTextFile(Server.MapPath(countfilnamn))
fh.WriteLine filinnehall
else
' skapa ny
Set fh = fso.createTextFile(Server.MapPath(countfilnamn))
fh.WriteLine "1"
fh.Close
filinnehall = 1
end if
Set fso = Nothing

För att skriva ut den så skriver du ut variabeln filinnehall .

//Anna-Karin