5 svar · 390 visningar · startad av devotion
Hej!
Jag använder i timer på min sida. Resultatet visas ju i sekunder.
Hur omvandlar jag det till minuter och sekunder)
'Starta timern
dStartTimer = timer()
...
totalTime = timer() - dStartTimer
Response.write "Tidsåtgång: " & totalTime & " sekunder."
Mvh
Henrik
Genom att dividera antalet sekunder med 60 får du minuter, men du måste casta till int för att få bort decimalerna. Tror man skriver CInt i vbskript, i så fall:
minuter = CInt(totalTime / 60)
De resterande sekundrarna kallas på mattespråk för rest, eller med ett finare namn modulo. Har för mig det skrivs Mod i vbskript, i så fall:
sekunder = totalTime Mod 60
Så gör man i alla fall, men förhoppningsvis kanske någon annan kan visa hur det skrivs i vbskript om du inte vet själv.
sekunder = totalTime % 60
tydal: Stämmer i stort sett förutom att CInt/CLng avrundar både uppåt/neråt.
Int avrundar alltid neråt. Fix avrundar positiva tal neråt och negativa tal uppåt.
echoSwe, inte om man kör med VBScript som devotion ser ut att köra med.
Function FormatMinSec(ByVal lSecond)
Dim lMinute
lMinute = Fix(lSecond / 60)
lSecond = lSecond Mod 60
FormatMinSec = lMinute & "min " & lSecond & "s"
End Function
Response.Write FormatMinSec(150)