Nötter är gott...En datum-nöt att knäcka...
Hallåja
om jag vet vilken vecka jag befinner mig i (som Peter Aronsson löste åt mig), hur får jag då reda på vilket datum ifrågavarande veckas måndag är?
mvh StefanSv: En datum-nöt att knäcka...
En funktion som fixar detta:
WeekNrToDate(Veckonummer, Årtal, Dagnummer)
Veckonummer: Det veckonummer som du är ute efter.
Årtal: tex 2005, är det samma år som servern befinner sig i så skriver du Year(Date)
Dagnummer: Den dag du är ute efter, måndag=1, tisdag=2 osv
Det finns ingen error hanterare!
Duger den... ?
<%
Response.Write WeekNrToDate(4,2000,1)
Function WeekNrToDate(varWeekNr,varYear,varDayNr)
varWeekNrThisYear = DatePart("ww",Cdate(varYear&"-01-01"),2,2)
If varWeekNrThisYear = 1 Then
varDayAdd = ((7*(varWeekNr-1)) - (DatePart("w",Cdate(varYear&"-01-01"),2,2)-1))+(varDayNr-1)
Else
varDayAdd = ((7*(varWeekNr-1)) + (8-DatePart("w",Cdate(varYear&"-01-01"),2,2)))+(varDayNr-1)
End If
WeekNrToDate = DateAdd("d",varDayAdd,Cdate((varYear&"-01-01")))
End Function
%>