antal dagar till...

ASP

1 svar · 262 visningar · startad av celia

Medlem sedan dec. 20012 532 inlägg
Trådstart#1

Jag har ett litet ASP-script som jag behöver konvertera och använda i ett CGI-script. Hur gör man?

<%
dim datum
datum = DateDiff("d",Date,"2002-07-26")
%>
<%=datum%> dagar till.......

Tacksam för hjälp :D

Celia

Medlem sedan dec. 19992 555 inlägg
#2

Följande borde funka:

use Time::Local;

my $days = int((timelocal(0,0,0,26,6,2002) - time) / 86400) + 1;

print <<_HTML_;
Content-type: text/html

$days dagar till ...
_HTML_

Avrundningsalgoritmen är lite "rå", så det kommer inte fungera när dagen D är här. Månaderna börjar räknas från 0, så det blir alltså 6 i stället för 7.

454 ms totalt · 4 externa anrop · v20260731065814-full.d34c6d5a
130 ms — deklarationer (db)
134 ms — hämta statistik (db)
181 ms — hämta tråd, inlägg och bilagor (db)
135 ms — ändringar (db)