[ASP] Datums van weeknummer krijgen

[Polderdijk]

Ik ben met een stukje programma bezig dat tijdlijsten genereerd voor ons bedrijf, nu zit ik alleen nog met een probleem met weeknummers. Ik heb het al voor elkaar gekregen dat ik van een datum het weeknummer krijg, maar het lukt me niet om dit ondersom te doen. Ik wil dus eigenlijk dat hij van een week een pull-down menu genereerd met de datums die in die week zitten.

Dus stel er wordt het weeknummer 21 en jaar 2002 meegegeven dat het volgende pull-down ontstaad:

Kies datum:
20-05-2002 (ma)
21-05-2002 (di)
22-05-2002 (wo)
23-05-2002 (do)
24-05-2002 (vr)
25-05-2002 (za)
26-05-2002 (zo)

Ik hoop dat jullie weten hoe dit moet, oja, ik weet wel hoe ik van de gegevens een pull-down krijg, maar ik wil graag weten hoe je die datums krijg!

[TeeDee]

Kijk hiero eens:

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/vbscripttoc.asp

En dan met name (denk ik ), datediff, dateserial, weekday enz. enz.

[Polderdijk]

Op donderdag 30 mei 2002 10:58 schreef TeeDee het volgende:
Kijk hiero eens:

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/vbscripttoc.asp

En dan met name (denk ik ), datediff, dateserial, weekday enz. enz.

Ik heb heel MSDN afgezocht maar ik kan dus ECHT NIKS vinden. Weet niemand hoe dit werk??

[LuCarD]

In 40 minuten heel MSDN??? WOW...

In ieder geval:
Zoek dag 1 van week 1.
Gebruik dateadd("ww", <WEEKNUMMER>, resultaat van boven)
en dan heb je de start van de week.

HTH

[Polderdijk]

Op donderdag 30 mei 2002 11:53 schreef LuCarD het volgende:
In 40 minuten heel MSDN??? WOW...

In ieder geval:
Zoek dag 1 van week 1.
Gebruik dateadd("ww", <WEEKNUMMER>, resultaat van boven)
en dan heb je de start van de week.

HTH

Ik heb het geprobeert en hij doet het inderdaad, ik gebruik nu:

[script]

If Datum = "" Then
DatumPullDown = DatumPullDown & "<option value="""">Kies datum</option>"
If Week <> "" Then
x = 1
BeginDatumWeek = (DateAdd("ww", (Week-1), "1-1-" & Jaar) - 2)
Do While x < 8
DatumPullDown = DatumPullDown & "<option value=""" & DateAdd("d", x, BeginDatumWeek) & """>" & DateAdd("d", x, BeginDatumWeek) & "</option>"
x = x + 1
Loop
End If
End If

[/script]
Nu moet ik nog ff er voor zorgen dat er ma, di, wo, do bij komt te staan, maar dat is zo gepiept!