Frågan#1
Är det någon som har skrivit en liten kodsnutt för nedräkning? Jag har sökt lite men bara hittat:
X dagar kvar.
Jag är ute efter:
X dagar, x timmar, x minuter och x sekunder kvar.
Någon som kan dela med sig av lite kod?
Nedräkning.
2 svar · 324 visningar · startad av Quid
Satt faktiskt för ett par veckor sen i funderade själv på hur man gjorde, och satte mig o pillade lite.
Lyckades faktiskt skriva ett som skriver ut som minst i minuter, men sekunder är inte svårt att fixa in i det lilla.
Är också säkerligen långt ifrån det bästa skrivna, men det fungerar iaf :)
<%
Dim Dagen, Dag, Timme, Minut, SummaTid, SvarDag, SvarTimme, SvarMinut
Dagen = DateDiff("d", Date, "2002-11-01")
Dag = Dagen * 86400
Timme = (14 - Hour(Now)) * 3600
Minut = (20 - Minute(Now)) * 60
SummaTid = Dag + (Timme) + (Minut)
SvarDag = (((SummaTid / 24) / 60) / 60)
SvarTimme = (SvarDag - Int(SvarDag)) * 24
SvarMinut = (SvarTimme - Int(SvarTimme)) * 60
%>
<% =Int(SvarDag) %>
<% =Int(SvarTimme) %>
<% =Int(SvarMinut) %>