---
title: "Veckan"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/5784-veckan"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "fredrik99"
published: "2000-06-01T21:39:00.000Z"
updated: "2000-06-05T11:27:00.000Z"
replies: 5
views: 228
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/5784-veckan"
---

# Veckan

## #1 — fredrik99, 2000-06-01T21:39Z

Jag har gjort en databas, där det finns fälten vecka och namn.

När det är vecka 1 så ska det komma upp det som står i namn fältet, vecka.
Ex,
vecka 1 sova
vecka 2 äta
vecka 3 träna
I vecka 1 ska det stå sova hela veckan....hoppas att ni förstår.

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

## #2 — fredrik99, 2000-06-02T16:54Z

Någon som vet?

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

## #3 — Vide, 2000-06-03T15:10Z

Först får du kolla vilken vecka det är... (det finns nått inlägghär under ASP som har med det att göra... hittar det inte just nu...)

Sen får du helt enkelt göra en SQL-sats...:
SQL = "Select \* from tabell where vecka = " & vecko_variabel
Set RS = Databas.execute(SQL)

Response.write RS("namn")

Så... nu får du ut det som finns i namn...

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

## #4 — fredrik99, 2000-06-03T23:48Z

Har detta scriptet nu:

```
<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=c:\inetpub\wwwroot\cgi-bin\databas.mdb"
SQL = "SELECT namn, vecka FROM klubbstugan"
Set RS = Connection.execute(SQL)
%>
<%
do until rs.EOF
If DatePart("ww", rs("vecka"),2) = DatePart("ww", Date(), 2) Then
response.Write rs("namn")
end If
loop
%>
```

Men det funkar ej, någon som har en bättre lösning?

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

## #5 — Vide, 2000-06-04T00:25Z

Testa att lägga det du får från databasen i en variabel innan du jämför den mot andra... det har en tendens att hålla kvar samma record när man loopar...:

```
<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=c:\inetpub\wwwroot\cgi-bin\databas.mdb"
SQL = "SELECT namn, vecka FROM klubbstugan"
Set RS = Connection.execute(SQL)
%>
<%
var = rs("vecka")
do until rs.EOF
If DatePart("ww", var,2) = DatePart("ww", Date(), 2) Then
response.Write rs("namn")
end If
loop
%>
```

... men detta sätt tror jag inte är så bra... det är bättre att låta SQL hålla reda på sortering och urval, istället för att göra en loop där du gör ditt urval... Nu vet jag inte hur man skapar urvalsfrågor för datum, då jag inte hållt på med det alls... men jag vet att det finns många andra här som kan...

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

## #6 — fredrik99, 2000-06-05T11:27Z

Nej, det funkade inte. Jag kommer inte ens in i filen.

Något som vet en bättre lösning på det hela?

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/5784-veckan