'Högst upp på sidan:
starttime = timer()
'längst ned på sidan
Response.write "Sidan laddades på " & starttime - timer() & " sekunder."
Annars:sök på timer* i detta forum.
13 svar · 600 visningar · startad av mattiasnordin
Hur får man en sida att räkna hur lång tid det tog att ladda den? Som typ längst ner på webforum sidan :)
'Högst upp på sidan:
starttime = timer()
'längst ned på sidan
Response.write "Sidan laddades på " & starttime - timer() & " sekunder."
Annars:sök på timer* i detta forum.
Observera att Timer() inte funkar så bra, lite "oexakt".
Vide har gjort en timerkomponent som är bättre.
Fiffigt. Den första lösningen duger gott åt mig (om man kan lita någorlunda på siffrorna). Tackar. ;)
För att inte dränka Vide i PM... någon som hittat den?
Dim oTimer
oTimer = server.createobject("webeye.timerclass")
oTimer.startTimer
'Do stuff
oTimer.stopTimer
Response.write "<br>Tid: " & oTimer.GetTimer()
Set oTimer = nothing
Du får registrera den i system32 också.
Jag gjorde en class och med lite mätningar så tyckte jag ändå att skinnaden inte var så stor.
Class myTimer
Private timerStart, timerStop
Public Sub startTimer()
timerStart = timer()
End Sub
Public Sub stopTimer()
timerStop = timer()
End Sub
Public Function GetTimer()
getTimer = FormatNumber((timerStop - timerStart) * 1000, 0)
End Function
End Class
Dim oTimer
Set oTimer = New myTimer
oTimer.startTimer
'Do stuff
oTimer.stopTimer
Response.write "Tid :"& oTimer.getTimer
Set oTimer = Nothing
Timer oexakt? hmm hag har då aldrig märkt att den är oexakt. Att skapa extra com-objekt känns dock lite nödigt - overkill :)
Jesper T, är det inte bättre att köra timerStart = Timer() i Class_Initialize ? Känns onödigt att skriva myClass.StartTimer()
/m
'Högst upp på sidan:
starttime = timer()
'längst ned på sidan
Response.write "Sidan laddades på " & timer() - starttime & " sekunder."
känns som en bättre kod, dvs tiden nu minus tiden när sidan började laddas... fast det kanske var så uppenbart att ingen brydde sig om att kommentera det, eller cyklar jag på hal is nu?
Herman skrev:
Timer oexakt? hmm hag har då aldrig märkt att den är oexakt. Att skapa extra com-objekt känns dock lite nödigt - overkill :)
Timer har en precision på ca 50ms, vilket definitivt kan vara ett problem i många situationer, men gäller det en mätning på hela sidans exekvering så tycker jag att den räcker bra.
ahlen skrev:
Jesper T, är det inte bättre att köra timerStart = Timer() i Class_Initialize ? Känns onödigt att skriva myClass.StartTimer()
Att dra igång operationer i initieringen är ingen vidare bra teknik, och resulterar bara i att man endast kan använda objektet en gång.
Haha, fick en sådan härlig laddninstid:
Sidan laddades på -0,03125 sekunder.
Man har ju snabb dator ;)