04. marts 2003 - 13:59Der er
5 kommentarer og 2 løsninger
Datediff kal beregne tid på start/stop
|----------- KODE ----------| <% sqltid="SELECT eventting, tid From tidsforbrug Where opgavenr = '" & request("ID") & "'" set rstid = conn.execute(sqltid) %>
<% do while not rstid.EOF %> <% If rstid("eventting") = "START" Then eventstart = rstid("tid") tidsforbrug = "" Else eventstop = rstid("tid") tidsforbrug = Datediff("h", eventstart, eventstop)
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Problemmet med dateDiff er den kun kan angive tiden i enten timer, minutter eller sekuner. Den kan ikke give det format tt:mm:ss så der skal laves en funktion.
Prøv at ligge denne function i bunden af din fil:
<% function sTimeCalc(StartTime, FinishTime) Dim diff, mins, hours, secs diff = datediff("s",StartTime,FinishTime) 'set the minutes ignoring the remaining fraction hours = int(diff / (60*60)) ' set the minutes by using the remaining fraction and multiplying by 60 i.e., .5 * 60 = 30 mins = Int(60*(diff / (60*60) - hours)) secs = Int(diff - ((60*60)* hours) - (60 * mins)) hours = Right("0" & hours,2) mins = Right("0" & mins,2) secs = Right("0" & secs,2) sTimeCalc = hours & ":" & mins & ":" & secs end function %>
-----------------
Ret i else delen inde i loop'et. Ret dette styke kode:
Ja jeg er helt ening med dig det skal give 3:42:18 og ikke over 15 timer.. Pørv at tilføje denne linie for at se om tidspunkterne kommer rigtigt fra databasen.
Response.write eventstart & " - " & eventstop
Lige efter denne linie: tidsforbrug = sTimeCalc(eventstart, eventstop)
Du får lige ½ point, da løsningen er halvt klaret - jeg opretter lige et nyt spørgsmål, for resten af løsningen
Synes godt om
Ny brugerNybegynder
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.
