TXT-Counter som kun kan ses på en admin-side

ved ikke om jeg fik formuleret mig rigtig, counteren skal tælle dem der kommer ind på forsiden, og det er kun resultatet der skal vises på en anden side.

/pfp

alså det kan jeg lave til dig, men ike for 15 point..

kig evt. her: http://www.netcoders.dk/sources.asp?mode=view_source&cat_id=14&id=1010&tech_id=1

/sønderup

Til din dine sider der skal tælles med.
<% strValue = Request.Cookies(\"Counter\")(\"Value\")
       
if strValue = (\"no\") then

        set fs = createobject(\"scripting.filesystemobject\")
    set file = fs.opentextfile(server.mappath(\"aspcount.dat\"))
    counter = cint(file.readline)
   
else
        set fs = createobject(\"scripting.filesystemobject\")
    set file = fs.opentextfile(server.mappath(\"aspcount.dat\"))
    counter = cint(file.readline)
   
        session(\"counter\") = counter
        counter = counter + 1
        file.close
        set file =            fs.createtextfile(server.mappath(\"aspcount.dat\"),true)
        file.writeline(counter)
   
    file.close
    set fs = nothing
       
        Response.Cookies(\"Counter\")(\"Value\") = \"no\"   
        Response.Cookies(\"Counter\").Expires = Date+1

       
end if

%>

Der hvor du skal kunne se resualtet brug.

<%

        set fs = createobject(\"scripting.filesystemobject\")
    set file = fs.opentextfile(server.mappath(\"aspcount.dat\"))
    counter = cint(file.readline)
   
   
    file.close
    set fs = nothing
    Response.Write \"Antal Besøgende = \" & counter

%>

centauri-> Dit forslag ser meget godt ud, kan jeg ikke lave den sætning om:

Response.Cookies(\"Counter\").Expires = Date+1

sådan at cookien udløber efter en antal sekunder?

/pfp

Jo du burde kunne sætte den Expires = Now()

Men det smarte i det hele er jo så at man ikke bare kan refreshe siden og så tæller den bare viddere og viddere, så har du et realististk billed af hvor mange besøgende der kommer om dagen.

Du kan forresten bare genne dit script i en fil for sig og så kalde det med <!--#INCLUDE FILE=\"sounter.asp\" --> der hvor den skal bruges.