---
title: "Hämta vald veckas alla dagar och datum"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/98120-hämta-vald-veckas-alla-dagar-och-datum"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "monAmour"
published: "2004-02-24T20:01:45.000Z"
updated: "2004-02-24T20:53:34.000Z"
replies: 4
views: 351
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/98120-hämta-vald-veckas-alla-dagar-och-datum"
---

# Hämta vald veckas alla dagar och datum

## #1 — monAmour, 2004-02-24T20:01Z

Hej,

hur gör jag för att hämta en vald veckas alla datum, från måndag till söndag?
ska hämtas på veckor nr.

alltså
det är vecka 9. hämta alla datum mån-sön i vecka 9.
hur går jag tillväga?

Permalänk: https://www.webforum.nu/p/98120

## #2 — icaaq, 2004-02-24T20:18Z

Om du tar LarsG´s kod [här](http://www.webforum.nu/showthread.php?s=&postid=412052#post412052) 
Sedan tar du det datumet du får ut av startday och kör i en loop x 7 så får du alla dagar och datum....

mv icaaq

Permalänk: https://www.webforum.nu/p/1285565

## #3 — monAmour, 2004-02-24T20:36Z

Hmm okej.
Har detta nu:

```php
		<%
		y = 2004
		fweek = datepart("ww", firstday)
		if fweek > 1 then
			startday = dateadd("d",8-weekday(firstday,vbmonday),firstday)
		else
			startday = dateadd("d",-6-weekday(firstday,vbmonday),firstday)
		end if

		startday = dateadd("ww",currentWeek,startday)
		point = 1
		do while point < 7
			response.write startday+point & "<br>"
			point = point+1
		loop
		%>
```

men får följande resultat:

```
 3/6/1900
3/7/1900
3/8/1900
3/9/1900
3/10/1900
3/11/1900
```

Vilket ju är helt fel :D
Vad har jag gjort för fel nu då ? Observera att jag får variabeln currentWeek från ett annat ställe i koden och den stämmer.

Permalänk: https://www.webforum.nu/p/1285583

## #4 — @nders, 2004-02-24T20:39Z

hur definierar du *firstday* ?

Permalänk: https://www.webforum.nu/p/1285586

## #5 — icaaq, 2004-02-24T20:53Z

```
[red]
<%

weekno = 9
y = 2004

firstday = y & "-01-01"
fweek = datepart("ww", firstday)
if fweek > 1 then
   startday = dateadd("d",8-weekday(firstday,vbmonday),firstday)
else
   startday = dateadd("d",-6-weekday(firstday,vbmonday),firstday)
end if

startday = dateadd("ww",weekno,startday)
for i = 0 to 6
	Response.Write dateadd("d", i, startday) & " " & weekdayname(i+1, false, VBMonday) & "<br/>" & vbcrlf
next
        %>
[/red]
```

mv icaaq

Permalänk: https://www.webforum.nu/p/1285592

---

Tråden på webben: https://www.webforum.nu/amne/asp/98120-hämta-vald-veckas-alla-dagar-och-datum
