Avatar billede goose Nybegynder
26. oktober 2005 - 09:55 Der er 2 kommentarer og
1 løsning

Daglig besøgstæller

Jeg bruger på et site en daglig besøgstæller som benytter application variabler i global.asa

Desværre sker der et eller andet på serveren som gør, at denne tæller bliver nulstillet flere gange om dagen selvom domænet er lagt i sin egen application pool.

Derfor skal jeg have lavet noget alternativt og jeg har en forestilling om, at man må kunne lave en tæller som opdaterer en tekstfil ved hvert besøg på sitet.

Derudover skal den naturligvis starte forfra hver dag.

Er der nogen der har en løsning på hvordan dette laves?

/Goose
Avatar billede jokkejensen Novice
26. oktober 2005 - 10:15 #1
jeg plejer at gemme en række i en tabel for hver session_start, heri smider jeg dato, ip, sessionID, hele headeren.. så kan det fint bruges til statestik...

Men ellers skal du nok have fat i applikation_end og skrive til en tekst fil, Husk at dine applikation variabler bliver nulstillet når der ingen brugere er på sitet, altså applikation_end..
Avatar billede goose Nybegynder
26. oktober 2005 - 10:20 #2
Okay, kan du se om det så evt. skyldes en fejl i min global.asa?

Du får den lige her:

<SCRIPT LANGUAGE="VBScript" RUNAT="Server">

Sub Application_OnStart
Application("ActiveUsers") = 0
Application("HighestToDate") = 0
Application("TodaysDate") = Date
Application("VisitorsToday") = 0
End Sub

Sub Session_OnStart
Session.Timeout = 1 '## minutes
Session("Start") = Now

Application.Lock

Application("ActiveUsers") = Application("ActiveUsers") + 1

if Application("ActiveUsers") > Application("HighestToDate") then
Application("HighestToDate") = Application("HighestToDate") + 1
end if
if Application("TodaysDate") = Date then
Application("VisitorsToday") = Application("VisitorsToday") + 1
else
Application("TodaysDate") = Date
Application("VisitorsToday") = 1
end if

Application.UnLock
End Sub

Sub Session_OnEnd
' Decrease the active visitors count when the session ends.
Application.Lock
Application("ActiveUsers") = Application("ActiveUsers") - 1
Application.UnLock
End Sub

</SCRIPT>

/Goose
Avatar billede goose Nybegynder
17. november 2005 - 21:27 #3
Nå, jeg fik domænet flyttet over på en anden server og så virkede det igen. Jeg lukker og slukker, men hvis du føler dig snydt jokkejensen, så lav en kommentar og jeg giver dig lidt point for din tid.

/Goose
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester