WeekOfYear

Jeg har forsøgt at beregne hvilken uge i året en specifik dato tilhører, men der er nogle usikkerheder i min beregning i og med, at den ikke altid rammer helt præcis - nogle gange er det +- 1 og andre gange rammer den rigtigt.

Min kode ser således ud:
----------------
dim a,b,c,d,w,x
   
x=2002
a=cdate("01-01-"&x)
b=date()   
d=8-weekday(b,2)   
       
w=int((datediff("d",a,b)-d)/7)+1           
response.write "VI ER NU I UGE: "&w&"<br><br>"
-------------------------

Nogen der har en idé om hvad der går galt??????????????????

På forhånd tak.

/NeuRo