webForumDet fria alternativet

Fyller du år en måndag i år?

Småprat

0 svar · 195 visningar · startad av J.N.

Medlem sedan apr. 20031 660 inlägg
Frågan#1

HEJ!

För några veckor sedan kom jag av en slump att uppmärksamma att jag inte alls fyller år v48 som jag har gjort alla andra (vilket visade sig vara fel) år i mitt liv.

Lite tankearbete gav att det beror på att det är skottår i år, som flyttat alla som fyller år en måndag från den vanliga veckan till nästa.

För att kontrollera detta, satte jag ihop lite kod, och det visar sig att jag har fyllt år v49 en gång tidigare, nämligen 1976.
Finns det någon wF-it som fyllde år en måndag 1948 bytte de vecka det året också.

Jag ger er möjlighet att se HELA listan för intervallet 1000-2999 med följande vb-kod:

<%
for i=1000 to 2999 step 4
	if DatePart("WW", i & "-11-29",2,2) = 49 then
		j =j +1
		response.write j & VbTab & i &"<br>"
	end if
	if Mid(i,3,4)="00" then response.write "<br>" & i & "-talet<br>"
next
%>

(OBS! De som fyller år en måndag nästa år, innan 24-2, bör bli flyttade då, eftersom de inte blev det i år, men det får ni själv experimentera fram.)

259 ms totalt · 4 externa anrop · v20260731065814-full.6fe65c25
121 ms — deklarationer (db)
0 ms — hämta statistik (cache)
130 ms — hämta tråd, inlägg och bilagor (db)
127 ms — ändringar (db)