Find ugenummer ud fra dato

function ugenummer (d,m,y) {
                              var t,wd,yd,thisThursday,week,nY,pY;
                              // d:1..31 m:0..11 y:fircifret årstal
                              //#en dag har samme ugenr som torsdagen i samme uge
                              t = new Date (y,m,d);
                              wd = t.getDay();
                              yd = yday(y,m,d);
                              if (wd == 0) wd = 7;
                              d = d + 4 - wd;
                              yd = yd + 4 - wd;
                              nY = (m == 11); if (nY) nY = (d > 31);
                              pY = (m ==  0); if (pY) pY = (d <  1);
                              if (nY) {
                                m= 0; d= d-31; y++; 
                                yd = yday(y,m,d);
                              } else if (pY) {
                                m=11; d= d+31; y--; 
                                yd = yday(y,m,d);
                              }
                              thisThursday = yd;
                              t = new Date (y,0,1);
                              wd = t.getDay();
                              yd = yday(y,0,1);
                              if (wd > 4) wd = wd - 7;
                              yd = yd + 4  - wd;
                              week = (thisThursday - yd) / 7 + 1;
                              return week;
                          }

Function getWeekNr(FunkDate)
dim returval
  returval = datepart("ww",FunkDate,2,2)
  if returval > 52 then
    if datepart("ww",dateadd("d",7,FunkDate),2,2) = 2 then returval = 1
  end if
  getWeekNr = returval
End Function

How skal du ikke lot group by week i sql sætningen ??

Det har da ikke noget med ASP at gøre ?!

Du skal også passe lidt på med ugenumre...

Hvis dine data løber længere end et år, begynder de jo at gå igen. Desuden lagde den 1. jan i uge 53 i år, og 31. dec kommer til ligge i uge 52...

Den er jeg squ ikke helt med på. 1-2 jan 05 skal ligge i uge 53 og 31. dec 05 skal ligge i uge 52.

Du kan selv løbe det igennem her:
http://www.solit4u.dk/kalender/default.asp?M=1&Y=2005

hnteknik >>
Også min pointe... Hvis de skal sorteres efter ugenummer, kommer 1-2 jan til at ligge efter 31. dec, hvilket selvfølgelig ikke giver nogen mening :o)

Vi skal nok have chaser64 til at forklare lidt nærmere hvad det er han ønsker...

fennec>>

Ja man skal nok lave et lb nr til hver uge i året

1. uge (53) lbnr 1 osv. og sortere på lbnr.

Nærmere forklaring:
Mit resultat skal være således

Start Dato: 01-01-05
Slut Dato: 14-01-05

Uge 1: 56 besøgende
Uge 2: 54 besøgende

Man indtaster selv perioden (startdato og slutdato)...

Hvis du kan leve med at bruge det amerikanske ugeformat (IKKE det vi bruger i DK), kan du gøre det direkte i SQL:
select count(id) as antal, datepart(ww,dato) as weekNr from visit where dato>='20050101' and dato<='20050114' group by year(dato), datepart(ww,dato) order by year(dato), datepart(ww,dato)

Skal de der imod være DK ugenumre, hvad det jo nok skal, skal det laves i koden (ikke testet):

set rs = conn.execute("select count(id) as antal, dato from visit where dato>='20050101' and dato<='20050114' group by dato order by dato")
oldWeek = ""
counter = 0
while not rs.eof
  if oldWeek = "" then
    oldWeek = getWeekNr(rs("dato"))
    rsponse.write "Uge " &oldWeek
  end if
  if oldWeek <> getWeekNr(rs("dato")) then
    rsponse.write counter & "<br>"
    counter = 0
    rsponse.write "Uge " &getWeekNr(rs("dato"))
  end if
  counter = counter + rs("antal")
  rs.MoveNext
wend
rsponse.write counter & "<br>"

Lukke ???