---
title: "\"Dagens citat\"-funktion?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/10719-dagens-citat-funktion"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Lukaspojken"
published: "2001-07-22T09:10:00.000Z"
updated: "2001-07-22T15:27:00.000Z"
replies: 8
views: 203
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/10719-dagens-citat-funktion"
---

# "Dagens citat"-funktion?

## #1 — Lukaspojken, 2001-07-22T09:10Z

"Dagens citat" följer med på varje sida så jag vill inte göra en db-hämtning varje gång man byter sida. Att skapa en statisk-includefil av det är därför mitt alternativ, men hur gör jag för att den ska göra en uppdatering varje ny dag. Citaten finns i en databas. Jag vet hur man skapar en statiskfil från databasen men jag vet inte hur jag ska lyckas med att göra det automatiskt?

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

## #2 — Pace, 2001-07-22T09:55Z

Gör det inte så svårt för dig!

Om någon surfar in på sidan och denna filen inte finns - skapa den!

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

## #3 — Pace, 2001-07-22T10:12Z

... eller en rad för varje dag, dvs 31 rader.

Om användaren surfar in idag, den 22:a, plockas rad 22 ut.

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

## #4 — Lukaspojken, 2001-07-22T11:07Z

Hur kan jag checka om en fil finns eller inte?

Det ska inte vara massa rader...det blir 365 rader som den måste gå igenom och det är inte så bra.

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

## #5 — Pace, 2001-07-22T11:15Z

Kolla om filen finns eller ej:

```
Set ObjLoggFile = Server.CreateObject("Scripting.FileSystemObject")

If ObjLoggFile.FileExists("citat.fil") Then Response.Write "jepp, filen finns"
```

Ett annat sätt är ju att spara citatet i en application, där du också sätter ett datum. Är det inte dagens datum så är det bara att hämta ett nytt citat från db:n och uppdatera datumet i application. :)

Det går ju göra på motsvarande sätt med en text-fil, vilket jag tycker är att föredra.

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

## #6 — Lukaspojken, 2001-07-22T11:36Z

Ska se lite vad jag kan hitta på...tack...

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

## #7 — Bengan, 2001-07-22T15:15Z

Du kan kolla mitt exempel på en enkel schemaläggare här:
 <http://www.bengan.com/tips/default.asp?tips=asp_schema_2.asp> 

Använd den nedre på varje sida där citatet skall infogs så är du säker på att få dagens citat oberoende var besökaren kommer in.

Sen kan du göra koden för citathämtningen så att den dels sparar citatet i en txt fil och dels skriver ut det med Response.write.

Lägg sen koden så här:

```
' --- Kolla om det är ny dag och uppdatera isåfall filen. ---
If Application("citat") <> Day(Now()) Then

	Server.Execute "citat_update.asp"

	Application.Lock
	Application("citat") = Day(Now())
	Application.Unlock

Else 
%>
<!-- #include file="citat.txt" -->
<% End If %>
```

citat_update.asp är alltså den fil som du kör själva uppdateringen i. Har du sidorna på IIS4 så får du istället lägga in all kod ovan för då funkar inte Server.Execute.

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

## #8 — Lukaspojken, 2001-07-22T15:22Z

Vad innebär detta?

Application.Lock
Application("citat") = Day(Now())
Application.Unlock

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

## #9 — Bengan, 2001-07-22T15:27Z

Du sparar helt enkelt dagens nummer i som ett applikations-värde. Funkar precis som en vanlig variabel fast det ligger i minnet och kan därför läsas av alla sidor.

Application.Lock bör man köra för att det inte skall bli en "krock" när flera sidor försöker spara samtidigt. Har ingen större betydelse i det här fallet men jag tycker det är bra att ta för vana och skriva så.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/10719-dagens-citat-funktion