---
title: "Ändra status!"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/78357-ändra-status"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "asp"
published: "2003-05-28T18:22:28.000Z"
updated: "2003-05-28T21:45:43.000Z"
replies: 4
views: 174
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/78357-ändra-status"
---

# Ändra status!

## #1 — asp, 2003-05-28T18:22Z

Tjenare!

Detta är nog ingen match för er killar. Läget är såhär att jag har några ligor i tabellen tblLiga där ligan har statusen on eller off.

Nu vill jag att om sista datumet har paserat dagens datum så skall statusen vara off, om dagens datum är större än sista datumet så skall statusen vara on.

Här kommer en kod, dessvärre fungerar den inte.

```
strSQL = "SELECT TOP 1 datum FROM tblSpel ORDER BY datum DESC"
Set objDate = Conn.Execute(strSQL)
If Date() > CDate(objDate("datum")) Then
   strSQL = "UPDATE tblLiga, tblSpel SET tblLiga.status = 'off' WHERE tblSpel.datum = (SELECT TOP 1 datum FROM tblSpel ORDER BY datum DESC) AND tblSpel.ligaid = tblLiga.ligaid"
  Conn.Execute(strSQL)
End If
Set objDate = Nothing

Rs.Close : Set Rs = Nothing
Conn.Close : Set Conn = Nothing
```

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

## #2 — LarsG, 2003-05-28T18:59Z

Vad finns det för relation mellan tblliga och tblspel?

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

## #3 — asp, 2003-05-28T19:38Z

I tblLiga finns status medan i tblSpel står alla datum.

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

## #4 — LarsG, 2003-05-28T20:09Z

För att sätta off

```
strSQL = "UPDATE tblLiga SET status = 'off' " & _
" WHERE not exists (SELECT 1 FROM tblSpel " & _
" where tblSpel.ligaid = tblLiga.ligaid " & _
"  and date() < Datum )"
  Conn.Execute strSQL
```

För att sätta on

```
strSQL = "UPDATE tblLiga SET status = 'off' " & _
" WHERE exists (SELECT 1 FROM tblSpel " & _
" where tblSpel.ligaid = tblLiga.ligaid " & _
"  and date() > Datum )"
  Conn.Execute strSQL
```

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

## #5 — asp, 2003-05-28T21:45Z

fungerar galant..

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/78357-ändra-status