milliseconden in asP?

[Verwijderd]

Ik wil graag weten hoe lang het duurt voordat mijn script is uitgevoerd. Dit is meestal binnen een seconde, dus aan de DateDiff("s", time_eind, time_start") heb ik niks. Is er een milliseconden oplossing?

[jelmervos]

Boven aan je page:

code:

<% Dim SM: SM = Timer %>

Onder aan je page:

code:

<% Response.Write("<font size=""1""><div align=""right""><br>" & Round(Timer - SM, 3) & "</div></font>") %>

Volgens mij krijg je alleen een probleem als je dit rond 12 uur 's nachts doet.

[Verwijderd]

Bij deze de totaal oplossing:

Zet boven aan in de code:

Dim StopWatch(19)
Dim EndTime
StartTimer(1)

Sub StartTimer(x)
StopWatch(x) = timer
End Sub

Function StopTimer(x)
EndTime = Timer
If EndTime < StopWatch(x) Then
EndTime = EndTime + (86400)
End If
StopTimer = EndTime - StopWatch(x)
End Function

En dit onderaan de code:

Response.Write(round(StopTimer(1),2))

[jelmervos]

Komt op hetzelfde neer, alleen een paar extra subs.

[Verwijderd]

Klopt, maar dit stukje code:

If EndTime < StopWatch(x) Then
EndTime = EndTime + (86400)
End If

is een workaround voor je 12 uur probleem