Hej!

Jag har ett årtal och en vecka i två olika variabeler. Nu skulle jag vilja ta reda på datumet för den första och sista dagen i denna vecka (dvs måndagen och söndagen). Någon som vet hur man löser detta med VBScript?

Tacksam för hjälp!

// johan gustafsson

Nu skjuter jag från höften men detta fungerarde för mig men det kan bugga. Det hjälper dig väl en bit på vägen.

<code>
'Svensk locale
session.LCID = 1053

'Detta skall vara första dagen på det aktuella året du har
firstDayOfYear = "2002-01-01"

'Ditt veckonr
myWeek = 15

'Då året har 52 veckor så lägger vi till en vecka i stöten till årets första
'dag och får ett nytt datum.

for i = 1 to 52
tempDate= dateAdd("ww",i,firstDayOfYear)
'Ta ut veckonr på det nya datumet och kolla om det är samma
'som variablen myWeek
if datePart("ww",tempDate,2,1) = myWeek then
'Om det är samma så placerar vi det datumet i variablen
'tempDate
newDate = tempDate
end if
next

'Få ut dagens nummer ur newDate
dayNr = weekday(newDate ,vbMonday)

'Lägga till och ta bort med dateAdd för att få ut första och sista dagen i veckan.
firstDateOfThisWeek = dateAdd("d",(-dayNr + 1),newDate )
lastDateOfThisWeek = dateAdd("d",(-dayNr + 7),newDate )
</code>

//Putte