02. marts 2003 - 13:51
Der er
14 kommentarer og 4 løsninger
Trække 2 tidspunkter fra hinanden
Hvordan trækker jeg to tidspunkter fra hinanden?? F.eks. 13:00:00 - 12:49:00 = 11 min???
Annonceindlæg tema
Cloud & AI
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.
02. marts 2003 - 13:55
#1
02. marts 2003 - 13:56
#2
02. marts 2003 - 13:56
#3
Du kan bruge en funktion det hedder DateDiff() Kan ikke lige huske parameterne, men finder dem lige.. /korup
02. marts 2003 - 13:59
#4
Ja, det er jo ikke nødventig, der er jo nogle hurtige hovede her inde :) /korup
02. marts 2003 - 14:04
#5
Det giver -11 Kan man ikke få det ud formateret f. eks 00:11 ??
02. marts 2003 - 14:31
#6
Prøv med Tid1 = #13:00:00# Tid2 = #12:49:00# "00:" & Right("0" & DateDiff("n", Tid1, Tid2), 2)
02. marts 2003 - 14:35
#7
Det skal jo være den reelle tid der er gået i sek.
02. marts 2003 - 14:35
#8
Husk at parametrene i Datediff er startdato, slutdato. Dvs. den mindste dato står først. Dette skulle meget gerne give 11 og ikke -11. Mht. formateret resultat, så bliver du selv nød til at skrive denne funktion
02. marts 2003 - 14:36
#9
meyer > Vil du have det i sekunder?
02. marts 2003 - 14:37
#10
Ja vil have det i min og sek.
02. marts 2003 - 14:38
#11
Ikke noget med timer? Sådan her: MM:SS
02. marts 2003 - 14:40
#12
jo kan jeg få timerne med er det ok - den skal bare skrive det tidsrum man har været om en bestemt ting på sitet.
02. marts 2003 - 14:47
#13
Prøv med Dim Hour, Min, Sec Tid1 = #12:49:02# Tid2 = #13:00:00# Sec = DateDiff("s", Tid1, Tid2) Min = Sec \ 60 Sec = Sec Mod 60 Hour = Min \ 60 Sec = Right("0" & Sec, 2) Min = Right("0" & Min, 2) Hour = Right("0" & Hour, 2) Test = Hour & ":" & Min & ":" & Sec
02. marts 2003 - 14:48
#14
Den nederste linje kan udskrives direkte. Sådan her Response.Write Hour & ":" & Min & ":" & Sec
02. marts 2003 - 14:51
#15
Ups... Der er en lille bug i koden. Prøv det her i stedet Dim Hour, Min, Sec Sec = DateDiff("s", Tid1, Tid2) Min = Sec \ 60 Sec = Sec Mod 60 Hour = Min \ 60 Min = Min Mod 60 Sec = Right("0" & Sec, 2) Min = Right("0" & Min, 2) Hour = Right("0" & Hour, 2) Response.Write Hour & ":" & Min & ":" & Sec
02. marts 2003 - 14:55
#16
Perfekt - takker :-)
02. marts 2003 - 14:56
#17
Tak for points :)
03. marts 2003 - 09:58
#18
Tak for points :)
Kurser inden for grundlæggende programmering