8 svar · 269 visningar · startad av bigsky
Sökte först, men hittade föga imponerande svar. Kan någon lite snabbt sätta ihop ett förslag på en nedräkning som visar resultatet i formatet:
Det är X dagar, X timmar, X minuter och X sekunder kvar till den 1:a mars 2004.
http://www.webforum.nu/showthread.php?s=&postid=698224#post698224
i den tråden beskriver de hur man kan göra. för att få ut sekunder till 1:a mars 2004, borde du kunna göra DateDiff("s",2004-03-01,Now())
dteFuture = #2004-03-01 00:00:00#
lngSeconds = DateDiff("s", Now, dteFuture)
[blue]' Antag att tiden är 2003-11-10 00:23:00
' d.v.s. lngSeconds = 9589020[/blue]
intDays = Int(lngSeconds / 60 / 60 / 24)
[blue]' intDays = 110[/blue]
lngSeconds = lngSeconds - (intDays * 60 * 60 * 24)
intHours = Int(lngSeconds / 60 / 60)
[blue]' intHours = 23[/blue]
lngSeconds = lngSeconds - (intHours * 60 * 60)
intMinutes = Int(lngSeconds / 60)
[blue]' intMinutes = 37[/blue]
lngSeconds = lngSeconds - (intMinutes * 60)
[blue]' lngSeconds = 0[/blue]
Response.Write "Det är " & intDays & " dagar, " & intHours & " timmar, " & _
intMinutes & " minuter och " & lngSeconds & " sekunder kvar till " & dteFuture & "."
Det här är ett sätt att göra det på, men ej testad för nollvärden. Det ska dock inte vara några problem vad jag kan se.
red. Rättade till intSeconds till lngSeconds
Snyggt, men sekunderna i nedräkningen stämmer väl inte riktigt. Borde ju aldrig vara mer än 59 kvar.
När skulle det hända? Det är inte möjligt vad jag kan se.
Alltså, det som skrivs ut nu är:
Det är 111 dagar, 10 timmar, 33 minuter och 2011 sekunder kvar till 2004-03-01 12:00:00.
Det skulle vara fint om det stod:
Det är 111 dagar, 10 timmar, 33 minuter och 57 sekunder kvar till 2004-03-01 12:00:00.
Jag skulle gissa på att det beror på att du inte ser min finstilta redigering ;)
Jag hade råkat skriva intSeconds istället för lngSeconds. F'låt :)
Aja, där ser man. Tack så mycket för besväret denna sena natt ;)
Varsågod.