RE:Milisegundo
Publicado por
Miguel (1 intervención) el 05/03/2008 12:49:30
Este proceso lo tengo hecho para Visual Basic 6 pero seguro que se podrá adaptar a ASP o en su caso Javascript. El único problema es que utilizo un Timer que supongo que con el setInterval de Javascript se podrá utilizar.
Lo primero que hago es crear las variables globales y declarar la función timeGetTime de winmm.dll.
Global TiempoInicial
Global SegundoAnterior As Integer
Declare Function timeGetTime Lib "winmm.dll" () As Long
Inicializo la variable SegundoAnterior a 0.
Después creo un Timer con un intervalo de 10 milisegundos. Que cada vez que se ejecuta lanza este código:
If SegundoAnterior <> Second(Now) Then
TiempoInicial = timeGetTime()
End If
SegundoAnterior = Second(Now)
Y finalmente para obtener la fecha con los milisegundos utilizo este código:
Ms = timeGetTime() - TiempoInicial
Format(Now, "hh:nn:ss") & "." & Ms
